Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Delphi: ActiveX/СОМ/CORBA > Вытащить картинку с Webbrowser


Автор: __Pack__ 12.11.2006, 19:39
У меня така проблема:
загружаю страничку где имеется фрейм. в єтом фрейме есть катринка (код регистрации). 
Текст фрейма:
Код

<DIV align=center>
<script language=JavaScript>
 parent.ShowNextPage();
</SCRIPT>
<TABLE cellSpacing=3 cellPadding=0 width="100%" border=0>
<TBODY><TR><TD>
<FORM name=userform method=post>
<TABLE height=75 cellSpacing=0 cellPadding=0 width=420 bgColor=#ebebeb border=0>
<TBODY>
<TR vAlign=top height=15>
<TD bgColor=#ffffff colSpan=8>Êàòåãîðèÿ: VIP ñåðôèíã. <!-- | <a class="1" 

href="http://www.krasshop.ru/search/site/?targeturl=http://www.pogazam.ru" target="_blank">Îòêðûòü ññûëêó â íîâîì 

îêíå</a>.</td> --></TD>
<TR>
<TD width=78 background=/imgdyn/code.php?code=page height=39 rowSpan=2<B>><IMG title="Êîä ïðîâåðêè" height=39 

alt="Êîä ïðîâåðêè" src="/img/empty.gif" width=78 border=0></TD><TD align=middle width=190 bgColor=#dfefff 

colSpan=4>Âûáåðèòå, ÷òî èçîáðàæåíî?</TD>
<TD align=middle width=152 colSpan=3>Óãàäàé è ïîëó÷è 2Õ.</TD></TR>
<TR>
.....

(картинка - scr="/img/empty.gif)

Но проблема в чем ... когда я пытаюсь скопировать картинку (сохранить картинку как...) то копируется тольки однин 

пиксель... как будто в картинке один пиксель...

Из дельфи питаюсь сохранить на диск, вот так:
Код

s:='Top';
 HTML_Doc2 := form1.WebBrowser1.Document As IHTMLDocument2;
 Window2 := HTML_Doc2.parentWindow As IHTMLWindow2;

 for k := 0 to window2.document.frames.item(s).Document.Images.Length - 1 do
 begin
   Source := window2.document.frames.item(s).Document.Images.Item(k).Src;
   p := LastDelimiter('.', Source);
   ext := UpperCase(Copy(Source, p + 1, Length(Source)));
     p  := LastDelimiter('/', Source);
     dest := ExtractFilePath(ParamStr(0)) + Copy(Source, p + 1,Length(Source));
     DownloadFile(Source, dest);
end;

Но таже история... как будто картинка из одного пикселя... но в браузере она гдето 2х2 см... 

Немогу понять в чем прикол? Может это фон, а картинка и в самом деле один пиксель? Подскажите как решыть эту 

проблему? как вытащить картинку?

Автор: __Pack__ 13.11.2006, 13:38
Как я понял, рисунок скрыт в background :
Код

<TD width=78 background=/imgdyn/code.php?code=page ...

а картинка empty.gif - только один пиксель ...
Как вытащить рисунок из background?
Может кто-то знает ...

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)