Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Conexión con bases de datos
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Conexión con bases de datos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 05-02-2011
ace2783 ace2783 is offline
Registrado
NULL
 
Registrado: ene 2011
Posts: 1
Poder: 0
ace2783 Va por buen camino
Abrir desde access un campo ole que tiene un .pdf

Tengo un formulario en delphi 7 con todo los campos de mi tabla de una base de datos access todo los campos se visualizan bien, excepto campo ole que es un archivo en pdf. necesito visualizar este campo y abrir el archivo de .pdf desde mi formulario en delphi.

Necesito introducir y extrar archivos pdf de la base de dato en access desde mi formulario en dephi.

Por favor como lo hago ?????
Responder Con Cita
  #2  
Antiguo 07-02-2011
Avatar de Ñuño Martínez
Ñuño Martínez Ñuño Martínez is offline
Moderador
 
Registrado: jul 2006
Ubicación: Ciudad Catedral, Españistán
Posts: 6.000
Poder: 25
Ñuño Martínez Tiene un aura espectacularÑuño Martínez Tiene un aura espectacular
Ahora mismo no recuerdo, pero creo que hay algún componente por ahí para visualizar archivos PDF. Si lo tienes almacenado como "BLOB" no debería resultarse difícil extraerlo y pasárselo ar componente de visualización, quizá utilizando un TStream de memoria como intermediario.
__________________
Proyectos actuales --> Allegro 5 Pascal ¡y Delphi!|MinGRo Game Engine
Responder Con Cita
  #3  
Antiguo 25-02-2011
Avatar de RICTAPIA5
RICTAPIA5 RICTAPIA5 is offline
Miembro
 
Registrado: mar 2010
Posts: 41
Poder: 0
RICTAPIA5 Va por buen camino
para guardarlo:

adoQrCandidatos.edit;
TBlobField(adoQrCandidatos.FieldByName('imsspdf')).LoadFromFile(OpenDialog1.FileName);
adoQrCandidatos.post;

para leerlo:
procedure TfrmGestionarCandidato.SpeedButton4Click(Sender: TObject);
var
St:Array [0..255] of char;
archivo : string;
begin
archivo := adoQrCandidatos.FieldByName('idCandidato').asstring+'.pdf';
TBlobField(adoQrCandidatos.FieldByName('imsspdf')).SaveToFile('c:\temp\'+archivo) ;
ShellExecute(Handle,'open',StrPCopy(St,'c:\temp\'+archivo),nil,nil,SW_SHOW);
end;
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Qué tiene de malo este código para cargar una imagen a access con ado ? Master23 Varios 8 17-07-2010 03:05:24
Agregar campo en una tabla access desde delphi Chogo Tablas planas 1 10-10-2007 21:22:42
Modificar campo tabla access desde delphi JuanHC Conexión con bases de datos 3 25-09-2006 13:15:02
Abrir desde un grid un campo Memo ramonibk Varios 10 07-07-2004 20:59:57


La franja horaria es GMT +2. Ahora son las 08:43:43.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi