[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