Fehlermeldung bei AssignFile

[dersunny]

Ich muss mich wohl korrigieren, hatte vorhin mal aus Versehen XP als OS geschrieben...gemeint war eigentlich Vista...wie spätestens beim Lesen der folgenden Datei klar wird

[Sir Rufo]

Zitat von dersunny:

Ich muss mich wohl korrigieren, hatte vorhin mal aus Versehen XP als OS geschrieben...gemeint war eigentlich Vista...wie spätestens beim Lesen der folgenden Datei klar wird

Na denn

Delphi-Quellcode:

begin
  ComboBox1.Items.Clear;
  i := 0;
  {$I-}
  sFileName := ExtractFilePath( Application.ExeName ) + 'data\dri\dri.txt.txt'; // <-- so heißt die Datei :o)
  AssignFile( fahrerliste, sFileName );
  try
    Reset( fahrerliste );
    {$I+}
    ShowMessage( SysErrorMessage( IOREsult ) );
    try
      while not EOF( fahrerliste ) do
        begin
          ReadLn( fahrerliste, s );
          i := i + 1;
        end;
    finally
      CloseFile( fahrerliste );
    end;

[Aphton]

dri.txt.txt

[Klaus01]

.. das ist dann wohl wieder einer der Fehler die hätten vermieden werden können
wenn "hide known file extensions" nicht aktiv wäre.

Grüße
Klaus

[alfold]

Oder wen man weiss, was man macht

Gruss alfold

[dersunny]

An alle: DANKE!

Jetzt haben wir (zumindest ich) mir den Abend mit so einem blöden Fehler versaut...

@Sir Rufo:
Wo habe ich nicht das gemacht, was Du wolltest?

[alfold]

Dir die 'listing.txt' angeschaut! Dann hättest Du es selbst gesehen

Gruss alfold

[dersunny]

LOL
Aber wenn mans ganz genau nimmt, hat niemand gesagt, dass ich die mir durchlesen soll... :p

[Aphton]

Uns auch nicht xD

[alfold]

Schon aus Neugierde würde ich mir sowas anschauen, nur um zu verstehen was @Sir Rufo mir da gesagt hat und was passiert ist, mit dieser Anweisung!

Er hätte Dir auch ein del geben können

Gruss alfold