eu acho muito simples, nao tive muita dificuldade nao. a dificuldade que tive
foi porque usava o fortes(muito bom por sinal), e na mudança a gente fica um
pouco perdido, porque as propriedades sao diferentes. ele tambem tem a
possbilidade de gravar o relatorio desenvolvido em arquivo, e levar ao cliente,
para que o proprio cliente possa alterar. veja o exemplo que vem com ele... da
pra pegar muita coisa...
segue um pedaco do codigo q uso no relatorio de contas a receber. ele é um
unico relatorio onde tem a posibilidade de gerar cerca de 10 relatorios, so
mudando as propridades do report:
valeu... t+
if (rd3.ItemIndex=0) and (rd2.ItemIndex=0) then
PPGROUP1.BreakName:='vencimento';
if (rd3.ItemIndex=0) and (rd2.ItemIndex=1) then PPGROUP1.BreakName:='emissao';
if (rd3.ItemIndex=1) then PPGROUP1.BreakName:='nome';
if (rd3.ItemIndex=2) then PPGROUP1.BreakName:='nome_convenio';
ai em cima defini a quebra... de acordo opcao no relatorio, defini a quebra em
tempo de execucao.
dts.close;
dts.CommandText:=sql;
ppgroupfooterband1.Visible:=false;
ppgroupheaderband1.Visible:=false;
if ck7.Checked then begin
ppgroupfooterband1.Visible:=true;
ppgroupheaderband1.Visible:=true;
end;
aqui se vou imprimir a quebra...
ppdbcalc1.Font.Style:=[FSBOLD];
ppdbcalc6.Font.Style:=[FSBOLD];
ppdbcalc5.Font.Style:=[FSBOLD];
ppdbcalc3.Font.Style:=[FSBOLD];
pplabel11.Font.Style:=[FSBOLD];PPDBTEXT11.DisplayFormat:='DD/MM/YYYY';
aqui colocando em negrito
pplabel1.Caption:='Mix Duplicatas '+rd1.Items.Strings[rd1.itemindex];
pplabel9.Caption:='Periodo de:'+dateedit3.Text+' a '+dateedit4.text+'
Por:'+rd2.Items.Strings[rd2.itemindex]+'
Ordem:'+rd3.Items.Strings[rd3.itemindex]+' % Juros ao
Dia:'+formatfloat(',0.00',frmprincipal._vlrjuros)+' '+rd0.Items[rd0.itemindex];
aqui mudando o titulo do relatorio
pplabel15.Visible:=false;
if rd0.ItemIndex=0 then ppDetailBand1.Visible:=true;
if rd0.ItemIndex=1 then begin
ppdbcalc1.Font.Style:=[];
ppdbcalc6.Font.Style:=[];
ppdbcalc5.Font.Style:=[];
ppdbcalc3.Font.Style:=[];
pplabel11.Font.Style:=[];
ppDetailBand1.Visible:=false;pplabel7.Visible:=false;pplabel3.Visible:=false;
pplabel2.Visible:=false;pplabel6.Visible:=false;pplabel5.Visible:=false;
ppdbtext11.Visible:=true;
if rd3.ItemIndex=0 then if rd2.ItemIndex=0 then
pplabel8.Caption:='Vencimento' else pplabel8.Caption:='Emissão';
if rd3.ItemIndex=1 then if rd2.ItemIndex=0 then
pplabel8.Caption:='Cliente/Vencimento' else pplabel8.Caption:='Cliente/Emissão';
if rd3.ItemIndex=2 then if rd2.ItemIndex=0 then
pplabel8.Caption:='Convenio/Vencimento' else
pplabel8.Caption:='Convenio/Emissão';
if rd3.ItemIndex=0 then if rd2.ItemIndex=0 then
ppdbtext11.DataField:='Vencimento' else ppdbtext11.DataField:='Emissao';
if rd3.ItemIndex=1 then begin
ppdbtext11.DataField:='nome';
ppdbtext11.DisplayFormat:='';
end;
if rd3.ItemIndex=2 then begin
ppdbtext11.DataField:='nome_convenio';
ppdbtext11.DisplayFormat:='';
end;
aqui mudei alguns campos... para outros campos de acordo o relatorio
end;
pplabel4.Caption:=frmprincipal._Sisvers+' -
['+strzero(frmprincipal._codempr,3)+' - '+frmprincipal._nomempr+'] -
'+'[Usuário:'+frmprincipal.Uc.CurrentUser.UserLogin+']';
try
screen.Cursor:=crsqlwait;
dts.Open;
finally
screen.Cursor:=crdefault;
end;
rP.PRINT;
aqui to imprimindo o relatorio
----- Original Message -----
From: maniacapordelphi
To: delphi-br@yahoogrupos.com.br
Sent: Saturday, June 30, 2007 8:24 AM
Subject: [delphi-br] Re: Report Builder X Delphi 7
E, no meu caso, que nunca trabalhei com o Report Builder, acha que
seria possível desenvolver relatórios nele sem fazer um curso antes?
Ele é auto-explicativo? Não estou encontrando material na net.
Encontro muita coisa para Crystal Report, mas R.Builder nada.
Uma curiosidade: como se faz a chamada do relatório feito no
R.Builder através do Delphi? E os relatórios funcionam também fora
do Delphi?
Mani
--- Em delphi-br@yahoogrupos.com.br, "Leandro" <[EMAIL PROTECTED]> escreveu
>
> Maniaca,
>
> Uso o R. Builder 10 no Delphi 7 blz...
>
> att,
>
> Leandro
>
> ----- Original Message -----
> From: maniacapordelphi
> To: delphi-br@yahoogrupos.com.br
> Sent: Friday, June 29, 2007 2:14 PM
> Subject: [delphi-br] Report Builder X Delphi 7
>
>
> Qual é a versão do REport Builder mais apropriada para o Delphi
7?
> Alguém teria uma apostila sobre o Report Builder? Nunca usei
esse
> gerenciador de relatório.
> Mani
>
>
>
>
>
> [As partes desta mensagem que não continham texto foram removidas]
>
------------------------------------------------------------------------------
No virus found in this incoming message.
Checked by AVG Free Edition.
Version: 7.5.476 / Virus Database: 269.9.10/873 - Release Date: 26/6/2007
23:54
[As partes desta mensagem que não continham texto foram removidas]
