Ver Mensaje Individual
  #7  
Antiguo 20-05-2004
sanxpue sanxpue is offline
Miembro
 
Registrado: jul 2003
Posts: 196
Reputación: 23
sanxpue Va por buen camino
Talking Haber si te funciona con esto

Primero si vas a usar with quitale Image. a las propiedades que le
pertenezca o de plano no uses with

Segundo hay que ver si Z no es una unidad de red por que luego cuesta
trabajo llamarlas por que el servidor puede estar trabajando en otro proceso

Si hasta ahi vamos bien entonces

Código Delphi [-]
procedure TForm1.ToolButton20Click(Sender: TObject);
begin
  image := timage.Create(form1);
  try
    begin
       with image do
       begin
         try
           Picture.LoadFromFile('Z:\Pedro\rave\definitivo\iconos\camera.bmp');
         except
           showmessage('direccion no');
         end;
         
           Parent := Self;
           Visible := true;
           Stretch := True; //para que se acode el image por que puedes
                             //andar creando pero su tamaño puede ser width = 0 y 
                            //height = 0
           
       end;
    end;
  except
    showmessage('no lo crea');
  end;
end;
__________________
saludos desde Puebla Mexico..
[email protected]
"como siempre a sus ordenes y siempre con buena cara"
'lolita me excitas, perversa piel de melocotón'
Responder Con Cita