Giga. No. 4, 2008 - Editorial Universitaria

16
CountClipboardFormat
Retorna el número de formatos asociados
a los datos en el Portapapeles.
Hablando de
formatos y recursos
Es necesario conocer los tipos de
formatos válidos para el Clipboard y
el consumo de los recursos del sistema
que éstos provocan. En el caso
de objetos gráficos y películas, la
acción de copiar y pegar puede tardarse
un poco según su tamaño y
cantidad. Cuando se programa en
aplicaciones particulares, el uso del
Clipboard debe tener en cuenta los
formatos y el consumo de los recursos
y conocer que en esos casos
puede haber datos almacenados
en diferentes formatos. Para ello,
el sistema facilita la técnica DELA-
YED RENDERING con los mensajes
WM_RENDERFORMAT y WM_REN-
DERALLFORMAT. El uso de estos
mensajes permite disminuir los
tiempos en la manipulación de
datos complejos.
La conversión de formatos es otra
de las características permitidas
cuando usamos el Clipboard, la cual
es suministrada por el sistema para
un grupo de formatos, y el programador
sólo tiene que preocuparse
por llamar a la función y pasar el
nuevo formato deseado, y si está en
el grupo definido, los resultados
serán los esperados, en la siguiente
tabla se muestran algunos de los
formatos válidos y su grupo de conversión.
[GiGA 4 / 2008]
softweriando
Existen otros formatos válidos muy
utilizados como el CF_BITMAP o el
Ventana de la aplicación
CF_METAFILEPICT que al igual que el
resto se convierten en manipuladores
del dato en cuestión, haciendo referencia
a éste mediante la función
GetClipboardData.
Entrando en materia
Estoy seguro que más de un programador
se ha preguntado cómo es que
el procesador de textos Word puede
representar muchos objetos almacenados
en el Portapapeles, así ocurre
con otras aplicaciones del paquete
Office. En el caso que nos ocupa dentro
de la misma aplicación mencionada
(WinWord) se puede mostrar el
Panel de Tareas (oprima Ctrl.+C dos
veces) y se mostrará a la
derecha la lista de objetos
que pasemos al Portapapeles.
Para montar una aplicación
particular sólo necesitamos
saber que existen
formatos válidos, que es
necesario un algoritmo para
trabajar y hacernos "dueños"
del Clipboard y muy rápido
se estará utilizando esta
importante herramienta que
se convierte en una interfaz
ideal entre aplicaciones.
Seguidamente se muestra
un pequeño ejemplo que
permite visualizar el contenido
del Clipboard con el
uso del desarrollador Delphi
versión 7.
Prepare una ventana con un
control MEMO y un botón
para la acción de ver el contenido
como se muestra en la figura:
Agregue la siguiente declaración en la
línea de las declaraciones privadas:
procedure VerElClipboard(var
msg: TWMDrawClipboard); message
WM_DRAWCLIPBOARD;
en el bloque de declaración del formulario
agregue:
visualizador: HWND;
y en la implementación inserte el
siguiente código:
procedure
TForm1.VerElClipboard(var msg:
TWMDrawClipboard);
var Formato: THandle;
texto: Pchar;
ClassName: array [0..255]
of char;
ownerwindow: HWND;
begin
if
isClipboardFormatAvailable(CF_TE
XT) then
begin
SetForegroundWindow(Form1.Handle
);
ownerwindow:=getclipboardowner;
openclipboard(form1.Handle);
Formato := getclipboarddata(CF_TEXT);
texto:=globallock(Formato);
setwindowtext(memo1.Handle,
texto);
end;
end;
En el evento OnClick del botón inserte: