Einzelnen Beitrag anzeigen

dGeek
(Gast)

n/a Beiträge
 
#5

AW: TList mit Record füllen und an weitere TList übergeben

  Alt 26. Aug 2016, 09:47
Wie erzeuge ich denn Instanzen einer Klasse? Dumme Frage

Bin jetzt so weit:

Delphi-Quellcode:
type
 TDataType = (dtFile, dtDirectory);

type
 PFileEntry = ^TFileEntry;

 TFileEntry = class(TObject) // <= Object
  sFileName: String;
  aDataType: TDataType;
 end;

type
 TMyClass = class(TComponent)
 public
  FFileEntry: TObjectList;
  constructor Create; overload;
 end;

var
 aProcessFileList_ObjectList: TFileEntry;

implementation

procedure TMyClass.Create; // hier geht es nicht weiter
begin
 FFileEntry := TObjectList.Create;
 FFileEntry.OwnsObjects := true;
end;
  Mit Zitat antworten Zitat