I fixed all the sizeof variables to their proper types (dumb of me lol), I 
even changed the name of the FRead function, and now when closefile is 
called, it jumps to some other procedure that was never called from outside 
of this pas file.

http://element8mm.250free.com/pedata.pas

in the main form, there is where i test the class

procedure TtsxMainForm.bTest4Click(Sender: TObject);
var
  pPEObjs: TSPEObjs;
  fname: string;
begin
  if not OpenDialog1.Execute then
    exit;
  fname:= OpenDialog1.FileName;
  pPEObjs:= TSPEObjs.Create(obj1);
  try
    //pPEObjs.FWrite(fname); // this works just fine and data has already 
been re-written
    pPEObjs.FiRead(fname); // the moment the CloseFile procedure is called, 
it jumps to bTest2Click, for no reason at all, then does the infinite loop 
on it's first line of code.
  finally
    pPEObjs.Free;
  end;
end;


----- Original Message ----- 
From: Richard R
To: 'Delphi-Talk Discussion List'
Sent: Thursday, October 13, 2005 7:49 PM
Subject: wierd stuff happening


Hello again. I dont have any explanation on what's going on, maybe its just 
the nature of things or delphi is seriously a messed up program (i'm using 
delphi 6 enterprise)

... 
__________________________________________________
Delphi-Talk mailing list -> [email protected]
http://www.elists.org/mailman/listinfo/delphi-talk

Reply via email to