[lazarus] More Native Win32 stuff(Pascal,canyouhelphere?)
Shane Miller
SMiller1 at stvgb.org
Wed Aug 11 16:13:53 EDT 1999
>When I started this, I was hoping to do it the Delphi way, where each
>window handle had it's own "window procedure" as a method of the TControl
>object, but there is no way I can see at the Interface.pp level, that I can
>see, to do this. It has to be done at the TControl level, but TControl is
>in the LCL, and hence should ideally be API toolkit independent. The quick
>and dirty fix would be to make the TControl use IFDEFs to check for windows
>and compile in the "window procedure" code, and let that procedure take the
>WM_xxx messages and Dispatch the LM_xxx equivalents. It isn't clear how to
>go the other way, though. In other words, how does a form, on recieving a
>LM_RESIZE send a LM_RESIZE to all of it's children. My guess is that it
>can bypass the "window procedure" completely and just Dispatch the
>LM_RESIZE to each of the children directly.
>>AFAIK Delphi does not send a resize message to its children.
>>Marc
Delphi calls a requestadjustment (or something close to that) and then resizes the children manually, not by sending a RESIZE message.
Shane
More information about the Lazarus
mailing list