Архив исходников программ, модулей и компонентов на Delphi


Начальная страница

Поиск по базе



Операционная система
Настройка приложения
Взаимодействия приложений
Файлы и директории
Строки и символы
Математика
Базы данных
Интернет и сеть
Мультимедиа
Аппаратная часть
VCL
Другие разделы [0]
 

Количество записей в базе - 537
Сегодня добавлено – 0

Взаимодействие с ОС



Вернуться к списку функций
 Очистка буфера обмена

 Прислал: Lucifer ( 6 октября 2004 г. )
©  http://www.delphiworld.narod.ru/
 Описание:
Процедура позволяет очистить содержимое буфера обмена.

Код процедуры был взят на сайте: http://www.delphiworld.narod.ru/
(http://www.delphiworld.narod.ru/base/clipbrd_to_file.html) адаптирован под мои нужды.

P.S. На всякий случай: я не претендую на авторство данного кода, я его просто привёл к виду, который мне больше подходил. В эту базу я его выложил исходя из предположения, что не каждый, кому понадобится такая процедура знает вышеуказанный адрес или обратится туда (сам долго искал иные способы).

 Зависимости:
по идее стандартные модули

 Ограничения:
опробовал в Windows98 Delphi 7

 Исходный текст:
{ **** UBPFD *********** by http://kladovka.net.ru/delphibase/ ****
>> Очистка буфера обмена

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

Код процедуры был взят на сайте: http://www.delphiworld.narod.ru/
(http://www.delphiworld.narod.ru/base/clipbrd_to_file.html) адаптирован под мои нужды.

P.S. На всякий случай: я не претендую на авторство данного кода, я его просто привёл к виду, который мне больше подходил. В эту базу я его выложил исходя из предположения, что не каждый, кому понадобится такая процедура знает вышеуказанный адрес или обратится туда (сам долго искал иные способы).

Зависимости: по идее стандартные модули
Автор:       Lucifer, _lucifer_@ukr.net
Copyright:   http://www.delphiworld.narod.ru/
Дата:        6 октября 2004 г.
***************************************************************** }

procedure ClearClipBoard;
begin
 OpenClipBoard(0);
 EmptyClipboard;
 CloseClipBoard;
end;

 Пример использования:
ClearClipBoard;


Вернуться к списку функций

Наверх ▲