Hallo, ich habe eine unit in der ich folgende Procedure habe.
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
| procedure KomponenteMouseDown (Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
TWinControl(Sender).Perform(WM_LBUTTONUP, 0, 0);
TWinControl(Sender).Perform(WM_SysCommand, SC_MOVE+2, 2);
end; |
Außerdem habe ich eine Procedure mit der ich einige images zur Laufzeit erzeuge.
Nun wollte ich mit
onMouseDown := KomponenteMouseDown die zuvor genannte Procedure zuweisen.
Ich erhalte jedoch immer nur folgende Fehlermeldung
| Zitat: |
| [Fehler] commands.pas(72): Inkompatible Typen: 'Methodenzeiger und reguläre Prozedur' |
Was stimmt denn da nicht?
Moderiert von 
Tino: Code- durch Delphi-Tags ersetzt.
Moderiert von Tino: Quote-Tags hinzugefügt.
