Forum: Object-Pascal / Delphi-Language
Delphi
by sakura,
25. Dez 2002
:mrgreen: Hab ja geschrieben, dass die Lösung etwas länger ist.
Forum: Object-Pascal / Delphi-Language
Delphi
by sakura,
25. Dez 2002
Okay, deklariere ein neues Ereignis vor der Deklartion der Klasse mit Deiner Routine:type
TProgressInfo = procedure(Sender: TObject; Progress: Integer) of object;
Der Wert in Progress übergibt dann den Fortschritt in z.B. Prozent.
In der Klasse mit der Routine definiere foldende Eigenschaft/Variabletype
TRoutineKlasse = class
private
FOnProgressInfo: TProgressInfo;
public
...
Forum: Object-Pascal / Delphi-Language
Delphi
by sakura,
25. Dez 2002
Wird die Unterroutine mehrfach oder nur einmalig aufgerufen?
Forum: Object-Pascal / Delphi-Language
Delphi
by sakura,
25. Dez 2002
Ist diese rechenintensive Routine in der Klasse, in welcher auch das Form definiert ist, oder ist diese in einer anderen Klasse definiert? Diese Info macht den Rest u.U. viel leichter.