Hi,
meine Fragen:
Wie ermittle ich die Anzahl der Ordner bzw. Dateien in einem Ordner?
Wie lese ich dann die einzelnen Datei- bzw. Ordnernamen (ohne Pfad) in Strings ein?
Wie ändere ich die Anzahl der Felder in TComboBox?
Wie ändere ich einen Feld in TComboBox?
Delphi-Quellcode:
// Globale Variablen (public)
var AnzahlDateien, AnzahlOrdner : Integer;
// prozedur 1
begin
AnzahlOrdner := // Befehl die Ordner in einem Ordner zu zählen
AndzahlDateien := // Befehl die Dateien in einem Ordner zu zählen
end;
// prozedur 2
var OrdnerNamen : Array[1..AnzahlOrdner] von String; // sind diese Deklarationen richtig?
DateiName : Array[1..AnzahlDateien] von String;
x : Integer;
begin
{Eigenschaft, der die Länge des ComboBox1 ändert} := AnzahlOrdner;
{Eigenschaft, der die Länge des ComboBox2 ändert} := AnzahlDateien;
for x := 1 to AnzahlOrdner do
{Eigenschaft, der den Feld[x] des ComboBox1 ändert} := {Befehl den Namen Ordner[x] zu ermitteln}
for x := 1 to AnzahlDateien do
{Eigenschaft, der den Feld[x] des ComboBox2 ändert} := {Befehl den Namen Datei[x] zu ermitteln}
end;