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

Вниз

HTML из буфера обмена   Найти похожие ветки 

 
oleg_SYS   (2004-07-03 23:25) [0]

Как вытащить из буфера обмена фрагмент HTML, который был скопирован через IE? (нужно сохранить таблицу).


 
KilkennyCat ©   (2004-07-04 02:12) [1]

куда вытащить?


 
@BraIN ©   (2004-07-04 02:19) [2]

Memo1.PasteFromClipboard;


 
Алекс А   (2004-07-04 03:55) [3]

Удалено модератором
Примечание: Задай вопрос в своей ветке


 
KilkennyCat ©   (2004-07-04 04:02) [4]

Удалено модератором


 
Алекс А   (2004-07-04 04:50) [5]

Удалено модератором


 
@BraIN ©   (2004-07-04 04:58) [6]

> Есть в Дельфи компоненты с поддержкой этого
Это смотря какого формата.


 
KilkennyCat ©   (2004-07-04 05:02) [7]

Конечно, есть... TWebBrowser, например.
Вставить можно при помощи ExecWB с константами OLECMDID_PASTE, OLECMDID_PASTESPECIAL


 
Алекс А   (2004-07-04 06:00) [8]

Удалено модератором


 
KilkennyCat ©   (2004-07-04 06:44) [9]

Удалено модератором


 
Алекс А   (2004-07-04 07:09) [10]

Удалено модератором


 
KilkennyCat ©   (2004-07-04 07:39) [11]

Удалено модератором


 
KilkennyCat ©   (2004-07-04 08:07) [12]

Но а если захотите все же сами, вот вам справочная информация, которая потребуется:

Буфер обмена может иметь несколько форматов. В нашем случае, при копировании интернет-страницы используются следующие форматы:

HTML Format = $C089
Rich Text Format = $C051
Ole Private Data = $C013
CF_LOCALE (Win 95) = $0010
CF_OEMTEXT = $0007


Если необходимо прочитать, например, только таблицу с тесктом, достаточно обработать буфер с форматом $C089, получив при этом обыкновенный текст с тэгами... Вот только с кодировкой могут возникнуть проблемы.


 
KilkennyCat ©   (2004-07-04 08:10) [13]

Да, самое забавное при работе с буфером - Вы можете зарегестрировать свой собственный формат.


 
oleg_SYS   (2004-07-04 18:19) [14]

KilkennyCat, спасибо за справку, но у меня не работает:


procedure TForm1.Button1Click(Sender: TObject);
var
h: THandle;
p: PChar;
begin
   H := Clipboard.GetAsHandle($C089);
   P := GlobalLock(H);
   Memo1.SetTextBuf(P);
   GlobalUnlock(H);
end;


 
KilkennyCat ©   (2004-07-05 23:31) [15]

извините, моя вина, ошибся.
Верно так: $C084



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

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

Наверх




Память: 0.49 MB
Время: 0.117 c
1-1089203729
ZiRoCool
2004-07-07 16:35
2004.07.18
Абсолютно тупой вопрос, но всё же :)


1-1089000676
newver
2004-07-05 08:11
2004.07.18
Передача данных в программу.


14-1088412776
Dmitriy O.
2004-06-28 12:52
2004.07.18
А тут есть еще кто либо из Ярославля ?


3-1087833532
German
2004-06-21 19:58
2004.07.18
Индексация


9-1080636166
Goida
2004-03-30 12:42
2004.07.18
Как показать скорость?