FiveTech Software tech support forums

Antonio, muito obrigado!

Resolvi usando loadbitmaps("RECURSO")

Muito obrigado e Deus te abençoe!

Aoki

Antonio, Bom dia, o erro já esta postado acima e esta ocorrendo nesta linha: moBtn[1]:loadbitmap(getresources(),"LUPA") <- erro moBtn[1]:refresh() Application =========== Path and name: C:\DBF\sgs.exe (32 bits) Size: 3,464,192 bytes Time from start: 0 hours 0 mins 8 secs Error occurred at:...

Antonio, não resolveu... segue meu ERROR.LOG e PRG: Application =========== Path and name: C:\DBF\sgs.exe (32 bits) Size: 3,464,192 bytes Time from start: 0 hours 0 mins 17 secs Error occurred at: 23/08/2007, 18:01:19 Error description: Error BASE/1004 Message not found: TBTNBMP:LOADBIMTAP Stack Cal...

Antonio e amigos, preciso criar um timer que de tempos em tempos verifique a situacao e troque BMP de botoes BTNBMP, não estou conseguindo: local obtn define window oWndc from 0,0 TO 25,70 MDICHILD OF oWnd define timer otimesa of owndc interval 5000 action(trocabmp(obtn)) @ 10,20 BTNBMP oBtn resourc...

gracias marcelo !

Antonio e amigos, é possível trocar a imagem de um BTNBMP em tempo de execução:

@ 10,20 BTNBMP oBtn resource "REST2" TOP SIZE 60, 60 OF wnd

algo como:

obtn:loadbmp(getresources(),"OUTRORECURSO")


Grato

Aoki

Grato Antonio...

Antonio e amigos, como saber se uma WINDOW MDI já esta aberta?

Como testar o objeto OWND para saber se ela já esta aberta?


Grato

Aoki

Antonio, para colocar uma imagem na area de trabalho eu utilizava assim : DEFINE WINDOW oWnd ; ICON OICO; MENU PreparaMenu() ACTIVATE WINDOW oWnd MAXIMIZED on RESIZE ( showLogo(.T.)) ******************************* FUNCTION showLogo(jafundo) ******************************* local fupla:="sgs.jpg...

Gracias Antonio...

Antonio, eu preciso apresentar na mesma célula uma BITMAP e um texto logo abaixo.
Do jeito que você sugeriu eu teria a imagem separada do texto.

Estou precisando muito disso, grato pela atenção!


Fique com Deus

Aoki

Amigos estou fazendo assim: BMP :=loadbitmap(getresources(),"CHEOFF") redefine listBox oBfsu Fields Of oDla id 100 obfsu:aJustify := {0,2,0} obfsu:aHJustify := {0,2,0} obfsu:nHeaderHeight:= 30 obfsu:nLineHeight := 30 obfsu:bLine := {||{ BMP+CRLF+"MESA1",; <- NAO FUNCIONA BMP+CRLF...

Antonio, como trocar o cursor quando o mouse esta sobre a classe REBAR?

Gracias

Aoki

Antonio, é possível mudar o alinhamento de um SAY (RECURSO) via PRG?

No recurso: RIGHT

EX:

REDEFINE SAY oSay prompt "TESTE" ID 101 OF odlg CENTER

Amigos, tenho uma tela de produtos, nesta tela tenho determinado campo que por padrão é uma COMBOBOX, porém, dependendo das configurações, posso ter que mostrar um conteúdo de uma string neste campo. É possivel?

grato

Aoki