Thema: Delphi Untyped Binary Files

Einzelnen Beitrag anzeigen

Benutzerbild von sk.Silvia
sk.Silvia

Registriert seit: 8. Feb 2006
Ort: Slovenia
90 Beiträge
 
Delphi 7 Personal
 
#7

Re: Untyped Binary Files

  Alt 19. Feb 2006, 18:29
thanks

i made a bit investigation using ShowMessage steping

1) with pointer : when i add @ it writes me an error : variable required - but thats not the problem tmp without @ seems to be right

2) as i was tracking it, it looks like it dont handle eof(MFile) and make one more cycle which is fatal! - i have no clue why eof dont works (althrought it works right by button1 procedure)

Delphi-Quellcode:
showmessage('1');
  while not eof(MFile) do
    begin
    showmessage('2');
    BlockRead(MFile,tmp,SizeOf(integer));
    showmessage('3');
    Memo3.Lines.Append(IntToStr(tmp));
    showmessage('4');
    end;

  closefile(MFile);
  end;
i rewrited it to an until cycle, with no success i need to solve a bigger problem, but cant move when this dont works...
  Mit Zitat antworten Zitat