From: Leonardo M. <leo...@ho...> - 2016-10-08 00:37:45
|
OTHER ERRORS: FUNCTION TEST INIT DIALOG oDlg TITLE "test" ; AT 0,0 SIZE GETDESKTOPWIDTH(),GETDESKTOPHEIGHT()-50 ; STYLE WS_POPUP+WS_CAPTION+DS_CENTER +WS_SYSMENU+WS_MINIMIZEBOX+WS_MAXIMIZEBOX+WS_VISIBLE ACTIVATE DIALOG oDlg Show SW_SHOWMAXIMIZED // error RETURN NIL ________________________________ De: Leonardo Machado <leo...@ho...> Enviado: sexta-feira, 7 de outubro de 2016 12:17 Para: Alexander S.Kresin Assunto: Re: [Hwgui-developers] Error Understood, I will remove all. Another error: source\sagi_tanque.prg(1664) Error E0030 Syntax error "syntax error at '@'" Sample: ..... ..... @ 289,19 GET CHECKBOX oTodos_Datas VAR lTodas_Datas CAPTION 'Todos' SIZE 062,022; ON INIT {|| if(lTodas_Datas, (dIni := ctod('01/01/1800'), dFim := ctod('31/12/4000'), oIni:Refresh(), oFim:Refresh(),oIni:Disable(), oFim:Disable()),; (oIni:Enable(), oFim:Enable())) }; ON CLICK{|| msginfo('test') } ..... ..... ..... ________________________________ De: Alexander S.Kresin <al...@be...> Enviado: sexta-feira, 7 de outubro de 2016 04:41 Para: Leonardo Machado Assunto: Re: [Hwgui-developers] Error Leonardo Machado ?????: > > STATIC Thisform > > > FUNCTION TEST(nCODFOR) > > LOCAL oDLG > > > INIT WINDOW oDlg MDICHILD VAR Thisform TITLE "Teste"; > ... INIT WINDOW has not VAR clause. As I understand this goes from 2.17 and is intended for 'thisform' always point to currently active window. If so, you can simply set this in ON GETFOCUS: ON GETFOCUS {|o|thisform:=o} Regards, Alexander. |