Ver Mensaje Individual
  #2  
Antiguo 09-06-2005
Avatar de Lepe
[Lepe] Lepe is offline
Miembro Premium
 
Registrado: may 2003
Posts: 7.424
Reputación: 29
Lepe Va por buen camino
En la ayuda de delphi tienes un ejemplo, busca "SaveToClipboardFormat, SetAsHandle example". A este ejemplo llegas desde "TBitmap.SaveToClipboardFormat"

Para cortar y pegar, busca en la ayuda sobre "Clipboard", la unidad en delphi es Clipbrd, añadiendolo a los uses de tu form, ya puedes consultar si hay una imagen en el portapapeles; sería algo así como : if Clipboard.Hasformat(
Código Delphi [-]
if (Clipboard.HasFormat(CF_BITMAP)) or
(Clipboard.HasFormat(CF_METAFILEPICT)) or
(Clipboard.HasFormat(CF_PICTURE)) then
//CF_BITMAP  A Windows bitmap graphic.
//CF_METAFILEPICT  A Windows metafile graphic.
//CF_PICTURE  An object of type TPicture.
begin
...
end;

Un saludo
__________________
Si usted entendió mi comentario, contácteme y gustosamente,
se lo volveré a explicar hasta que no lo entienda, Gracias.
Responder Con Cita