FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Pocket PC Border en GET
Posts: 682
Joined: Tue Feb 14, 2006 09:48 AM

Border en GET

Posted: Tue Apr 18, 2006 01:44 PM

Hola Foro, q tal las fiestas de Pascua. Espero q bien.

Al tema, tengo un GET que dependindo de un valor boolenao, debe estar activo o no. Esto es facil usando WHEN o o con Disable(), pero en ambos casos sigue visualizando el recuadro del GET. El GET esta definido desde recursos, veo que si fuera desde codigo existe NOBORDER, pero como puedo hacerlo para que cuando no se edite, tambien desaparezca el borde con el get definido en recursos. Evidentemente cuando deba editarse si quiero el borde, no me vale quitar el borde en el RC.

Gracias anticipadas.

Saludos desde Mallorca
Biel Maim贸
http://bielsys.blogspot.com/
Posts: 682
Joined: Tue Feb 14, 2006 09:48 AM

Border en GET

Posted: Mon Apr 24, 2006 10:06 AM

A falta de respuestas, imagino que no puede hacerse. Entonces el planteamiento es el siguiente, el GET en el recurso sin caja. Y dibujar una caja alrededor del GET cuando proceda. Lo he intentado con WndBox(), pero no lo he conseguido, alguna idea.

Gracias.

Saludos desde Mallorca
Biel Maim贸
http://bielsys.blogspot.com/
Posts: 139
Joined: Sun Nov 06, 2005 06:14 PM

Border en GET

Posted: Mon Apr 24, 2006 01:09 PM

asi a primeras miraste dos get superpuestos uno con caja y otro sin ella y ocultar el que no se desea ? ( o tambien un get y un say ) .
Atenci贸n ten en cuenta que se apilan en recursos al reves de como lo ves en el programa , de tal manera que si pones en recursos delante el say , te quedar谩 detras al ejecutar .
No se si sirve pero ....
Saludso.

Jose Luis Paraj贸n

Asturias
Posts: 682
Joined: Tue Feb 14, 2006 09:48 AM

Border en GET

Posted: Mon Apr 24, 2006 02:26 PM
Gracias Jose Luis por la respuesta. Tus comentarios siempre son de ayuda.

Al final persevere con el tema de WndBox, y consegui que se comportase tal cual queria.

Es un get en el detalle de albaranes en el que se introduce el n潞 de lote para trazabilidat. Este Get depende de un buleano definido en un fichero de configuracion.
Al final lo hago as铆:
 ...
   REDEFINE GET oGetLot VAR DetVtaTmp->Lote   ID 604 OF oDlg PICTURE "@K" VALID {|oGet|Ajusta(oGet)}

   IF Cfg->Lotes //<====
      REDEFINE SAY oSayLote PROMPT 'Lote' ID 4002 OF oDlg COLOR CLR_BLACK, CLR_WHITE
   ELSE
      oGetLot:Disable() //Podria hacerse en el WHEN del GET
   ENDIF
   //--
   ...
   //-
   ACTIVATE DIALOG oDlg ;
            ON INIT IF(!SipInfo().AND.Cfg->lSip,ShowKeyboard(),NIL) ;
            ON PAINT IF(Cfg->Lotes,WndBox(hDc,103,117,83,200),) //Dibujo box cuando Lotes .t.
...
Saludos desde Mallorca
Biel Maim贸
http://bielsys.blogspot.com/
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM

Border en GET

Posted: Mon Apr 24, 2006 08:55 PM

Biel,

> Al final persevere con el tema de WndBox, y consegui que se comportase tal cual queria.

Bien. Otra soluci贸n ser铆a cambiar el estilo del GET dinamicamente usando SetWindowLong( oGet:hWnd, GWL_STYLE, <estilo previo, excepto borde>).

El estilo previo se consigue llamando a GetWindowLong() de similar manera, y luego con un nAnd() seleccionar todo excepto el borde.

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM

Border en GET

Posted: Fri Apr 28, 2006 11:50 AM

Lo probastes ?

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 682
Joined: Tue Feb 14, 2006 09:48 AM

Border en GET

Posted: Fri Apr 28, 2006 01:54 PM

Hola Antonio,
pues no, lo he dejado en tareas to do( to try), voy un poco retrasado, y ya me enrede mas de la cuenta. Cuando lo pruebe ya comentare en el hilo.

Saludos desde Mallorca
Biel Maim贸
http://bielsys.blogspot.com/
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM

Border en GET

Posted: Fri Apr 28, 2006 03:50 PM

ok :)

regards, saludos

Antonio Linares
www.fivetechsoft.com

Continue the discussion