Форум программистов, компьютерный форум, киберфорум
Наши страницы
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
Pcrepair
0 / 0 / 2
Регистрация: 06.01.2011
Сообщений: 141
#1

Ctrl+A и Ctrl+C в компоненте TWebBrowser

08.10.2011, 21:53. Просмотров 553. Ответов 0
Метки нет (Все метки)

Добрый день
есть код простейшего браузера
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
procedure TForm1.Button1Click(Sender: TObject);
  var
  URL, Flags, TargetFrameName, PostData, Headers: Olevariant;
begin
  URL := Edit1.Text;
  Flags := 0;
  TargetFrameName := 0;
  Postdata := 0;
  Headers := 0;
  EmptyParam;
  WebBrowser1.Navigate2(URL, Flags, TargetFrameName, PostData, Headers);
end;
initialization
  // prevent floating point errors
  Set8087CW($133F);
end.
программа позволяет загрузить и отобразить ХТМЛ-страницу

Вопрос:
Как организовать выделение и копирование содержимого отображенной в браузере ХТМЛ-страницы в буфер обмена по событию "загрузка закончена", то есть сделать как бы Ctrl+A и Ctrl+C
Delphi
1
2
3
4
5
procedure TForm1.WebBrowser1DownloadComplete(Sender: TObject;
const pDisp: IDispatch; var URL: OleVariant);
begin
  ????????????????????????
end;
Нет ли у кого похожего кода, чтоб на пустом месте не гадать?
Заранее спасибо

 Комментарий модератора 
Используйте теги кода, соответствующие правилам форума!
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
08.10.2011, 21:53
Ответы с готовыми решениями:

Текст с Memo1 ctrl+c и ctrl+v в определённую программу автоматически
Текст с Memo1 ctrl+c и ctrl+v в определённую программу автоматически. ...

Включить ctrl-c и ctrl-v в Combobox
У меня стоит код, который запрещает ввод некоторых символов if not (Key...

Реализация Ctrl + Z и Ctrl + Y Delphi 7
Привет всем! Помогите с реализацией. Дело обстоит так: у меня есть RichEdit и...

ctrl F9 or F9
Добрый день. не могу откомпилировать! Помогите пожалуйста. Спасибо.

Ctrl+C блокируется
unit Unit1; interface uses ...

0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
08.10.2011, 21:53

Ctrl+V в edit
День добрый. Помогите сделать процедуру, которая будет выполнять Ctrl+V в edit...

CTRL+Enter
procedure TForm2.FormKeyDown(Sender: TObject; var Key: Word; Shift:...

CTRL+Enter
как создать обработку нажатия CTRL+Enter в событии procedure...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru