Valew amigos pelas dicas, mas não deu certo para o que eu quero. Estou utilizando um componente DevExpress para resolver o problema. Obrigado.
Em 18/01/08, Adriano Santos (Yahoo) <[EMAIL PROTECTED]> escreveu: > > Dê uma olhada nesse artigo que publiquei e veja se ajuda. > http://www.devmedia.com.br/articles/viewcomp.asp?comp=1298 > > Adriano Santos > ---------------------------------------------------------- > Editor Técnico Revista ClubeDelphi > www.delphitodelphi.blogspot.com > www.devmedia.com.br > www.devmedia.com.br/clubedelphi/pagina.asp > > fabio giro respondeu: > > > > Peguei estas duas dicas na lista. > > > > try > > xlws.Shapes.AddPicture(logofname, LinkToFile, SaveWithDocument, 1, 1, > > 143, 32); > > except > > end; > > Onde: > > xlws é um objeto do tipo TExcelWorksheet > > logofname é uma variável que contem o path + o nome do jpg > > LinkToFile pode ser setado para 0 > > SaveWithDocument informa se a imagem deve ser salva no local de > > destino, sete ela para 1 > > os dois ultimos parametros, 143 e 32, correspondem as medidas que você > > quer que a imagem tenha na planilha > > ************************************************** > > www.devmedia.com.br/articles/viewcomp.asp?comp=1298&hl= > > > > Espero ter ajudado. > > > > Jorge Ericsson <[EMAIL PROTECTED] <jericssonsup%40gmail.com> > > <mailto:jericssonsup%40gmail.com>> escreveu: > > Olá amigos delphianos, > > > > Primeiramente desejo a todos do grupo um 2008 repleto de desafios e mais > > conhecimentos. > > Que o desejo de todos se realizem neste ano que se inicia. > > > > Pessoal, através de OleContainer eu atribuir dados em uma planinha e > > formatei os campos do jeito que precisava, mas não consegui acrescentar > na > > primeira linha da primeira coluna a logo do meu cliente. > > > > Alguém tem uma idéia de como faço isso automaticamente sem ter que ir na > > opção INSERIR IMAGEM ?: > > > > Obs.: Alguém utiliza o componente DevExpress cxSpreadBook ? > > > > []´s > > > > Jorge Ericsson S. Pinheiro > > Analista/Projetista de Sistemas > > Ericsson Sistemas e Soluções > > http://www.jericsson.com.br <http://www.jericsson.com.br> > > 61 9227.4785 / 3965.2992 / 3039.1768 > > Brasília - DF > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > --------------------------------- > > Abra sua conta no Yahoo! Mail, o único sem limite de espaço para > > armazenamento! > > > > [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.516 / Virus Database: 269.19.6/1230 - Release Date: > 17/01/2008 16:59 > > > > -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas]