Recent

Author Topic: Ligar Lazarus ao LazReport sem BD  (Read 2300 times)

mrneutel

  • Newbie
  • Posts: 1
Ligar Lazarus ao LazReport sem BD
« on: November 29, 2014, 01:38:29 am »
Boas,
comecei à pouco tempo a programar com o Lazarus, (já não mexia em Pascal desde o tempo de escola).
Queria criar uma aplicação para criar umas etiquetas de teor um pouco especifico, mas sem me ver obrigado a criar uma bd.
Assim sendo queria saber como passar o conteúdo de uma caixa de texto directamente para o report, se fôr possível!!

Desde já agradeço pela ajuda e atenção!!

andersonscinfo

  • Full Member
  • ***
  • Posts: 132
Re: Ligar Lazarus ao LazReport sem BD
« Reply #1 on: December 16, 2014, 10:52:41 pm »
Ola, é possivel de duas formas, você pode usar um TBufDataset com os dados em memória, ou então você pode usar o evento onEnterRect do TFreport, ficaria algo assim

Code: [Select]
procedure TForm1.frReport1EnterRect(Memo: TStringList;
  View: TfrView);
begin
  if View.Name = 'Memo1' then
  begin
      View.Memo.Text:='AQUI VAI O TEXTO';
  end; 
end;

Att.
Anderson Junior

 

TinyPortal © 2005-2018