Dateien (videos) wie sortiert hintereinander laden /aufrufen

[Die Muhkuh]

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin
  FileListBox1.Mask:= IncludeTrailingPathDelimiter(ExtractFilePath(Application.Exename)) + '*.*';
end;