Сейчас на форуме: tyns777, zombi-vadim (+3 невидимых) |
![]() |
eXeL@B —› Программирование —› Как получить ссылки на которые ведут картинки? |
Посл.ответ | Сообщение |
|
Создано: 06 марта 2008 19:36 · Личное сообщение · #1 twebbrowser Как получить ссылки на которые ведут картинки? <a href="нужно узнать что тут для данной картинки"><img src=""></a> Код приведенные ниже пытался модифицировать, не вышло. for i := 0 to EmbeddedWB1.OleObject.Document.Images.Length - 1 do begin Document := Embeddedwb1.Document as IHtmlDocument2; // Retrieves the calculated width of the image. ImageWidth := Embeddedwb1.OleObject.Document.Images.Item(i).Width; // Retrieves the height of the image. ImageHeight := Embeddedwb1.OleObject.Document.Images.Item(i).Height; // Retrieves the file size of the image. ImageFileSize := (Document.Images.Item(i, 0) as IHTMLImgElement).FileSize; // Retrieves the entire URL that the browser uses to locate the image ImageHref := (Document.Images.Item(i, 0) as IHTMLImgElement).Href; // Retrieves a text alternative to the graphic. ImageTextAlternative := (Document.Images.Item(i, 0) as IHTMLImgElement).alt; // Show image information in a TListbox ListBox1.Items.Add(Format('%s : %d x %d Pixels; %s Bytes; %s', [ImageHref, ImageWidth, ImageHeight, ImageFileSize, ImageTextAlternative])); end; Я конечно понимаю что не по теме форума, но может быть в таком случае кто нибудь мне расскажет реально ли подобное организовать на асме, и если да то как. ![]() |
|
Создано: 07 марта 2008 00:25 · Личное сообщение · #2 |
|
Создано: 07 марта 2008 05:41 · Личное сообщение · #3 |
|
Создано: 07 марта 2008 09:10 · Личное сообщение · #4 |
|
Создано: 07 марта 2008 09:21 · Личное сообщение · #5 |
|
Создано: 07 марта 2008 09:57 · Личное сообщение · #6 |
![]() |
eXeL@B —› Программирование —› Как получить ссылки на которые ведут картинки? |
Эта тема закрыта. Ответы больше не принимаются. |