In WndProc Handle ermitteln - ohne Self

[DGL-luke]

hm. du hast eine klasse, die für verschiedene controls windowprocs bereitstellt. hrm, hrm, hrm. WinAPI-callbacks haben meistens tag-parameter für sowas...

Um das klarzustellen:

Delphi-Quellcode:

type
  TMessageInterceptor = class
    procedure WindowProc(Message: TMessage);
    procedure AddControl(Control: TWinControl);
    ...
  end; 

procedure TMessageInterceptor.AddControl(Control: TWinControl);
begin
  OldProcs.Add(Control.WindowProc);
  Control.WindowProc := WindowProc;
end;

So in etwa läuft das, wenn ich mischerr richtig versteh.