Fórum Imprimir um ListView #287950
13/07/2005
0
Vi uma solução criando um arquivo .bmp , porém como imprimir uma arquivo via Delphi direto ?
Alguém tem uma solução para imprimir um TListView ??
Grato
Motta
Curtir tópico
+ 0Posts
14/07/2005
Motta
ps - o itens que localizei na pesquisa não me ajuduram.
Gostei + 0
14/07/2005
Adriano Santos
falow
Gostei + 0
14/07/2005
Sremulador
Gostei + 0
14/07/2005
Motta
Desculpe-me, não entendi , pode explicar ?
Gostei + 0
14/07/2005
Adriano Santos
Gostei + 0
14/07/2005
Sremulador
Gostei + 0
14/07/2005
Motta
Acho que vou trocar o TList pelo TRich
Gostei + 0
14/07/2005
Alex Maia
Falow.
Gostei + 0
14/07/2005
Beppe
Acho que quiseram dizer pra pegar o .bmp gerado, carregar num TBitmap e mandar pra Printer.Canvas.
Gostei + 0
15/07/2005
Motta
De qq forma grato amigos.
Gostei + 0
15/09/2010
Norberto Jesus
Gostei + 0
15/09/2010
Eduardo Marcolongo
No quickreport vc adiciona as bandas que vc quer, por exemplo, pageheader, detail, etc.No detail vc deve colocar qrlabel's
Depois codifique o evento onNeedData do quickreport1
moredata := false; if (max_linhas <= ffluxo.stringgrid1.rowcount) then begin qrdata.caption := ffluxo.stringgrid1.cells[0,max_linhas]; qranterior.caption:= ffluxo.stringgrid1.cells[1,max_linhas]; qrreceber.caption := ffluxo.stringgrid1.cells[2,max_linhas]; qrpagar.caption := ffluxo.stringgrid1.cells[3,max_linhas]; qrsaldo.caption := ffluxo.stringgrid1.cells[4,max_linhas]; if ((max_linhas > 0) and (max_linhas < (ffluxo.stringgrid1.rowcount-1))) then begin if strtofloat(stringreplace(ffluxo.stringgrid1.cells[1,max_linhas],'.','',[rfreplaceall])) < 0 then qranterior.font.color := clred else qranterior.font.color := clblack; if strtofloat(stringreplace(ffluxo.stringgrid1.cells[4,max_linhas],'.','',[rfreplaceall])) < 0 then qrsaldo.font.color := clred else qrsaldo.font.color := clblack; end; if max_linhas = (ffluxo.stringgrid1.rowcount-1) then begin qrreceber.font.style:= [fsbold]; qrpagar.font.style := [fsbold]; end; inc(max_linhas); moredata := true; end;
maxlinha é uma variavel inteira para utilizo para controlar o laço.Acredito que vc consiga utilizar para o listview tb.
Eduardo
Gostei + 0
15/09/2010
Norberto Jesus
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)