![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
HTML из буфера обмена [D6, Win95/98]
oleg_SYS © (2004-07-03 23:25:00)Как вытащить из буфера обмена фрагмент HTML, который был скопирован через IE? (нужно сохранить таблицу).
KilkennyCat (2004-07-05 23:31:00) [1]извините, моя вина, ошибся.
Верно так: $C084
oleg_SYS (2004-07-04 18:19:00) [2]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-04 08:10:00) [3]Да, самое забавное при работе с буфером - Вы можете зарегестрировать свой собственный формат.
KilkennyCat (2004-07-04 08:07:00) [4]Но а если захотите все же сами, вот вам справочная информация, которая потребуется:
Буфер обмена может иметь несколько форматов. В нашем случае, при копировании интернет-страницы используются следующие форматы:
HTML Format = $C089
Rich Text Format = $C051
Ole Private Data = $C013
CF_LOCALE (Win 95) = $0010
CF_OEMTEXT = $0007
Если необходимо прочитать, например, только таблицу с тесктом, достаточно обработать буфер с форматом $C089, получив при этом обыкновенный текст с тэгами... Вот только с кодировкой могут возникнуть проблемы.
KilkennyCat (2004-07-04 07:39:00) [5]Удалено модератором
Алекс А (2004-07-04 07:09:00) [6]Удалено модератором
KilkennyCat (2004-07-04 06:44:00) [7]Удалено модератором
Алекс А (2004-07-04 06:00:00) [8]Удалено модератором
KilkennyCat (2004-07-04 05:02:00) [9]Конечно, есть... TWebBrowser, например.
Вставить можно при помощи ExecWB с константами OLECMDID_PASTE, OLECMDID_PASTESPECIAL
@BraIN (2004-07-04 04:58:00) [10]> Есть в Дельфи компоненты с поддержкой этого
Это смотря какого формата.
Алекс А (2004-07-04 04:50:00) [11]Удалено модератором
KilkennyCat (2004-07-04 04:02:00) [12]Удалено модератором
Алекс А (2004-07-04 03:55:00) [13]Удалено модератором
Примечание: Задай вопрос в своей ветке
@BraIN (2004-07-04 02:19:00) [14]Memo1.PasteFromClipboard;
KilkennyCat (2004-07-04 02:12:00) [15]куда вытащить?