Zitat von
spaxxn:
Zitat von
Sunshine21:
procedure DoChange;
OnChange_Proc = procedure of object;
So müsste das gehen! War ein wenig in Gedanken, Aber DeddyH hats getroffen
Grund: Im Hauptform wurde Sender als Parameter übergeben, aber vom OnChange gar nicht angefordert. Mal in normalem deutsch ausgedrückt...
Da hätte ich noch eine kurze Frage dazu. Wenn ich Parameter übergeben möchte müssen die dann in der Klasse in
OnChange_Proc = procedure (Parameter1 : string, Parameter2 : Boolean) of object;
angegeben werden oder im Hauptform
procedure DoChange(Parameter1 : string, Parameter2 : Boolean)
oder gar beides?
++++++++++++++++++++++++++++++++++++++++++++++++++ ++++++++++++
"Nur" fürs Verständnis....
Delphi-Quellcode:
procedure TMyClass.OnChange;
begin
if Assigned(FOnChange) then
FOnChange;
end;
procedure TMyClass.setStatus(value: Boolean);
begin
FStatus := value;
if Assigned(FOnChange) then
FOnChange;
end;
Wie genau funktioniert das mit dem Assigned