File Acess Denied ???

[devnull]

Hi,

Keine so gute Lösung:

Zitat:

Form1.ListBox2.Items.AddStrings(Form1.OpenDialog1M p3.Files);
reset(mp3);

Probiers doch einfach mal so:

Delphi-Quellcode:

  Form1.ListBox2.Items.AddStrings(Form1.OpenDialog1Mp3.Files);
  {$I-}
    reset (mp3);
  {$I+}
  fehler := IOResult;
  if fehler <> 0 then begin
     ShowMessage ('Fehler vom Typ "'+inttostr(fehler)+'" aufgetreten !');
     exit;
  end;
  [..]

devnull