Einzelnen Beitrag anzeigen

KoRn117

Registriert seit: 24. Sep 2003
Ort: Hessen
50 Beiträge
 
Delphi 7 Enterprise
 
#1

untypisierte dateien - warum eine zugriffsverletzung(simpel)

  Alt 9. Apr 2004, 16:18
hi,

das was ich gerade mal ausprobieren wollte ist eine untypisierte datei zu lesen...

Das problem:
^^^^^^^^^^^^

ich kann sie lesen und auch wieder schließen, aber ich bekomme trotzdem eine speicherverletzungsfehlerkladeradatsch...

könnt ihr mal bitte gucken, woran es liegen könnte?

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var datei : file;
    Buf: array[0..4] of Char;
    countt :integer;
    tmp : string;
    i : integer;
begin

assignFile(datei,'asd.wav');
reset(datei);

BlockRead(datei,buf,sizeof(buf),countt);

tmp:='';
for i:=0 to 3 do
  begin
  tmp:=tmp+buf[i];
  end;

showmessage(inttostr(countt));
showmessage(tmp);

closefile(datei);

end;
vielen dank

ach und ich hab delphi in der schrittweisen compelierung gestartet und er hat erst nach dem letzten oder beim letzten end gemeckert
  Mit Zitat antworten Zitat