FiveTech Software tech support forums

hello Rossine,

great, work's fine !!!

thanks

regards

(um abraço pra vc, obrigado mais uma vez)

hola, tengo necesidad de hacer override en method :end() en unas clases de FWH: OVERRIDE METHOD End CLASS TDialog WITH METHOD xMyEnd1 OVERRIDE METHOD End CLASS Tprinter WITH METHOD xMyEnd2 ocorre este erro ao compilar: Error E0030 Syntax error: "parse error at 'METHOD' Error E0030 Syntax error:...

hi everyone, I need override method :end() in some FWH classes... OVERRIDE METHOD End CLASS TDialog WITH METHOD MyEnd1 OVERRIDE METHOD End CLASS TPrinter WITH METHOD MyEnd2 but this error appears in compilation: Error E0030 Syntax error: "parse error at 'METHOD' Error E0030 Syntax error: "...

Hola:

Desde Leme, estado de São Paulo, Brasil

Saludos

olá Julio, desculpe, eu deveria ter sido mais claro... eu gravo imagens em arquivo tipo Memo, que seriam os "equivalentes" aos BLOBs e faço desta forma, onde a imagem é criada no disco somente temporariamente, sendo deletada depois (não vi o método LoadFromString, mas tenho quase certeza q...

olá, vc pode usar desta forma também... #include "fivewin.ch" Function Teste() cFileBmp = cGetFile("*.bmp") cFileJpg = cGetFile("*.jpg") cFileGif = cGetFile("*.gif") cEncBmp = 'c:\temp\memo_bmp.tmp' cEncJpg = 'c:\temp\memo_jpg.tmp' cEncGif = 'c:\temp\memo_gif....

hello, you can create txt files using the class TTxtfile: cFile = 'MyOrder.txt' oFile = TTxtFile():New( cFile ) select mBD go top while .not.eof() cLine = '' for ii=1 to fcount() cLine+=fieldget(ii) next oFile:Add( cLine ) skip +1 enddo oFile:Close() return regards

ola, probe esto: // no valid del ultimo get del dialogo 1 @ 10,01 GET oGet1_8 VAR nValo1 PICT "9,999,999.99" OF oFold:aDialogs[1] valid EVAL({|| oFold:SetOption(2),.T.}) // no valid del ultimo get del dialogo 2 @ 10,01 GET oGet2_8 VAR nValo2 PICT "9,999,999.99" OF oFold:aDialogs[...

Yuri,

Puedes probar con oWnd:oMenu:Hilite( <nOption> )
_________________
regards, saludos

Antonio Linares
www.fivetechsoft.com

gracias Antonio, irei testar

saludos

oMenu:end() //FINALIZA O OBJ DO MENU ...SUA FUNÇÃO PARA MONTAR O MENU NOVAMENTE ownd:setmenu(omenu) SysRefresh() Espero ter ajudado obrigado pela resposta, mas isto que vc postou é para reconstruir o menu... oque eu quero é que, após executar a ação de um item do menu, ele abra novamente automatica...

olá a todos, é possível expandir o mesmo nivel de menu/submenu após executar a ação ? após executar a ação, o menu é apagado da tela, e o usuário é forçado a escolher de novo no primeiro nível do menu eu quero que o menu se expanda automaticamente no mesmo nivel vejam o codigo: MENU oMenu MENUITEM &...

hello everyone, is possible expand the same menu/submenu after execute the action ? after the execute an action, the menu is erased of screen, and the user is forced to choice again in the first nivel of menu i want the menu expands automatic in the same nivel see the code: MENU oMenu MENUITEM "...

En primer lugar comentar que la función original ChangeRes corresponde a los brasileiros Marcelo Gomes y Yuri Marcelino, y se encuentra en el foro de FW-Brasil:

Manuel,

gracias pela citação...

saludos

hi Willy, if I understand what you looking for, try this example: #include "FiveWin.ch" function Main() local aList:={'mai1_1@yahoo.com',; 'mail_2@hotmail.com',; 'mail_2@aol.com' } local aFile:={'c:\doc_1.doc',; 'c:\doc_2.xls',; 'c:\doc_3.ppt'} local oMail, cMail:='', cFile:='' for i = 1 t...

hi Antonio,

Now the method IsEmpty() is ok !

thank you !

saludos