tbookmarklist

[TURGUT]

S.A arkadaşlar form1 de dbgridde seçili olan kayıtları yazdırmak istiyorum ancak tbookmarklist geçit vermiyo [Error] Unit6.pas(56): Undeclared identifier: 'tbookmarklist' hatasını veriyo tanımlamam gerekiyo sanırım ama nasıl yapacağımı bilmiyorum..
[code]
procedure TForm6.QuickRep1BeforePrint(Sender: TCustomQuickRep;
var PrintReport: Boolean);
var
liste: tbookmarklist;
i: integer;
kayit: tbookmark;
begin
liste:= form1.dbgrid1.selectedrows;
for i:=0 to liste.count -1 do
begin
kayit:=tbookmark(liste.items[i]);
form1.query1.gotobookmark(kayit);
end;
end;[/code]

[hbahadir]

tbookmarklist ' in tanımını bulunduran uniti (DBGrids) Form6 uses satırına eklemen lazım.