Relatório de TEdits - Temporário

Boa tarde,

Coloque 6 Edits com os nomes
E_NOME
E_Sobrenome
E_Estado
E_EndereCO
E_Cidade
E_Telefone
Coloque 1 Button com o nome
Imprimir

Adicione componente de reletório fast reports
RELATORIO_RT: TfrxReport;
frxGradientObject1: TfrxGradientObject;


Dentro do fast vá até a aba >>Report>>Variables...

Crie 6 variaveis.



var
Nome:string
var
Sobrenome:string
var
Endereco:string
var
Telefone:string
var
Cidade:string
var
Estado:string


-----------------
No button imprimir coloque o seguinte código.

RELATORIO_RT.Variables.Clear;

RELATORIO_RT.Variables['Nome'] := QuotedStr(E_NOME.Text);
RELATORIO_RT.Variables['Sobrenome'] := QuotedStr(E_Sobrenome.Text);
RELATORIO_RT.Variables['Endereco'] := QuotedStr(E_EndereCO.Text);
RELATORIO_RT.Variables['Telefone'] := QuotedStr(E_Telefone.Text);
RELATORIO_RT.Variables['Cidade'] := QuotedStr(E_Cidade.Text);
RELATORIO_RT.Variables['Estado'] := QuotedStr(E_Estado.Text);

RELATORIO_RT.PrepareReport();
RELATORIO_RT.ShowReport();

[img]http://arquivo.devmedia.com.br/forum/imagem/437747-20160203-163322.png[/img]

Se não conseguir dar o zoom na imagem salve a mesma e abra no visualizador de imagens do Windows.

Espero que ajude.