FiveTech Software tech support forums

...                         ;      ON CHANGE( IIF( .NOT. EMPTY( cEmail ),                               ;         aGet[1]:oBtn:SetFile( "..\bitmaps\plus.bmp"),                     ;         aGet[1]:oBtn:SetFile( "..\bitmaps\minus.bmp" ...

... Msginfo("Email")  ;           ON CHANGE  IIF(!Empty(cEMail),;                          (aGet[1]:oBtn:setfile("mail.bmp"),aGet[1]:oBtn:show()),;                          aGet[1]:oBtn:Hide())  ...

... MOSTLEFT round ; action oWnd:End() oBtn36:LoadBitmaps( ".\bitmaps\Exit1.png" ) // normal disabled : oBtn36:Disable() oBtn36:SetFile( ".\bitmaps\Disabled.bmp" ) // gray image it means a extra image is needed. http://forums.fivetechsupport.com/viewtopic.php?f=3&t=22737&p=121478&hilit=image+to+gray#p121478 ...

... BITMAP ".\bitmaps\bradio1.bmp" MOSTLEFT SIZE 65, 18 PROMPT "Filtro" ; ACTION ( oSelf:lFilter := ! oSelf:lFilter, ; oSay:SetFile( If( oSelf:lFilter, ".\bitmaps\bradio1.bmp", ".\bitmaps\bradio2.bmp" ) ) ) then I have a get @ 9,592 GET oNum1 VAR oSelf:nNumFrom ...

... first record and have the value of the variable nStatus later with this value I can change the image to btnbmp IF nstatus=5 //free aBmps[nY,nX]:SetFile(aElementi[nKE][8]) else // not free aBmps[nY,nX]:SetFile(aElementi[nKE][9]) endif this night I try with cFilter := "trim(TYPE) == '" ...

... o la letra eñe por ejemplo. me parece que es un problema del control activex, yq ue tengo lo mismo hecho con vfp y va de lujo. en el metodo SetFile tengo esto ::oControl:playlist:add( "File:///" + cFileName ) que es donde me parece se da el problema. alguna ayuda. la verdad me ...

... RBBTN ::oToolButton ; PROMPT "ToolBar" ; SIZE 70,20 ; BITMAP "TOOLBAR_off" any solution ? i tried also with ::oToolButton:SetFile( "TOOLBAR_ON", "TOOLBAR_OFF" ) on rbtn class there is an error because before on method setfile you can call 2 files with ...

... oChk1 GROUP oGr1 BITMAP ".\bitmaps\checkon.bmp" MOSTLEFT SIZE 85, 18 PROMPT "Checkbox" ; ACTION ( lVal1 := ! lVal1, oChk1:SetFile( If( lVal1, ".\bitmaps\checkon.bmp", ".\bitmaps\checkoff.bmp" ) ) ) regards Uwe :D

René,

> the number of photo's I have from that plant

if you know such number in advance then you can do:

{ oImage1, ..., oImage15 }[ nNewPhoto ]:SetFile( cFileName )

Please use the message SetFile() instead of SetImage()

... "Child5" ; ... ... // change to DLL to load the images SET RESOURCES TO c_path + "SYSTEM.dll" // select DLL oBtn[1]:SetFile( "EXIT" ) // set button-image oBitmap:SetBMP( "IMAGE1" ) // set Image oBitmap:Refresh() aBitmaps1 := { "BOOKS",; ...

... possible to display a animated GIF inside BTNBMP ? I can use a TRANSPARENT button and split the animated GIF to it single images Next using oBtn:SetFile(Frame&No.gif ) inside a loop on buttonclick but I need up to 20 single images. Next to perform the ACTION during the GIF is running. Maybe ...

... Local nfile:= 0 Local cFile:= "" If len(oList:aItems)<>0 nfile:= oList:nOption IF nFile >0 cFile:= oList:aItems[nFile]:cText Setfile(cFile,.f.) Endif Endif return nil Setfile(cFile,.f.) is my function to show Preview Handler on Image control but the problem is : when I save ...

... = { "Show" + CRLF + "Export-image","SHOW", 1, CLR_BLACK, 14089979 } oSBtn[6]:SetColor( 0, ) oSBtn[6]:SetFile( c_path1 + "Eye1.Bmp", c_path1 + "Eye1.Bmp" ) METHOD Paint() CLASS TBtnBmp from line 1150 if ! Empty( hBmp )    ...

... 1, CLR_BLACK, 14089979 } oSBtn[6]:SetColor( 0, ) Only one line needed, to change the BMP : Transparent !!! oSBtn[6]:SetFile( c_path1 + "Eye.Bmp", c_path1 + "Eye.Bmp" ) NON TRANSPARENT !!!. I added a border with PIXELFORMER oSBtn[6]:SetFile( c_path1 ...