DIALOGs Vs WINDOWs
Posted: Mon Jan 01, 2018 4:51 pm
Estoy comparando comportamientos de controles entre WINDOW y/o DIALOG, y encuentro algunos "defectos" entre el tratamiento de un contenedor u otro.
El tema de PIXELs, no es el mismo, por ejemplo...
Los dos Edits, son (deberian ser) del mismo tamaño. Un Edit que esté en el contenedor de un TFolderEX, si éste FolderEx su parent es una WINDOW, respeta el tema PIXELs, correctamente, si el parent es un DIALOG, NO lo respeta y va por libre!!!
Creo que el TFolderEx está bien creado, el séptimo parámetro es el que corresponde a lPixels
El tema de PIXELs, no es el mismo, por ejemplo...
Code: Select all
#include "FiveWin.ch"
FUNCTION Main()
local oWnd, oFldr
Local oEdit, cVarEdit := "Edit2..."
Local oEdit2, cVarEdit2 := "Edit2..."
DEFINE DIALOG oWnd FROM 1, 1 TO 800, 1450 PIXEL
oWnd:lTruePixel := .T.
// DEFINE WINDOW oWnd FROM 1, 1 TO 800, 1450 PIXEL
oFldr := TFolderEx():New( 0, 0,800,250, oWnd,, .T., .F., {"Prime","Segu","Terce","Quart","Five","My Dialog"},,, 0,,,,, .F., 0,,, .F., "TOP",,, .F.,,, .T.,, .F.,, "oFldr" )
@ 25,25 BUTTON "&FotoFons" OF oFldr:aDialogs[1] SIZE 100, 30 PIXEL
@ 75,25 EDIT oEdit VAR cVarEdit SIZE 300,22 LIMITTEXT BY 30 CHARS PIXEL OF oFldr:aDialogs[1]
@ 275,25 EDIT oEdit2 VAR cVarEdit2 SIZE 300,22 LIMITTEXT BY 30 CHARS PIXEL OF oWnd
ACTIVATE DIALOG oWnd
// ACTIVATE WINDOW oWnd
Return Nil
Creo que el TFolderEx está bien creado, el séptimo parámetro es el que corresponde a lPixels