Problem mit FindFirst, FindNext und TFileStream

[himitsu]

neee, siehe auch anderer Thread >>> relative Pfade

Delphi-Quellcode:

.      // vvvv
FindFirst('C:\*.txt', faAnyFile, F)= 0 then
    begin
      try
        { Versuchen, die Datei öffnend zu lesen }
        TmpStream := TFileStream.Create('C:\' + F.Name
                                     // ^^^^^^^