quarta-feira, 21 de novembro de 2012

Etiqueta com FastReport Fr3

Criar etiquetas de endereçamento com FastReport3






1)
Criar Etiqueta no Fast Report
Colocar ReportTitle
MasterData
Shape: skRoundRectangle
Coloque os dados para gerar a etiqueta ( nome, endereco,bairro)
Se quiser usar pronomes de tratamento é só colocar um [Edit1.Text] e depois associa-los.

Frame Color : clSilver
Em Columns coloque := 2
ColumnWidth:= 9,50
ParentFont:= False

2)
Criar um Dialog Page com pronomes de tratamento

Click em DialogPage

Coloque o radiobutton
Em caption coloque as atribuições

Coloque um button

3)
Depois em code faça as associações:

procedure RadioButton1OnClick(Sender: TfrxComponent);
begin
   if (RadioButton1.Checked)then
      Memo14.Text:= 'Sr.º';
end;

procedure RadioButton2OnClick(Sender: TfrxComponent);
begin
   if (RadioButton2.Checked)then
      Memo14.Text:= 'Sr.ª';
end;

procedure RadioButton3OnClick(Sender: TfrxComponent);
begin
   if (RadioButton3.Checked)then
      Memo14.Text:= 'V.S.ª';
end;

4 comentários:

  1. como vc fez no fastreport para colocar um ao lado do outro? tem como me enviar o demo do fr3?
    johnbh3@gmail.com

    Obrigado

    ResponderExcluir
    Respostas
    1. É só colocar o Columns da banda para a quantidade de colulas que necessita e no ColumnsWidth o tamanho delas.
      Não sei se ajuda mas nesse blog tem passo a passo de como fazer http://anaprogramadorajunior.blogspot.com.br/2015/12/criar-etiqueta-no-fastreport.html

      Excluir
  2. Pelo número de colunas Perfil Sistemas.

    ResponderExcluir
  3. Eu ainda uso o delphi 7, precisava emitir
    etqueta para relojoaria, numa argox, mas
    imprime uma salta uma etiqueta, por isso
    queria fazer no fastreport....

    ResponderExcluir