Ver Mensaje Individual
  #2  
Antiguo 15-11-2004
Avatar de Dantael
Dantael Dantael is offline
Miembro
 
Registrado: nov 2003
Posts: 50
Reputación: 21
Dantael Va por buen camino
Talking Prueba esto

Por que no utilizas un openpicturedialog te doy un ejemplo: el primer botón obtiene la imagen de un archivo, y se guarda la ruta donde se encuentra el archivo en el openpicturedialog1.FileName, el segundo botón iguala u obtiene la misma imagen por que la ruta todavia se encuentra guardada en el openpicturedialog1 y muestra el preview en el quick report de esta forma yo lo probe y me no me puso la imagen en negro inclusive al imprimirla, (use delphi 5). Si la imagen la tienes ya en la forma y el usuario no la puede seleccionar revisa que el formato de imagen que estas utilizando sea soportado por el image. Procura usar .bmp y en algunos casos .jpg.

Saludos

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
openpicturedialog1.Execute;
image1.Picture.LoadFromFile(openpicturedialog1.FileName);
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
qrimage1.Picture.LoadFromFile(openpicturedialog1.FileName);
quickrep1.preview;
end;
Responder Con Cita