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.
|