| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Как копировать в буфер обмена из Edit [D6, WinXP]

pound ©   (2006-06-08 19:50:00) 

Подскажите, как копировать, вставлять из буфера обмена в редактор Edit горячими клавишами, точнее как создать событие по нажатию горячих клавиш, чтобы можно было работать с буфером обмена.
 Заранее благодарю. Андрей.

---

Handle   (2006-06-09 10:44:00) [1]

private
   procedure WMHotkey( var msg: TWMHotkey ); message WM_HOTKEY;

procedure TForm1.FormCreate(Sender: TObject);
begin
if not RegisterHotkey(Handle, 1, MOD_ALT, VK_F9) then
 ShowMessage('Unable to assign Alt-Shift-F9 as hotkey.');
end;

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
UnRegisterHotkey( Handle, 1 );
end;

procedure TForm1.WMHotkey( var msg: TWMHotkey );
begin
 if msg.hotkey = 1 then
 begin
  SendMessage(Edit1.Handle, WM_PASTE, 0, 0);
 end;
end;

---

tButton   (2006-06-09 08:57:00) [2]

> Edit и сам по себе уже умеет работать с буфером обмена.

типа... edit1.CopyToClipboard, PasteFromClipboard, CutToClipboard
или их по другому зовут?

---

Юрий Зотов   (2006-06-08 23:01:00) [3]

> pound ©   (08.06.06 19:50)

Самый лучший способ - не делать ничего. Edit и сам по себе уже умеет работать с буфером обмена. Если ему не мешать, конечно.

---

GanibalLector   (2006-06-08 22:59:00) [4]

uses ClipBrd и вперед. Можно и на Api см. Clipboard Functions+F1

---

Наверх