Einzelnen Beitrag anzeigen

Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.624 Beiträge
 
Delphi 12 Athens
 
#2

AW: Array einer Klasse (TRemotable) an procedure geben

  Alt 28. Okt 2013, 10:46
Ohne jetzt groß nachgedacht oder gar ausprobiert zu haben:
Delphi-Quellcode:
type
  TRemotableArray = array of TRemotable;

procedure ClearRemotables(var Remotables: TRemotableArray);
var
  i: integer;
begin
  for i := Low(Remotables) to High(Remotables) do
    Remotables[i].Free;
  Remotables := nil;
end;
Wie gesagt, ob es so funktioniert, kann ich nicht sagen, Versuch macht klug.
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat