Einzelnen Beitrag anzeigen

Ykcim

Registriert seit: 29. Dez 2006
Ort: NRW
831 Beiträge
 
Delphi 10.4 Sydney
 
#4

AW: ContextMenue in TFileListBox

  Alt 20. Nov 2018, 12:57
UPS, mein Fehler: Es ist tatsächlich eine Komponente von TMS...

Ich habe es jetzt wie folgt gelöst:
Delphi-Quellcode:
procedure ListFiles(Pfad, FileName: string; FLB: TFileListBoxEx);
begin
   FLB.Clear;
   FLB.Directory:=StringReplace(Pfad,'/','\',[rfIgnoreCase, rfReplaceAll]);
   FLB.Mask:='*'+fileName+'*';
end;
Damit funktioniert es, hat nur den Nachteil, dass ich nicht in Unterordnern nach weiteren Dateien gucken kann, sondern nur in dem zugewiesenen...

Aber ich glaube, so geht es.

@uligerhardt: Ohne den Verzeichnisnamen habe ich es leider nicht realisiert bekommen...

Patrick
Patrick
  Mit Zitat antworten Zitat