Saber si hay algo en el portapapeles

[Angel.Matilla]

Tengo que preparar un menú típico Cortar / Copiar / Pegar. ¿Hay alguna forma de saber sin hay contenido en el portapapeles para activar o no las opciones correspondeinetes? Estuve viendo en un hilo una respuesta de ecfisa pero no sé si me valdría para lo que quiero.

[ecfisa]

Hola.

Un modo de saber lo que buscas es:

Código PHP:

#include <clipbrd.hpp>

...

  if ( Clipboard()->AsText == "" )
    ShowMessage("No hay nada");
  else
    ShowMessage("Hay algo"); 


Saludos

[[kuan-yiu]]

En Delphi tienes en la unidad 'Clipbrd' el típico:

Código Delphi [-]
Clipboard.AsText

Pero yo solo lo he utilizado de forma muy básica.

http://docs.embarcadero.com/products...Clipboard.html

[[escafandra]]

De forma general se puede averiguar si el Clipboard está vacío contando los formatos que pueda contener, sean texto u otra cosa, inclusive para los formatos personalizados:

bool IsClipBoardEmpty()
{
  bool Result = false;
  if(OpenClipboard(0)){
    Result = !CountClipboardFormats();
    CloseClipboard();
  }
  return Result;
}

Saludos.

[Angel.Matilla]

Gracias a todos por las ideas y disculpadme por el retraso.