Klasse soll Anwendung nur bei best. Änderung benachrichtigen

[Sunshine21]

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