Ir para conteúdo
Fórum Script Brasil
  • 0

(Resolvido) [Dúvida] Como Instalar o EDBImage 1.6


Jore

Pergunta

Olá amigos,

Bom, sou muito iniciante em Delphi e estou tendo problemas com campo Blob no Firebird.

Uso Delphi 7 com Firebird 2.1 com um campo BLOB para a imagem, Conexão Interbase com, (1 IBtable, 1 IBTransaction, 1 IBDatabase e 1 Datasource) Um Data Modulo.

Fiquei sabendo de um componente chamado EDBImage v1.6 que 'seria ' minha salvação...Bom meu problema é o seguinte não sei como instalá-lo e por isso estou aqui para ver se alguém que já o tenha intalado possa me ajudar com mais esta dica.

Link para o comentário
Compartilhar em outros sites

10 respostass a esta questão

Posts Recomendados

  • 0

EDBImg16 para o QuickReport Delphi 3, 4, 5, 6, 7

http://www.torry.net/db/visible/db_images/EDBImg16.zip

»Install

0- Before install, remove previous versions of EDBImage (and QREDBImage)

Choose Component | Install Packages..., select EDBimage and hit Remove.

(delete or rename: edbImage.*, qrEDBimage.* )

1-Open VCLser40.dpk (Dephi4), VCLser50.dpk (Delphi5), VCLser60.dpk (Delphi6)

or VCLser70.dpk (Delphi7)

Menu Project-Options in Directory/Conditionals tab

set OutputDirectory to C:\Windows\System (or your system directory)

Compile it. DO NOT install, it is just a runtime package.

2-Open DCLser40.dpk (Dephi4), DCLser50.dpk (Delphi5), DCLser60.dpk (Delphi6)

or DCLser70.dpk (Delphi7)

Compile it, then Install It. This is the Designtime package.

3- Enjoy!!

abraço

Link para o comentário
Compartilhar em outros sites

  • 0

Amigo Jhonas deu erro aqui...veja como eu fiz:

1 Abri o meu Delphi 7;

2 Abri a pasta que esta o edbimg16 e executei o VCLser70.dpk (Delphi7);

Feito isso abre uma telinha chamada Package - VCLser70.dpk

3 Fui em Projeto / Opções e abri a aba Directory/Conditionals e em Output Directory

indiquei o meu diretório C:\Windows\System (os outros campos tem que preencher?) dei ok na tela e voltei a tela Package - VCLser70.dpk;

4 Na tela Package - VCLser70.dpk cliquei em Compile e deu o erro de The are erros.

5 Não continuei pois já deu esse erro...

Pode me ajudar melhor? Obrigado!!

Link para o comentário
Compartilhar em outros sites

  • 0
»Install

0 - antes de instalar, remova versões prévias de EDBImage (e QREDBImage)

Vá em Component | Install Packages..., selecione EDBimage e Remova.

(apague ou renomeie: edbImage. *, qrEDBimage. *)

1 - Abra VCLser40.dpk (Dephi4), VCLser50.dpk (Delphi5), VCLser60.dpk (Delphi6)

ou VCLser70.dpk (Delphi7)

no Menu Project-Options na aba Directory/Conditionals

deixe OutputDirectory fixo para C:\Windows\System (ou seu diretório de sistema)

Compile. Não instale, é um pacote de Runtime.

2 - Abra DCLser40.dpk (Dephi4), DCLser50.dpk (Delphi5), DCLser60.dpk (Delphi6)

ou DCLser70.dpk (Delphi7)

Compile, então Instale. Este é o pacote de Designtime.

3 - Desfrute

abraço

Link para o comentário
Compartilhar em outros sites

  • 0

Jhonas desculpa a demora em responder é que eu estava trabalhando...

Bom, ainda tá dando o erro veja:

[Error] uEDBR.pas(5): 'INTERFACE' expected but identifier 'PLEASE' found

Acho que tenho que indicar este arquivo que esta na pasta porém não sei o campo.

Você chegou a fazer a instalação ou só leu como se faz e postou aqui pra mim?

Estou perguntando porque acho que esta faltando algo na hora de instalar.

Obrigado! Mesmo!!

Link para o comentário
Compartilhar em outros sites

  • 0
Bom, ainda tá dando o erro veja:

[Error]uEDBR.pas(5): 'INTERFACE' expected but identifier 'PLEASE' found

Deixe a linha xcomo comentario

unit uEDBR;

{$I Definitions.inc}

//PLEASE, read Readme.txt before continue, it is VERY important. After reading remove this line. Thanks you

//to disable GraphicEx from Mike Lischke comment next line (put // at the beginning)
{$DEFINE GraphicEX}
{$IFDEF GraphicEX}
{$I GraphicConfiguration.inc}
{$ENDIF}
Depois ele vai reclamar do arquivo GraphicConfiguration.inc que não foi encontrado copie o código abaixo no bloco de notas e renomeie para GraphicConfiguration.inc e coloqu dentro da pasta desse componente
//---------------------------------------------------------------------------------------------------------------------- 
// This file is part of the image library GraphicEx (www.lischke-online.de/Graphics.html). 
// 
// In this configuratin file you can determine which parts of the library are to be compiled. 
// This is in particular important for LZW compression code for which Unisys owns a patent. 
// If you want to use LZW decoding then you have to make a deal with Unisys. Don't make me 
// responsible for using the code. 
// Other configuration options include to limit the number of available image formats to 
// save memory, if necessary.  
// 
// (c) Copyright 1999, 2000  Dipl. Ing. Mike Lischke (public@lischke-online.de). All rights reserved. 
// 
// This package is freeware for non-commercial use only. 
// Contact author for licenses (shareware@lischke-online.de) and see License.txt which comes with the package. 
//---------------------------------------------------------------------------------------------------------------------- 

{.$define UseLZW} // if this is not defined (default) then neither the GIF format nor the 
                  // LZW compression decoder (e.g. for TIFF LZW compression) is available 

// Pick your preferred image formats here or leave them all enabled. By disabling 
// certain formats which are not of interest you can save some memory. 
{$define SGIGraphic}             // *.bw, *.rgb, *.rgba, *.sgi images are supported 
{$define AutodeskGraphic}        // *.cel, *.pic images 
{$define TIFFGraphic}            // *.tif, *.tiff images 
{$define TargaGraphic}           // *.tga, *.vst, *.icb, *.vda, *.win images 
{$define PCXGraphic}             // *.pcx, *.pcc, *.scr images 
{$define PCDGraphic}             // *.pcd images 
{$define PortableMapGraphic}     // *.ppm, *.pgm, *.pbm images 
{$define CUTGraphic}             // *.cut (+ *.pal) images 
{$define GIFGraphic}             // *.gif images 
{$define RLAGraphic}             // *.rla, *.rpf images 
{$define PhotoshopGraphic}       // *.psd, *.pdd images 
{$define PaintshopProGraphic}    // *.psp images 
{$define PortableNetworkGraphic} // *.png images 
{$define EPSGraphic}             // *.eps images 

// adjust dependent definitions 
{$ifndef UseLZW} {$undef GIFGraphic} {$endif} 
{$ifndef TIFFGraphic} {$undef EPSGraphic} {$endif}

Depois ele vai reclamar que não foi encontrado o arquivo GraphicEx.dcu

no link voce vai encontrar o GraphicEx.pas para poder gerar o GraphicEx.dcu

http://files.codes-sources.com/fichier.asp...pas&lang=en

OBS: Ou voce tem essa mão de obra ou procura na net outro pacote completo desse componente

abraço

Link para o comentário
Compartilhar em outros sites

  • 0

Jhonas, primeiro quero dizer que estou muito agradecido por toda a ajuda!

Criei uma pasta com tutorial e todos os arquivos necessários posso postar aqui um link para Download?

Editado por Jore
Link para o comentário
Compartilhar em outros sites

  • 0
Criei uma pasta com tutorial e todos os arquivos necessários posso postar aqui um link para Download?

pode sim .... para que outros colegas possam usa-lo

abraço

Obrigado!

Segue abaixo os links, escolha uma opção para baixar:

Clique aqui e aprenda a instalar o EBDImage - Tutorial mais os arquivos necessários

Este tutorial só foi possivel graças ao amigo Jhonas. Obrigado!

Editado por Jore
Link para o comentário
Compartilhar em outros sites

  • 0

Olá! Para instalar o componente EDBImage v1.6 em seu ambiente Delphi 7, siga os seguintes passos:

Baixe o arquivo zip contendo o componente EDBImage v1.6 de um site confiável.
Descompacte o arquivo zip em uma pasta temporária.
Abra o Delphi 7 e abra o pacote do componente (arquivo com extensão ".dpk") através do menu "Component" -> "Install Packages".
Na janela "Package Load Warning", selecione "Load".
Na janela "Package editor", selecione "Compile" e em seguida "Install".
Na janela "Component Install", selecione a opção "Add to palette" e clique em "OK".
Na janela "Component" -> "Install packages", certifique-se de que o pacote do componente EDBImage está selecionado e clique em "Close".
Agora, você poderá encontrar o componente EDBImage na paleta de componentes do Delphi.
Para utilizar o componente EDBImage, siga os seguintes passos:

Adicione o componente EDBImage em seu formulário.
Associe o componente EDBImage ao campo BLOB da sua tabela.
Carregue a imagem no componente EDBImage através do método "LoadFromBlob".
Salve a imagem no banco de dados através do método "SaveToBlob".
Espero que isso ajude a resolver o seu problema. Caso tenha mais dúvidas, fique à vontade para perguntar!

Autocad 2019 crack

animbot crack

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,5k
×
×
  • Criar Novo...