Recent

Author Topic: [Solved]TBookMark  (Read 1587 times)

martin17476

  • New member
  • *
  • Posts: 9
[Solved]TBookMark
« on: February 02, 2016, 12:18:04 pm »
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
« Last Edit: February 02, 2016, 01:15:36 pm by martin17476 »

Mando

  • Full Member
  • ***
  • Posts: 181
Re: TBookMark
« Reply #1 on: February 02, 2016, 12:36:58 pm »

Hello:

change this:

var tbmMarca : TBookMarkStr;


by

tbmMarca : TBookMark;


Regards,
saludos.

martin17476

  • New member
  • *
  • Posts: 9
Re: TBookMark
« Reply #2 on: February 02, 2016, 12:50:31 pm »
Thank you very much, but the problem is the same. The error message is the same.

Mando

  • Full Member
  • ***
  • Posts: 181
Re: TBookMark
« Reply #3 on: February 02, 2016, 12:58:08 pm »
Hi:

Include db in "uses" clause of the form.


Saludos.



martin17476

  • New member
  • *
  • Posts: 9
Re: TBookMark
« Reply #4 on: February 02, 2016, 01:00:44 pm »
Many Thanks Mando. Now it works.