Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 18-11-2005
Otei Otei is offline
Registrado
 
Registrado: nov 2005
Posts: 7
Poder: 0
Otei Va por buen camino
duda, se puede? jeje

Buenas, estoy trabajando con una base de datos de access, y tengo imagenes en ella q delphi me las carga pero si deseo insertar un nevo dato desde delphi me da error xq el campo es null, hay alguna forma de q desde delphi se pueda hacer el tipico boton q te dice examinar y desde ahi elijes donde esta la foto para q en access se guarda la direccion o no se puede y lo unico seria escribir la direccion en el edit ??

Gracias
Responder Con Cita
  #2  
Antiguo 18-11-2005
Avatar de vtdeleon
vtdeleon vtdeleon is offline
Miembro
 
Registrado: abr 2004
Ubicación: RD & USA
Posts: 3.236
Poder: 23
vtdeleon Va por buen camino
Saludos

En la Paleta Dialog existe un componente OpenPictureDialog examinalo.
Para invocarlo OpenPictureDialog1.Execute
__________________
Van Troi De León
(Not) Guía, Code vB:=Delphi-SQL, ¿Cómo?
Viajar en el tiempo no es teóricamente posible, pues si lo fuera, ya estarían aqui contándonos al respecto!
Responder Con Cita
  #3  
Antiguo 18-11-2005
Otei Otei is offline
Registrado
 
Registrado: nov 2005
Posts: 7
Poder: 0
Otei Va por buen camino
esq los dialog nunca los he usado, use una vez los de colores pero no me acuerdo como era.

OpenPictureDialog1.Execute;
al poner lo q me has dicho, si que se abre para buscar la imagen pero luego, para q se carge en el image no se como ponerlo y mucho menos como guardar la direccion de la ubicacion de la foto en la base de datos de access.

image1.Picture := opendialog...
esq nose ni por donde agarrarlo
Responder Con Cita
  #4  
Antiguo 18-11-2005
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.021
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Puedes buscar por los foros, se ha hablado muuuuuchas veces sobre eso. También puedes poner el cursor encima de opendialog y pulsar F1 (ayuda) , ahí te saldrán ejemplos. También puedes mirar los ejemplos/demos que trae el delphi, etc. etc. etc.
Responder Con Cita
  #5  
Antiguo 18-11-2005
Avatar de jachguate
jachguate jachguate is offline
Miembro
 
Registrado: may 2003
Ubicación: Guatemala
Posts: 6.254
Poder: 27
jachguate Va por buen camino
Hola Otei.

En primer lugar, bienvenido(a) al clubdelphi.

Te invito a leer la guia de estilo.

Allí verás por que un título como el que has puesto a este post resulta inaceptable en estos foros. Espero que tomes en cuenta esta llamada de atención amistosa antes de abrir un nuevo hilo y te tomes el tiempo en buscar un título y un planteamiento adecuado para tus situaciones, pues eso va en beneficio tuyo, en primer lugar, y en beneficio de la comunidad que compone el clubdelphi.

Hasta luego.
__________________
Juan Antonio Castillo Hernández (jachguate)
Guía de Estilo | Etiqueta CODE | Búsca antes de preguntar | blog de jachguate
Responder Con Cita
  #6  
Antiguo 19-11-2005
[Gunman] [Gunman] is offline
Miembro
 
Registrado: dic 2004
Ubicación: Pedreguer.
Posts: 355
Poder: 20
[Gunman] Va por buen camino
1.- Bienvenid@!
2.- Busca en los foros.
3.- Elige mejor los títulos.
__________________
l2prog.co.nr
Responder Con Cita
  #7  
Antiguo 19-11-2005
Avatar de dec
dec dec is offline
Moderador
 
Registrado: dic 2004
Ubicación: Alcobendas, Madrid, España
Posts: 13.107
Poder: 34
dec Tiene un aura espectaculardec Tiene un aura espectacular
Hola,

Código Delphi [-]
uses
  Dialogs, ExtDlgs;

function DialogoParaElegirUnaImagen : string;
var
  dlg: TOpenPictureDialog;
begin
  // Creamos un "TOpenPictureDialog".
  //
  dlg := TOpenPictureDialog.Create(nil);
  //
  with dlg do begin
    // Cambiamos algunas propiedades
    // del "TOpenPictureDialog", véase
    // la ayuda de este componente para
    // saber de sus propiedades y tal.
    //
    InitialDir := 'C:\';
    DefaultExt := 'jpg';
    Options := [ofFileMustExist];
    Title := 'Elige una imagen.';
    //
    try
      // Mostramos el diálogo al usuario...
      //
      if Execute then
        // y, si el usuario elige una imagen...
        Result := dlg.FileName;
    //
    // Y, finalmente...
    //
    finally
      dlg.Free; // Ciao! "TOpenPictureDialog".
    end;
  end; // Final del "with dlg do begin..."
end;

// Ejemplo de llamada a la función anterior
//
procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowMessage( DialogoParaElegirUnaImagen );
end;
__________________
David Esperalta
www.decsoftutils.com
Responder Con Cita
  #8  
Antiguo 19-11-2005
Otei Otei is offline
Registrado
 
Registrado: nov 2005
Posts: 7
Poder: 0
Otei Va por buen camino
David eres dios!! jajajaajja muchisimas gracias
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

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


La franja horaria es GMT +2. Ahora son las 13:34:55.


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