Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.08.27;
Скачать: CL | DM;

Вниз

twebbrowser - получить выделенный текст   Найти похожие ветки 

 
Sergio77   (2006-07-13 14:54) [0]

Добрый день, мастера!
в инете нашел такую функцию:
function GetBrowserSelection(WB: TWebBrowser): string;
var
 Doc: Variant;
begin
 if WB.Document <> nil then
 begin
   Doc := WB.Document;
   try
     Result := Doc.Selection.createRange.Text
   finally
     Doc := Unassigned;
   end;
 end
 else
   Result := "";
end;

но она не работает в некторых случаях
(наверное это связано с фреймами, не знаю, я новичек в этом)

как мне скопировать выделенный текст из любого строения страницы (документа)


 
Gero ©   (2006-07-14 00:07) [1]

Попробуй execCommand("Copy")


 
Kray ©   (2006-07-14 15:06) [2]

ИМХО. Структура документа сложная. Всех хуже у меня получалось работать с надписями. Поэтому не всегда возможно получается извлечь результат.

Doc.Selection.createRange.Text
особенно не нравится  createRange. может просто Range?



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

Текущий архив: 2006.08.27;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.081 c
4-1146750887
__ViC
2006-05-04 17:54
2006.08.27
Перечват CreateFile


2-1155070697
Spectrum2
2006-08-09 00:58
2006.08.27
Поиск слова в предложении


15-1154225165
eowl
2006-07-30 06:06
2006.08.27
Что случилось с Cos


4-1146600197
DimaDukat
2006-05-03 00:03
2006.08.27
параметры команды ExitWindowsEx


2-1154861442
ЮзерОК
2006-08-06 14:50
2006.08.27
ListBox