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

Saludos

En la Paleta Dialog existe un componente OpenPictureDialog examinalo.
Para invocarlo OpenPictureDialog1.Execute

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

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.

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.

1.- Bienvenid@!
2.- Busca en los foros.
3.- Elige mejor los títulos.

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 eres dios!! jajajaajja muchisimas gracias