Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.07.18;
Скачать: [xml.tar.bz2];

Вниз

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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.48 MB
Время: 0.033 c
10-1021230720
jo frodo
2002-05-12 23:12
2004.07.18
переводы CORBA services


4-1086247794
Romka
2004-06-03 11:29
2004.07.18
Перезагрузка Сетевой катры


3-1088067653
serg128
2004-06-24 13:00
2004.07.18
Как по нажатию кнопки выбрать (multiselect) все строки в DBGrid?


4-1086673091
Kaand
2004-06-08 09:38
2004.07.18
Копирование файлов


3-1088073838
safo
2004-06-24 14:43
2004.07.18
Работа с dbExpress





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский