Welcome to the Project Developers' Table

[mol]

I'm still lerning QT and reading documentation.
IMAGE is realized, maybe not ended, but working with PNG images.
I think, I can take next control to create. Please assign me next job!

Ok.

I guess that Combobox is free, so you could work on it.

You could need to synchronize your work with rathinagiri, sin he is working on listbox and maybe you can share code for some properties.

OK. I'm taking it!

[Roberto Lopez]

I'm still lerning QT and reading documentation.
IMAGE is realized, maybe not ended, but working with PNG images.
I think, I can take next control to create. Please assign me next job!

Ok.

I guess that Combobox is free, so you could work on it.

You could need to synchronize your work with rathinagiri, sin he is working on listbox and maybe you can share code for some properties.

OK. I'm taking it!

Ok. I'll take image.

[Roberto Lopez]

Then go to label samples folder, copy on it the hmg.gif file and compile the demo_1.

hmg.gif, will be show instead label text.

So, gifs are directly supported.

The same applies to .jpg files.

I've changed references to hmg.gif by hmg.jpg and works perfectly.

Maybe something is wrong with my computers???
Maybe something is wrong with my mind

I've just changed such two lines on label and all my labels become images (png,gif, jpg and .bmp).

I'll upload a complete image class soon, so you can check it.

[mol]

I've completed IMAGE class, too.
I only need to clean up code
Marek

[sudip]

Hello,

TextBox can now store different DataTypes. I tested it. It runs fine (except, the "/", "." characters can be deleted, and no restriction for datatype specific input ). I think it's better to post here first for your check before SVN Commit

Code: Select all

METHOD Value (xValue) CLASS TEXTBOX

   If Pcount() == 1
      Do Case
         Case ValType(xValue) == "N"
            xValue := Str(xValue)
         Case ValType(xValue) == "D"
            xValue := Dtoc(xValue)
      EndCase
   Endif            
    

	If ::lCreated

      If Pcount() == 0
      
			RETURN If(::DataType == TXT_NUMERIC, ;
            Val(::oQTObject:Text()), ;
               If(::DataType == TXT_DATE, CToD(::oQTObject:Text()), ::oQTObject:Text()))

		ElseIf Pcount() == 1 

			::oQTObject:SetText(xValue)

		EndIf

	Else

      If Pcount() == 0

			RETURN ::xValue

		ElseIf Pcount() == 1 

			::xValue := xValue

		EndIf

	EndIf

RETURN NIL

...
...

METHOD DataType ( nValue ) CLASS TEXTBOX

// DataType is not a property of QLineEdit

   If Pcount() == 0

		RETURN ::nDataType

	ElseIf Pcount() == 1 

		::nDataType := nValue

	EndIf

RETURN Nil

[Roberto Lopez]

I've completed IMAGE class, too.
I only need to clean up code
Marek

I've uploaded an image class test that works fine with .jpg, gif and bmp.

Please, take a look at it:

Image3.png (305.46 KiB) Viewed 2220 times

[mol]

I've compiled your IMAGE class and get this on the screen:


So, I don't know, what's going on.

[mol]

I've deleted my HMG.4\svn\samples and HMG.4\svn\source folders. Then I've updated these folders from SVN, recompiled samples\image\demo_1.prg and nothing better happened

Maybe the rest of the team could test this sample?
It's very strange - it does not work on my three computers two with XP and one with win'7.

[Rathinagiri]

I too get the demo screen just like Marek.

And, when I changed all the pictures to 'hmg.bmp', all the three come up.

It looks like only .bmp files are working.

[mol]

On my computers sample works good with png and bmp images. I think, basic is JPG at now and it must work.