Foros Club Delphi - Saber si hay algo en el portapapeles

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- C++ Builder (https://www.clubdelphi.com/foros/forumdisplay.php?f=13)

- - Saber si hay algo en el portapapeles (https://www.clubdelphi.com/foros/showthread.php?t=95022)

Angel.Matilla

19-01-2021 11:21:53

Saber si hay algo en el portapapeles

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

19-01-2021 12:27:19

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

19-01-2021 12:30:57

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

19-01-2021 23:02:35

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:

Código:

bool IsClipBoardEmpty()

{

  bool Result = false;

  if(OpenClipboard(0)){

    Result = !CountClipboardFormats();

    CloseClipboard();

  }

  return Result;

}

Saludos.

Angel.Matilla

29-01-2021 11:35:56

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

La franja horaria es GMT +2. Ahora son las 21:25:51.