Hi,
I've just finished a small application that had to be written without using
the VCL ... nothing that clever ... basically a form with a couple of
buttons, labels and a progress bar. I've ended up with a very procedural
piece of code but I'd like to add a few class structures. The problem is
that all of my message code is handled by the global function :
function WndProc(Wnd : HWND; message : UINT; wParam : integer; lParam :
integer) : integer; stdcall;
I can't figure out how to create a base class that contains a message
procedure like :
procedure WndProc(var Message: TMessage);
I've hunted around without much success and have tried to examine the
Forms.pas to figure it out ... so basically how do you encapsulate the
global WndProc function ?
Andrew
