I found bug in FORMS.PP if procedure TApplication.Initialize; is invoke…
Show quoted text 7 lines
I found bug in FORMS.PP
if procedure TApplication.Initialize;
is invoke CNSendMessage(LM_SCREENINIT, nil, @ScreenInfo);
if should be invoke early, for example in tScreen.create()
That would bite with some initialization sections.
Show quoted text 5 lines
because in function is initialize variable PIXELSPERINCH
now tScreen.PIXELSPERINCH has value 0
I notice that in tForm.pixelsperinch is dummy
I have implemented them via GetDeviceCaps. Is this function a workaround in the gtk intf or already implemented?
Darek PS. I have 2 small petition 1. please rebuilt MAKEFILE in LCL\interfaces
Done
Show quoted text 9 lines
2. please add of top //include in win32int.pp
in files
{$I win32proc.inc}
{$I win32listsl.inc}
{$I win32callback.inc}
{$I win32object.inc}
{$I win32winapi.inc}
thats help me in my work
I will leave this for Micha.
Mattias