Скачать: CL | DM;

Копирование текста(в буфер) в WebBrowser   Найти похожие ветки 

← →
ultracrash ©   (2004-04-21 14:31) [0]

Уважаемые МАСТЕРА, как можно сделать, что бы в моем веб-браузере, при выделении текста, нажатии правой кнопки мыши(появлении окна копирование)можно было бы занести выделенный текс в буфер.
Если можно то киньте сам код.....

---

← →
easy ©   (2004-04-21 14:50) [1]

uses ActiveX;

...

procedure TForm1.Button1Click(Sender: TObject);
begin
 WebBrowser1.OleObject.document.selection.createRange().execCommand("Copy");
end;

initialization
 OleInitialize(nil);

finalization
 OleUninitialize;

---

← →
Piter ©   (2004-04-21 19:24) [2]

Хм, ну по клику правой кнопки мыши вылезает контекстное меню. Там и выбирай "Копировать".
Единственное, что эта фукция может не работать без приведенного кода:

initialization
OleInitialize(nil);

finalization
OleUninitialize;

А вот причем здесь

procedure TForm1.Button1Click(Sender: TObject);
begin
WebBrowser1.OleObject.document.selection.createRange().execCommand("Copy");
end;

?

---

← →
Ultracrash ©   (2004-04-22 01:57) [3]

РЕбят все работает.
ОГРОМНОЕ СПАСИБО

---

← →
evgeniy_pro   (2004-05-13 15:50) [4]

procedure...

var vInput, vOutput: OleVariant;
begin
//копирует в буфер
 WebBrowser1.ExecWB(OLECMDID_COPY, 0, vInput, vOutput);
end;

правда сначала надо что-нибудь выделить :)

---

← →
evgeniy_pro   (2004-05-13 15:50) [5]

Удалено модератором
Примечание: Дубль...

---

← →
evgeniy_pro   (2004-05-13 15:50) [6]

Удалено модератором
Примечание: Дубль...

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.034 c