topic-26723

Board index FiveWin para Harbour/xHarbour Clear Gets

karinha

Posts: 8515

Joined: Tue Dec 20, 2005 07:36 PM

Clear Gets
Posted: Wed Jul 03, 2013 08:13 PM

Maestro Antonio, que sustituye ell comando CLEAR GETS del clipper?

Tengo 30 GETS y me gustaría que 20 GETS és WHEN( . F. ) com se fueste: CLEAR GETS de clipper.

É posible?

Salu2.

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

Marcelo Via Giglio

Posts: 1088

Joined: Fri Oct 07, 2005 03:33 PM

Re: Clear Gets
Posted: Thu Jul 04, 2013 12:25 PM

Hola,

me imagino que puedes utlizar el aControls del contenedor ( Dialogo) y a través de la data CLASSNAME puedes identificar cuales son GET y a partir de alli bajo tu criterio oGet:cText hacer que se pongan en el valor que requieras.

solo una idea

saludos

Marcelo

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

Re: Clear Gets
Posted: Thu Jul 04, 2013 03:06 PM

Como te indica Marcelo, el código seria más o menos asi:

AEval( oDlg:aControls, { | o | If( Upper( o:ClassName() ) == "TGET", o:SetText( uValBlank( o:GetText() ) ),) } )

regards, saludos

Antonio Linares
www.fivetechsoft.com

FiveTech Support Forums

Continue the discussion