Página 1 de 1
erro ao copilar com LISTBOX
Enviado: 14 Jun 2008 10:33
por davidbezerra
pessoal, preciso da ajuda de voces,
ao copilar com um LISTBOX, o sistema apresenta o erro abaixo:
xHarbour Compiler build 1.0.0 (SimpLex)
Copyright 1999-2007,
http://www.xharbour.org http://www.harbour-project.org/
Compiling 'CONFIGSCEC.PRG'...
100 200 300 400 500 600 700 800 900 1000 1100 1200 1300 1400 100 200 300 400 500 600 700 800 900 1000
CONFIGSCEC.PRG(13) Error E0030 Syntax error: "syntax error at '@'"
1 error
No code generated
utilizo o xHarbour com o HWGui,
valeu a ajuda
Re: erro ao copilar com LISTBOX
Enviado: 14 Jun 2008 16:44
por sygecom
Post um pequeno exemplo de como vc esta usando !!!
Re: erro ao copilar com LISTBOX
Enviado: 14 Jun 2008 17:39
por davidbezerra
#include "hwgui.ch"
FUNCTION _ConfigSCEC
PRIVATE ConfigSCEC
PRIVATE oListbox1
INIT DIALOG ConfigSCEC TITLE "SCEC - Configurando Sistema" ;
AT 352,126 SIZE 347,448 ;
FONT HFont():Add( 'MS Sans Serif',0,-13,700,,,) ;
STYLE DS_SYSMODAL +DS_CENTER +WS_VISIBLE
@ 12,45 GET LISTBOX oListbox1 ITEMS {""} SIZE 323,363 ;
FONT HFont():Add( 'MS Sans Serif',0,-13,700,,,)
ACTIVATE DIALOG ConfigSCEC
RETURN ConfigSCEC:lresult
Re: erro ao copilar com LISTBOX
Enviado: 15 Jun 2008 17:14
por sygecom
Compile o exemplo DEMOHLIST.PRG da pasta SAMPLES, lá tem exemplo de uso de LISTBOX COM @, se tiver duvida posta aqui.
Re: erro ao copilar com LISTBOX
Enviado: 15 Jun 2008 23:51
por esbasso
@ 12,45 GET LISTBOX oListbox1 ITEMS {""} SIZE 323,363 ;
FONT HFont():Add( 'MS Sans Serif',0,-13,700,,,)
FALTA O INIT
@ 12,45 GET LISTBOX oListbox1 ITEMS {""} INIT vListBox1 SIZE 323,363 ;
FONT HFont():Add( 'MS Sans Serif',0,-13,700,,,)
Re: erro ao copilar com LISTBOX
Enviado: 16 Jun 2008 09:51
por davidbezerra
pessoal, foi so eu tirar o GET que funcionou,
tava assim:
@ 12,45 GET LISTBOX oListbox1 ITEMS {""} SIZE 323,363 ;
FONT HFont():Add( 'MS Sans Serif',0,-13,700,,,)
eu coloquei assim porque o Designer gerou o codigo assim,
porem ao seguir a dica de Leonardo e olhei o exemplo do DemoHList.prg ele nao tinha o GET, e ficou assim:
@ 12,45 LISTBOX oListbox1 ITEMS {""} SIZE 323,363 ;
FONT HFont():Add( 'MS Sans Serif',0,-13,700,,,)
funcionou beleza,
valeu
Re: erro ao copilar com LISTBOX
Enviado: 16 Jun 2008 09:52
por davidbezerra
so uma duvida,
como o preview do Designer funcionou sem erro?
Re: erro ao copilar com LISTBOX
Enviado: 16 Jun 2008 19:31
por esbasso
o teu GERADOR DO script não esta atualizado.
usando o GET o campo interage com os demais GET .
baixe o designer daqui
www.engersoft.com.br\download\util\designer.zip