Ver Mensaje Individual
  #1  
Antiguo 09-05-2008
Avatar de CarlosHernandez
CarlosHernandez CarlosHernandez is offline
Miembro
 
Registrado: oct 2003
Posts: 139
Reputación: 21
CarlosHernandez Va por buen camino
Question problema al carga imagen desde servidor

hola a todos los foristas.

Hice un sistema en delphi 6 con firebird 2.0. guardo los datos de personal en mi bdd y tomo una fotografia on una web cam y la almaceno el jpg en una carpeta y para buscarlo llamo la imagen desde la misma carpeta.

codigo para buscar la foto:

Código Delphi [-]
if FileExists('y:\Source\Picturedata\'+edit1.Text+'.jpg') then     begin
    OpenPictureDialog1.FileName:='y:\Source\Picturedata\'+edit1.Text+'.jpg';
     Image1.Picture.LoadFromFile(OpenPictureDialog1.FileName);
        end else begin
     OpenPictureDialog1.FileName:='';
     image1.Picture:=nil;
     end;

codigo para guardarla:

Código Delphi [-]
if OpenPictureDialog1.FileName<>'' then begin
 jp := TJPEGImage.Create;
  try
    with jp do
    begin
      Assign(Image1.Picture);
      SaveToFile('y:\Source\Picturedata\'+edit1.Text+'.jpg')
    end;
  finally
    jp.Free;
  end;

en donde 'y:' es una unidad de red que creé, es decir es una carpeta en el servidor y lo tomo cmo una unidad de disco.

el problema radica en que cuando quiero utilizar el sistema sin haber abierto ninguna unidad de red a la maquina de donde tengo mi bdd, intento guarda o abrir la foto desde el sistema me da un error que no puede crearla ni mostrarla. y con el mismo sistema abierto abro la unidad de red y le doy guardar o buscar y lo realiza satisfactoriamente. sera que el codigo no el correcto o me falta activar algo????

por cierto la base de datos si se conecta sin ningun problema.
__________________
begin
Elverdugo79@hotmail.com
end;
Responder Con Cita