IClipboard.HasText

Синтаксис

HasText: Boolean;

Описание

Метод HasText возвращает признак наличия в буфере обмена текстовой информации.

Пример

Для выполнения примера предполагается наличие формы и расположенной на ней кнопки с наименованием "Button1".

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);

Var

Cl: Clipboard;

Begin

Cl := New Clipboard.Create;

If Cl.HasText Then

Debug.WriteLine(Cl.Text);

End If;

End Sub Button1OnClick;

После выполнения примера при нажатии на кнопку если в буфере обмена содержится текстовая информация, то она будет выведена в консоль среды разработки.

См.также:

IClipboard