Ajuda com este memorando
Estou desenvolvendo um sistema para cemitérios e preciso imprimir o
translado de algumas sepulturas.
O problema é o seguinte.
Tenho um texto padrão e precisaria substituir o campo que está no texto
(ex: Nome) pelo respectivo nome do indivíduo através de uma consulta.
O que tenho parecido é fazer como a mesclagem de documento no Word.
Alguém poderia me ajudar?
Dar alguma Idéia ou me dizer onde posso encontrar?
Grato
translado de algumas sepulturas.
O problema é o seguinte.
Tenho um texto padrão e precisaria substituir o campo que está no texto
(ex: Nome) pelo respectivo nome do indivíduo através de uma consulta.
O que tenho parecido é fazer como a mesclagem de documento no Word.
Alguém poderia me ajudar?
Dar alguma Idéia ou me dizer onde posso encontrar?
Grato
Rbfonseca
Curtidas 0
Respostas
Ivonei
16/07/2004
Você tem que dar mais detalhes do seu sistema.
Você está usando banco de dados? Qual? Qual gerador de relatórios você vai usar? Quick Report, Rave, etc.
O nome vai no meio de um texto pré definido? :roll:
Você está usando banco de dados? Qual? Qual gerador de relatórios você vai usar? Quick Report, Rave, etc.
O nome vai no meio de um texto pré definido? :roll:
GOSTEI 0
Rbfonseca
16/07/2004
Banco de Dados que eu vou usar por enquanto é o Paradox
Para Relatórios o Quick Report e já terá um texto prédefinido.
No Aguardo
Para Relatórios o Quick Report e já terá um texto prédefinido.
No Aguardo
GOSTEI 0
Ivonei
16/07/2004
No QReport, coloque um QRBand Detail e dentro dele um QRMemo.
No evento BeforePrint do QuickReport, coloque algo assim:
Var
texto:String;
begin
Texto:=´Isto é um teste de impressão de ´;
Texto:= Texto + Tabela.FieldByName(´Nome´).Value;
Texto:= Texto + ´ para mostrar no relatório.´;
QRMemo1.Lines.Add(Texto);
end;
Isto é um exemplo simples. Existe várias maneiras. Você pode usar também o QRText. Faça alguns testes.
[ ]´s
No evento BeforePrint do QuickReport, coloque algo assim:
Var
texto:String;
begin
Texto:=´Isto é um teste de impressão de ´;
Texto:= Texto + Tabela.FieldByName(´Nome´).Value;
Texto:= Texto + ´ para mostrar no relatório.´;
QRMemo1.Lines.Add(Texto);
end;
Isto é um exemplo simples. Existe várias maneiras. Você pode usar também o QRText. Faça alguns testes.
[ ]´s
GOSTEI 0