Как занести в буффер
От: VlastV  
Дата: 22.07.02 06:47
Оценка:
Здраствуйте, уважаемые програмисты.
Я работаю в среде Borland C++ Builder 6, уровень: новичек.
Вот у меня есть на форме Form1 кнопка Button1 и поле ввода Edit1. Мне надо чтоб при нажати на кнопку Button1 (onClick), данные из Edit1->Text занеслись в буффер обмена (buffer), чтоб я мог в другом приложении просто нажать на кнопку вставить.
Заранее спасибо.
Re: Как занести в буффер
От: Аноним  
Дата: 22.07.02 07:09
Оценка:
Здравствуйте VlastV, Вы писали:

VV>Здраствуйте, уважаемые програмисты.

VV>Я работаю в среде Borland C++ Builder 6, уровень: новичек.
VV>Вот у меня есть на форме Form1 кнопка Button1 и поле ввода Edit1. Мне надо чтоб при нажати на кнопку Button1 (onClick), данные из Edit1->Text занеслись в буффер обмена (buffer), чтоб я мог в другом приложении просто нажать на кнопку вставить.
VV>Заранее спасибо. :shuffle:

1) Edit1->CopyToClipboard();
Вставляет в буфер обмена выделенный текст.

2) Если не хочется связываться с выделениями (гы, каламбур)
Сlipboard()->SetTextBuf(Edit1->Text.c_str());
Re: Как занести в буффер
От: vladsm Россия  
Дата: 22.07.02 07:10
Оценка: 6 (1)
Здравствуйте VlastV, Вы писали:
...

Ваш вопрос к форуму, в котором обсуждаются конструкции языков C/C++ никакого отношения не имеет. Содержательный ответ на Ваш вопрос гораздо быстрее дадут в форумах WIN API (понять его Вам будет посложнее) и Delphi & Builder (это будет то, что вам нужно и очень просто ). Простите за воспитательную речь, просто у меня автомодерирование не работает
Re: Как занести в буффер
От: Song Россия http://forum.sources.ru
Дата: 23.07.02 05:46
Оценка:
Здравствуйте VlastV, Вы писали:

VV>Здраствуйте, уважаемые програмисты.

VV>Я работаю в среде Borland C++ Builder 6, уровень: новичек.
VV>Вот у меня есть на форме Form1 кнопка Button1 и поле ввода Edit1. Мне надо чтоб при нажати на кнопку Button1 (onClick), данные из Edit1->Text занеслись в буффер обмена (buffer), чтоб я мог в другом приложении просто нажать на кнопку вставить.
VV>Заранее спасибо.
Uses ..., ClipBoard, ....

Procedure TForm1.Button1Click(Sender:TObject);
Begin
 ClipBoard.AsText:=Edit1.Text;
End;
Прежде чем сказать "Невозможно" подумай прав ли ты?
 
Подождите ...
Wait...
Пока на собственное сообщение не было ответов, его можно удалить.