Главная страница
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.025 c
1-1089094832
MadGhost
2004-07-06 10:20
2004.07.18
Рисование на канве ячеект и вставка текста: траблы :(


14-1088628178
KilkennyCat
2004-07-01 00:42
2004.07.18
Что может оказать влияние на вид деятельности программиста?


4-1086685199
MU
2004-06-08 12:59
2004.07.18
Информация о ресурсах системы


14-1088496348
Igorek
2004-06-29 12:05
2004.07.18
VCL от Дельфи5 на Дельфи6


14-1088691419
Andy BitOff
2004-07-01 18:16
2004.07.18
Фотоприкол.