Копирование в буфер из разных обектов.

← →
stas_a (2002-08-21 10:28) [0]

Помогите !!! У меня на форме несколько компонентов Edit как зделать чтобы при нажатии на кнопку "копировать" копировался Выделенный текст.

← →
murza (2002-08-21 10:49) [1]

Я в BC++Builder 5 кладу на форму компонент TActionListи делаю New Standard Action... TEditCopy. После этого делаю например TToolButton на TToolBar и указываю ему в свойстве Action только что созданный TEditCopy. Причем она даже дизэблиться будет, если в контроле, имеющем фокус, не выделен текст.
А вообще Actionы - очень хорошая вещь. Рекомендую меню всегда делать с их помощью.

procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
TEdit(ActiveControl).CopyToClipboard;
end;

Обрати внимание, что это должна быть "графическая" кнопка, например, SpeedButton, чтобы Edit не потерял фокус ввода

Копирование в буфер из разных обектов. Найти похожие ветки