![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Paste
Vazelin © (2006-09-13 16:53:00)Здарова, как можно симулировать нажатие paste в delphi? то есть достать из буффера данные и пастнуть и куда нибуть автоматически
default (2006-09-13 19:02:00) [1]WM_PASTE сообщение есть
IceBeerg (2006-09-13 18:31:00) [2]Извиняюсь за ошибку
SendMess ageну илиPostMessage
IceBeerg (2006-09-13 18:24:00) [3]
SendMessege(<хендел принимающего окна>,wm_keydown,...и т.д. см. в "Win32s Programmer's Reference" или MSDN или поиск рулит...
Vazelin (2006-09-13 18:13:00) [4]wm_keydown + help
а можно пример, а то я ничего не нашел.
IceBeerg (2006-09-13 17:59:00) [5]Vazelin (13.09.06 17:56) [4]
wm_keydown + help
Vazelin (2006-09-13 17:56:00) [6]Cпасибо конечно, но я имел ввиду paste в каком нибуть другом окне, типа notepad
default (2006-09-13 17:07:00) [7]хотя тебе достоточно, возможно, навроде Edit1.PasteFromClipboard
но и от этих знаний не пострадаешь:)
default (2006-09-13 17:03:00) [8]uses Clipbrd;
procedure TForm1.Button1Click(Sender: TObject);
begin
Clipboard.AsText := 'Засунули текст в буфак';
Edit1.PasteFromClipboard; // кинули текст из буфака в едит
Clipboard.Clear; // очистили буфак
Caption := Clipboard.AsText; // получили значение буфака, чисто
// ибо предыдущей строкой мы его отчистили
end;
я даже раскошелился на пример тебе:)
default (2006-09-13 16:57:00) [9]Clipboard+F1