Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 19-08-2007
Avatar de enecumene
[enecumene] enecumene is offline
Miembro de Oro
 
Registrado: may 2006
Ubicación: Santo Domingo, Rep. Dom.
Posts: 3.040
Poder: 21
enecumene Va por buen camino
Cargar un Timage con ruta en bases de datos

Hola Amigos nuevamente vuelvo con esta consulta, he intentado sin exito con seguir esta informacion buscando en el foro, hay mucha informacion sobre cargar un timage desde la base de datos en campos blob, etc, etc, pero nada me ha servido espero que estedes me puedan ayudar con esto. sucede lo siguiente, trabajo con base de datos access, hay un campo que se llama "fondo" de tipo texto donde esta almacenado la ruta de la imagen .bmp, hasta ahi todo bien, el form principal donde quiero que se cargue la imagen es tipo MDI, quisiera que al iniciar la aplicacion la imagen se cargue automaticamente halando la ruta desde la base de datos, he intentado este codigo y unas cuantas mas pero que va no me funciona, ahi les va:

Código Delphi [-]
procedure Tincio.FormCreate(Sender: TObject);
var
Imagen: string;
begin
Imagen:=mbdSistema.FieldValues['fondo'];
mbdSistema.Active:=True;
Fondo.Picture.Bitmap.LoadFromFile(Imagen);
end;

que estoy haciendo mal?

saludos...
__________________

Mi BLOG - ¡Joder, leanse la guia de estilo!
Las Palabras son enanas, los ejemplos gigantes.
Responder Con Cita
  #2  
Antiguo 20-08-2007
Avatar de xEsk
[xEsk] xEsk is offline
Miembro Premium
 
Registrado: feb 2006
Posts: 454
Poder: 19
xEsk Va por buen camino
El problema concretamente es...? No se muestra la imagen? Da un error al intentar cargar la imagen?

El "Fondo" es un TImage?

Intentas ponerle un fondo en la parte donde se abrirán las ventanas MDI? Si es así, hay varias formas de lograrlo, aquí un ejemplo: http://www.delphi3000.com/articles/article_780.asp?SK=

Saludos.

Última edición por xEsk fecha: 20-08-2007 a las 02:05:11.
Responder Con Cita
  #3  
Antiguo 20-08-2007
Avatar de enecumene
[enecumene] enecumene is offline
Miembro de Oro
 
Registrado: may 2006
Ubicación: Santo Domingo, Rep. Dom.
Posts: 3.040
Poder: 21
enecumene Va por buen camino
gracias xEsk por tu sugerencia pues ahora mismo acabo de resolver mi problema pues el orden y la ubicacion del codigo estaban mal, lo puse en el evento Onshow del form y el codigo quedo asi:

Código Delphi [-]
procedure Tincio.FormShow(Sender: TObject);
var
Imagen: string;
begin
mbdSistema.Active:=True;
Imagen:=mbdSistema.FieldValues['fondo']; <--Aqui cambien el orden, despues de.
Fondo.Picture.Bitmap.LoadFromFile(Imagen);

end;

y ahora me funciona de pelos. Gracias.

Saludos...
__________________

Mi BLOG - ¡Joder, leanse la guia de estilo!
Las Palabras son enanas, los ejemplos gigantes.
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
Cargar una imagen jpg en un TImage giropau C++ Builder 7 19-05-2007 07:11:07
Cargar imagen en un TImage luxus OOP 3 16-02-2007 17:06:23
cargar una foto en Timage omy Gráficos 5 09-04-2005 03:50:08
Cargar diferente bases de datos Nbull SQL 3 21-12-2004 15:38:39
Cargar *.jpg en un TImage esocrates Gráficos 5 13-05-2003 19:56:53


La franja horaria es GMT +2. Ahora son las 12:47:29.


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