[Solved]TBookMark

[martin17476]

Hello, I am new in Lazarus but wiht experience in Delphi.  It is the first time here at the forum and I apologize if I am not doing correctly.

I am migrating from Delphi an old program and I have one error that I can not resolve. This is the fragment of the program:

procedure TfAlbaranes.dblcbBuscarCliClick(Sender: TObject);
var tbmMarca : TBookMarkStr; fSuma : Currency;
begin
    dmPages.qVehCli.Close;
    intCodCli := dmPages.tClientesCodigoInterno.AsInteger;
    dmPages.qVehCli.Params[0].AsInteger := intCodCli;
    dmPages.qVehCli.Open;
    tbmMarca := dmPages.tAlbaranes.GetBookMark; 

and the error:
identifier not found "TBookMarkstr"

I tried also with BookMark with the same error.

Thankyou  very much

[Mando]

Hello:

change this:

var tbmMarca : TBookMarkStr;


by

tbmMarca : TBookMark;


Regards,
saludos.

[martin17476]

Thank you very much, but the problem is the same. The error message is the same.

[Mando]

Hi:

Include db in "uses" clause of the form.


Saludos.

[martin17476]

Many Thanks Mando. Now it works.