Problema con folder

Post Reply
User avatar
Andrés G.
Posts: 33
Joined: Fri Jun 29, 2007 7:38 am
Location: Tarragona, Catalunya

Problema con folder

Post by Andrés G. »

Hola atodos,

Estoy empezando ha programar con harbour y me encuantro con un problema a la hora de hacer folder's en mi aplicación.

Siempre ma aprece un cuadro blanco en el fondo de la aplicación y no se como evitarlo, he provado hasta a cambiar el color del folder y siempre me aprece el cuadro blanco. Aquí os dejo una imagen para que veais de lo que hablo:

Image

La ventana la construí asi:


DEFINE DIALOG FINESTRA FROM 1,1 TO 498,672 PIXEL TITLE TIT FONT TLLETRA
@ 12,10 SAY "NIF:" SIZE 12,9 PIXEL OF FINESTRA
@ 10,26 GET CAMPS[1] SIZE 38,11 PICTURE "!9999999!" UPDATE VALID EMPTY(CAMPS[1]) .OR. NNC(CAMPS[1])="S" .OR. IF(LEN(ALLTRIM(NNC(CAMPS[1])))>1,(CAMPS[1]:=NNC(CAMPS[1]),FINESTRA:UPDATE(),.T.),(TONE(900,2),MsgStop("Número erroni","Atenció!"),.F.)) PIXEL WHEN OP $ "AR" OF FINESTRA
@ 12,69 SAY "Cognoms i nom:" SIZE 48,9 PIXEL
@ 10,121 GET C2 VAR CAMPS[2] SIZE 205,11 PIXEL WHEN OP $ "AR" OF FINESTRA
@ 25,10 FOLDER CARPETA PROMPT "Dades personals","Itinerari","Situació actual","Càrrecs anteriors","Estudis" SIZE 316,190 PIXEL FONT TLLETRA OF FINESTRA
@ 227,113 BUTTON "&D'acord" OF FINESTRA SIZE 50,12 PIXEL ACTION ACEPTAFI()
@ 227,173 BUTTON "&Cancel·lar" OF FINESTRA SIZE 50,12 PIXEL ACTION (OK:=.F.,FINESTRA:END())
ACTIVATE DIALOG FINESTRA CENTERED


Me aparece en todos los folder's.

Os agradeciria me ayudaseis a solucionar este problema.

Gracias de antemano.

Andrés González
User avatar
ADBLANCO
Posts: 299
Joined: Mon Oct 22, 2007 3:03 pm
Location: Valencia - Venezuela

Post by ADBLANCO »

TE FALTA DEFINIR CUALES DIALOGOS VA A PRESENTAR CADA FOLDER


REDEFINE FOLDER oFolder ID 501 of oDlg;
Prompt "Datos Generales","Declaracion","Datos Conductor";
Dialogs "SINDATGEN","SINDECLA","SINDATCON"



POR ESO TE PRESENTA ESE ESPACIO EN BLANCO

SUERTE!
User avatar
Antonio Linares
Site Admin
Posts: 37481
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Contact:

Post by Antonio Linares »

Andrés,

Que versión de FWH estás usando ? Con FWH 7.12 tu ejemplo, con _ para poder compilarlo, se muestra correctamente:

Image

Code: Select all

#include "FiveWin.ch"

function Main()

   local oDlg, n1 := 123, c2 := Space( 20 )

   DEFINE DIALOG oDlg FROM 1,1 TO 498,672 PIXEL TITLE "TIT"
   
   @ 12,10 SAY "NIF:" SIZE 12,9 PIXEL OF oDlg 
   @ 10,26 GET n1 SIZE 38,11 PICTURE "!9999999!" UPDATE PIXEL OF oDlg 
   @ 12,69 SAY "Cognoms i nom:" SIZE 48,9 PIXEL 
   @ 10,121 GET C2 SIZE 205,11 PIXEL OF oDlg 
   @ 25,10 FOLDER CARPETA PROMPT "Dades personals","Itinerari","Situació actual","Càrrecs anteriors","Estudis" SIZE 316,190 PIXEL OF oDlg 
   @ 227,113 BUTTON "&D'acord" OF oDlg SIZE 50,12 PIXEL
   @ 227,173 BUTTON "&Cancel·lar" OF oDlg SIZE 50,12 PIXEL
   
   ACTIVATE DIALOG oDlg CENTERED
   
return nil   
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Andrés G.
Posts: 33
Joined: Fri Jun 29, 2007 7:38 am
Location: Tarragona, Catalunya

Post by Andrés G. »

Antonio,

Lo estava compilando con una versión vieja de FWH, ahora lo he probado con la 7.09 y me funciona bien.

Gracias por todo.

Andrés
Post Reply