Undefinierter Bezeichner, obwohl der Definiert ist !?!

[kiar]

fehler 1.

Delphi-Quellcode:

procedure Tform1.refresh(Sender: TObject); 
Var 
  bm : TBookMark; 
begin 
  With IBQuery1 Do 
  Begin 
    bm := GetBookmark; 
    Active := False; 
    Active := True; 
    GotoBookmark(bm); 
    FreeBookmark(bm); 
  End; 
end;

wenn du tform1 eingibst,dann müßte auch fehler 2 und 3 verschwinden

raik