Ich habe folgenden Code, der in einem Bestimmten Ordner alle EXE-Dateien sucht.
Das funzt an sich auch, nur ändert er nicht die Eigenschaften:
Delphi-Quellcode:
BGame[i - 1] := TButton.Create(self);
with BGame[i - 1] do begin
Parent := FMenue;
Caption := Copy(ExtractFileName(LSearchRec.Name), 1, Length(ExtractFileName(LSearchRec.Name)) - 4);
Width := 129;
Left := 8;
Height := 25;
Top := (i - 1 * 33) + 8;
end;