Forum: Object-Pascal / Delphi-Language
by Delphi.Narium,
20. Mär 2021
Man sollte bei der Diskussion vielleicht auch mal noch beachten, dass zu Zeiten von Delphi 5 (August 1999) die Dateinamenskonvention 8.3 noch der Normalfall war und die langen Dateinamen nur ein zusätzlicher Aufsatz darauf.
Damals (seit Windows 95) galt halt 8.3 als Default und alles andere war für die Software, die halt schon damit umgehen konnte.
Heute ist es wohl umgekehrt.
Wenn ich...
Forum: Object-Pascal / Delphi-Language
by Delphi.Narium,
19. Mär 2021
Hab's gerade mal mit Delphi 7 ausprobiert.
Der "Fehler" liegt nicht in der TFileListBox, sondern im in der procedure TFileListBox.ReadFileNames genutzten FindFirst. Kann man mit 'ner einfachen Routine testen:
procedure TForm1.Button1Click(Sender: TObject);
var
sr : TSearchRec;
begin
if FindFirst('c:\temp\*.mmp',faAnyFile,sr) = 0 then begin
ShowMessage(sr.Name
+...