[lazarus] native Win32 Interface BugFix, maybe

Markus Lüdin markus at luedin.com
Thu Aug 29 13:47:45 EDT 2002


> >//  if Sender is TCustomForm then
> >//  begin
> >//    inc(Width, 50);
> >//    inc(Height, 50);
> >//  end;
> >
>
> I added this code a couple days ago because forms are always too small.
> It's a hack until somebody can figure out why it happens.

This issue is also solved with the updated WM_SIZE and WM_MOVE they form
got smaller because it got reduced to the client area...but that does not
happen anymore
so you can delete that....

Attached is my work from today...I made the CreatePixmapIndirect work. I
tested it with
the bitbutton demo and the splash screen, both seem to work now....but it
could be a bit faster,
at least it works now :)..if someone could check and add to the
cvs....thanks.

Regards
Markus

-------------- next part --------------
A non-text attachment was scrubbed...
Name: bin00000.bin
Type: application/octet-stream
Size: 6763 bytes
Desc: "CreatePixmapIndirect.pp"
Url : http://localhost/pipermail/lazarus/attachments/20020829/c120335c/bin00000.bin


More information about the Lazarus mailing list