Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.02.19;
Скачать: CL | DM;

Вниз

Буфер данных   Найти похожие ветки 

 
13   (2006-01-30 17:37) [0]

в программе находятся кнопки вырезать копировать и вставить
как сделать так чтобы они были недоступны если в буфере ничего нет и доступны если в буфере находятся данные


 
begin...end ©   (2006-01-30 17:50) [1]

SetClipboardViewer + WM_DRAWCLIPBOARD


 
13   (2006-01-30 18:23) [2]

а пример можно?
P.S. также используется Memo


 
Pit ©   (2006-01-30 21:56) [3]

Попробуй это
если нажмёш Button1, Button2 будет не доступна если в буфере нет текста, очисти буфер Button2  потом нажми Button1.
procedure TForm1.Button1Click(Sender: TObject);
var
hwd: hWnd;
begin
OpenClipboard(0);
if GetClipboardData(CF_UNICODETEXT) = 0 then
Button2.Enabled:= False;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
EmptyClipboard ;
end;


Смотри  GetClipboardData(UINT uFormat);
Parameters
uFormat
[in] Specifies a clipboard format. For a description of the standard clipboard formats, see Standard Clipboard Formats .


 
Набережных С. ©   (2006-01-31 08:10) [4]


> Pit ©   (30.01.06 21:56) [3]

Тогда уж IsClipboardFormatAvailable. Или Clipboard.HasFormat.



Страницы: 1 вся ветка

Текущий архив: 2006.02.19;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.034 c
6-1131122906
WebSQLNeeder
2005-11-04 19:48
2006.02.19
Как запретить что бы в WebBrowser вылетали окошки JavaScript? Или


15-1138315032
Стыдно
2006-01-27 01:37
2006.02.19
г/л в мл/м.куб


1-1137482024
RDA
2006-01-17 10:13
2006.02.19
Вставка апострофа во всех контролах


2-1138784272
dabreezy
2006-02-01 11:57
2006.02.19
Вопрос по TiniFile


15-1138191869
Pazitron_Brain
2006-01-25 15:24
2006.02.19
CDMA телефон