erro ao copilar com LISTBOX

[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

[sygecom]

Post um pequeno exemplo de como vc esta usando !!!

[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

[sygecom]

Compile o exemplo DEMOHLIST.PRG da pasta SAMPLES, lá tem exemplo de uso de LISTBOX COM @, se tiver duvida posta aqui.

[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,,,)

[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

[davidbezerra]

so uma duvida,

como o preview do Designer funcionou sem erro?

[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