[delphi-br] Imprimir Imagem

Thu, 04 May 2006 10:21:29 -0700

Boa tarde ..

Alguem tem alguma solução ou dica ... estou tentando imprimir alguns codigos
de barras e na hora que imprimir a imagem fica muito pequena .. verifiquei
inumeras propriedades e nad de aumentar a figura ..

Estou imprimir via .. Canvas ..

Segue a Rotina ..

Printer.Canvas.Pen.Width := 5;
Printer.Canvas.Draw(900,170,Image1.Picture.Graphic);

Estou gerando o codigo gerado para uma Image e apos mando imprimir !!!


Grato


Erivaldo
----- Original Message -----
From: "Cleiton" <[EMAIL PROTECTED]>
To: <delphi-br@yahoogrupos.com.br>
Sent: Thursday, May 04, 2006 1:07 PM
Subject: [delphi-br] Re: Baixa De Contas A Pagar -> Filipe Belchior


> Oi Filipe...
>
> Valeu pela sugestão. Vou tentar fazer assim e depois te digo se deu certo.
>
>
> ----- Original Message -----
> From: "Filipe Belchior" <[EMAIL PROTECTED]>
> To: <delphi-br@yahoogrupos.com.br>
> Sent: Wednesday, May 03, 2006 11:15 AM
> Subject: [delphi-br] Re: Baixa De Contas A Pagar
>
>
>>
>> Cleiton,
>>
>> Eu usei o componente Listview que vem no delphi, uso na
>> mesma situação que vc deseja... Seguinte:
>>
>> altere as seguintes propriedades:
>>
>> Checkboxes = true
>> ReadOnly = true
>> RowSelect = true
>> ViewStyle = true
>>
>> e ainda adicione colunas, clicando duas vezes sobre o componente.
>>
>> Para pegar informações do componente eu use o seguinte algoritmo:
>>
>>
>>    if slItensBaixa <> nil then
>>            slItensBaixa.Free;
>>    slItensBaixa := TContaList.Create;
>>
>>        for iI := 1 to ListView1.Items.Count do
>>          if ListView1.Items[iI-1].Checked then begin
>>              idConta := StrToInt( ListView1.Items[iI-1].SubItems[4] );
>>          slItensBaixa.Add( TContaControle.getInstance.getConta( idConta
>> ) );
>>        end;
>>
>>
>> Sobre as classes TContaList e TContaControle, são minhas classes de
>> negócio.
>>
>> <http://br.groups.yahoo.com/group/delphi-br/message/154147>
>> FILIPE BELCHIOR
>> Tecnólogo de Informática
>> Multibrands Consultoria em Tecnologia
>> www.multibrands.com.br
>>
>>
>>
>>
>>
>> _______________________________________________________
>> Novo Yahoo! Messenger com voz: Instale agora e faa ligaes de graa.
>> http://br.messenger.yahoo.com/
>>
>>
>
>
> --
> Esta mensagem foi verificada pelo sistema de antivrus e
> acredita-se estar livre de perigo.
>
>
>
> --
> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
>
>
>
> Links do Yahoo! Grupos
>
>
>
>
>
>
>
>
>
>
>
> --
> No virus found in this incoming message.
> Checked by AVG Free Edition.
> Version: 7.1.385 / Virus Database: 268.5.1/328 - Release Date: 01/05/2006
>
>



--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

<*> Para ver as mensagens antigas, acesse:
    http://br.groups.yahoo.com/group/delphi-br/messages

<*> Para falar com o moderador, envie um e-mail para:
    [EMAIL PROTECTED]


Yahoo! Grupos, um serviço oferecido por:
PUBLICIDADE

Links do Yahoo! Grupos

Responder a