Ver Mensaje Individual
  #3  
Antiguo 13-11-2003
Tonio Tonio is offline
Miembro
 
Registrado: may 2003
Ubicación: Logroño
Posts: 111
Reputación: 22
Tonio Va por buen camino
Perdona por ser demasiado farragoso, voy a tratar de explicarme mejor.
Tengo una aplicación.
Creo un bitmat con la pantalla de presentación de la aplicación, con éste código:

procedure TfAgenda6.GrabaPantalla(Sender: TObject);
var
imgWindow: TBitmap;
begin
imgWindow := GetFormImage;
try
Clipboard.Assign(imgWindow);
finally
imgWindow.Free;
end;
imgWindow := TBitmap.Create;
try
imgWindow := fAgenda6.GetFormImage;
imgWindow.SaveToFile('c:\Agenda\Fondo.bmp');
finally
imgWindow.Free;
end;
end;
Esta pantalla tiene un calendario y varios RichEdit con anotaciones.
Pues bien, en el bitmap Fondo.Bmp, no se ven las notas que están escritas en los RichEdit, es decir salen en el bitmap como si estubieran en blanco, todo lo demás si sale y yo deseo que ese .Bmp sea el fondo del escritorio, una forma de recordar las notas continuamente.
No se si ahora me habré explicado mejor.
Gracias nuevamente.
Tonio.
Responder Con Cita