vc esá poscionando certo os componentes Felipe escreveu: > > Pessoal! > > Consegui resolver meu problema, ele tá aparecendo os campos, porém, ele > coloca todos os registros numa única linha. Como eu posso inserir > quebras de > linha? > Tentei fazer usando labels e usando um TQRMemo mas, usando essa segunda > opção o meu texto nem apareceu. > > Alguém pode me ajudar? > > Obrigadp > > 2008/7/11 Felipe <[EMAIL PROTECTED] > <mailto:felipemorandin%40gmail.com>>: > > > Fala pessoal! > > > > Achei em no fórum da DevMedia o seguinte exemplo: > > > > var > > campo:TQRLabel; > > i, L:integer; > > begin > > L:=120; > > for i:=1 to 4 do > > Begin > > L:=L+10; > > campo := TQRLabel.Create(nil); > > campo.ParentReport := QuickRep1; > > campo.Parent := QuickRep1.QRBand1; > > campo.Name := 'Name'+inttostr(i); > > campo.Top := 0; > > campo.Left := L; > > campo.Caption := 'Teste'; > > QuickRep1.Prepare; > > QuickRep1.Preview; > > end; > > end; > > > > Porém, eu tentei implementar uma situação parecida: > > > > for i := 0 to SQLQueryGeraRelatorio.RecordCount do > > begin > > L:=L+10; > > campo := TQRLabel.Create(nil); > > campo.ParentReport := frmRelatorio.QuickRep1; > > campo.Name := 'Name'+inttostr(i); > > * campo.Parent := frmRelatorio.QuickRep1.QRBand1;* > > campo.Caption := > > SQLQueryGeraRelatorio.FieldByName('name').AsString; > > > > SQLQueryGeraRelatorio.Next; > > end; > > frmRelatorio.QuickRep1.Prepare; > > frmRelatorio.QuickRep1.Preview; > > > > Porém, na linha em que ele tenta fazer campo.Parent ele dá um erro de > > undeclared identifier. Tem que declarar isso em algum lugar? Dentro > do meu > > quickreport tem um qrband com esse nome. > > > > Alguém pode me dar mais alguma ajuda??? > > > > Vlw > > > > > > 2008/7/11 André Lima <[EMAIL PROTECTED] > <mailto:andre.almeida%40medicator.com.br>>: > > > > Isso que eu quis dizer... > >> Provavelmente está declarado... > >> > >> _____ > >> > >> De: delphi-br@yahoogrupos.com.br > <mailto:delphi-br%40yahoogrupos.com.br> > <delphi-br%40yahoogrupos.com.br>[mailto: > >> delphi-br@yahoogrupos.com.br > <mailto:delphi-br%40yahoogrupos.com.br> > <delphi-br%40yahoogrupos.com.br>] Em > >> nome de Ricardo César Cardoso > >> Enviada em: sexta-feira, 11 de julho de 2008 13:36 BoaTarde Dé > >> > >> Para: delphi-br@yahoogrupos.com.br > <mailto:delphi-br%40yahoogrupos.com.br> <delphi-br%40yahoogrupos.com.br> > >> Assunto: Re: [delphi-br] Re: Criar TQRLabel em tempo de execução > >> > >> A princípio vc deve declarar QRCtrls na cláusula Uses. Isto se QRLabel > >> estiver declarada dentro de QRCtrls. > >> > >> Atte, > >> Ricardo. > >> > >> --- Em sex, 11/7/08, Felipe <HYPERLINK > >> "mailto:felipemorandin%40gmail.com <felipemorandin%2540gmail.com> > >> "[EMAIL PROTECTED]> escreveu: > >> De: Felipe <HYPERLINK > >> "mailto:felipemorandin%40gmail.com <felipemorandin%2540gmail.com> > >> "[EMAIL PROTECTED]> > >> Assunto: Re: [delphi-br] Re: Criar TQRLabel em tempo de execução > >> Para: HYPERLINK > >> "mailto:delphi-br%40yahoogrupos.com.br > <delphi-br%2540yahoogrupos.com.br> > >> "[EMAIL PROTECTED] > <mailto:delphi-br%40yahoogrup-os.com.br> <delphi-br%40yahoogrup-os.com.br> > >> Data: Sexta-feira, 11 de Julho de 2008, 12:12 > >> > >> Declarar isso onde? > >> > >> Deixa eu explicar melhor o meu problema: eu tenho um form que tem uns > >> campos > >> > >> que podem ser usados para a busca que vai gerar o relatório e um > botão que > >> é > >> > >> o responsável por chamar um outro form que ira conter o quickreport > e os > >> > >> campos que eu preciso criar. > >> > >> Tem alguma outra forma de fazer isso? > >> > >> Fui tentando algumas soluções que eu achava na internet e até > algumas das > >> > >> respostas que me deram aqui mas não consegui. > >> > >> Novos endereços, o Yahoo! que você conhece. Crie um email novo com > a sua > >> cara @ymail.com ou @rocketmail.-com. > >> HYPERLINK > >> "http://br.new.mail.yahoo.com/addresses > <http://br.new.mail.yahoo.com/addresses>" > >> http://br.new.-mail.yahoo.-com/addre > <http://br.new.-mail.yahoo.-com/addre> > >> sses > >> > >> [As partes desta mensagem que não continham texto foram removidas] > >> > >> No virus found in this incoming message. > >> Checked by AVG. > >> Version: 7.5.524 / Virus Database: 270.4.6/1540 - Release Date: > 08/07/2008 > >> 06:33 BomDia André > >> > >> No virus found in this outgoing message. > >> Checked by AVG. > >> Version: 7.5.524 / Virus Database: 270.4.6/1540 - Release Date: > 08/07/2008 > >> 06:33 BomDia André > >> > >> > >> [As partes desta mensagem que não continham texto foram removidas] > >> > >> > >> > > > > > > > > -- > > Felipe > > > > -- > Felipe > > [As partes desta mensagem que não continham texto foram removidas] > >
-- ----------------------------------------------------- Uberdam Cavaletti Formado em Tecnologia da informação - Unoesc - Xxe Pós graduando em Desenvolvimento Java - Unoesc - Xxe Acesse http://www.curricular.com.br/berdam Acesse http://passandoveneno.blogspot.com -----------------------------------------------------
