[Lazarus-es] mostrar form encima del principal
Paola Bruccoleri
pbruccoleri en adinet.com.uy
Mar Oct 9 00:46:18 CEST 2012
El 08/10/2012 08:21 p.m., Paola Bruccoleri escribió:
> El 08/10/2012 06:48 p.m., Paola Bruccoleri escribió:
>> El 08/10/2012 03:23 p.m., José Mejuto escribió:
>>> El 08/10/2012 14:47, Paola Bruccoleri escribió:
>>>
>>>>
>>>
>>> Application.DoEvents;
>> esto me da error q no existe; puse Application.ProcessMessages; y no
>> me dió resultado
>>
>>>
>>> Aunque yo lo que haría sería iniciar el formulario con
>>> Enabled:=false, y meter un Timer con un retardo de 1 ms.
>>> que sea el que me muestre el "LoginFecha". Si el loginfecha es OK
>>> entonces "Self.Enabled:=true".
>> no te entiendo mucho..
>> pongo el form ppal con enabled=false desde el diseño..
>>
>> no se para que sería el timer; o sea q efecto haría..
>>
>> y luego hago esto?
>> loginfecha:= TfrmFechaInicial.Create(nil);
>> if loginfecha.showmodal = mrOk then
>> begin
>> FreeAndNIL(loginfecha);
>> frmMain.Enabled:= true;
>> end
>> else
>> Application.Terminate;
>>
>> sin el timer y haciendo esto.. igual queda mal el form ppal, no se
>> maximiza
>
> puse showmessages para ver q es lo que se va haciendo.
>
> Probé de poner:
> WindowState:= wsMaximized;
> Application.ProcessMessages;
>
> en el oncreate, onshow y onactivate y nunca se maximiza el form ppal
> hasta que cierro el form de fecha .. o sea, al salir del onACTIVATE
Hola de nuevo yo...
si en el onshow, coloco esto al ppio:
frmMain.Height:= screen.Height - 50;
frmMain.Width := screen.Width ;
frmMain.Left:= 0;
frmMain.Top:= 0;
(ese 50 es para que se vea la statusbar).. queda como si fuera
minimizado... o sea, es la solución "casera" q he encontrado, pero no me
gusta !
quiero que quede maximizado :)
quizás sea algún bug viejo de esta versión, no se.. esto no puede ser
tan complicado y no tiene ninguna ciencia.
More information about the Lazarus-es
mailing list