Dateien eines Ordners in Combobox eintragen

[Blumi]

Hi zusammen

Ich habe eine Combobox erstellt. Jetzt möchte ich alle Dateien mit der Endung .txt (Also Textdateien) in die Combobox auflisten.

Leider fällt mir nicht ein wie ich das anstellen könnte :?

[marabu]

Vielleicht möchtest du dir mal die Komponente FileListBox in der Palette "Win 3.1" ansehen?

Grüße vom marabu


Da hätte ich noch was:

Delphi-Quellcode:

procedure TDemoForm.InitButtonClick(Sender: TObject);
var
  i: integer;
  s: string;
begin
  s := '*.pas';
  if InputQuery('select files', 'mask', s) then begin
    FileListBox.Mask := s;
    ComboBox.Clear;
    for i := 0 to FileListBox.Items.Count - 1 do
      ComboBox.Items.Add(FileListBox.Items[i]);
  end;
end;

[FriFra]

Wenn Du die ListBox selber füllen willst, kannst Du auch mal nach FindFirst, FindNext suchen ;)

In der Codelib gibt es dazu auch einen Beitrag...