Сидит на Пр. Ленина студентка и играет на баяне. Перед ней табличка:
"Помогите бедной студентке на интернет."
procedure TForm1.Button1Click(Sender: TObject);
var
li: Word;
begin// Loop through all images of a TWebbrowser // Schleife ьber alle Bilder im Webbrowser for li := 0 to WebBrowser1.OleObject.Document.Images.Length - 1 do// Exchange image with an own image // Austauschen der Bilder im webbrowser - durch 'MyImage.gif'
WebBrowser1.OleObject.Document.Images.Item(0).Src := 'c:\MyImage.gif';
end;
Статья Заменить рисунки в TWEBBrowser раздела Интернет и Сети Браузер может быть полезна для разработчиков на Delphi и FreePascal.
Комментарии и вопросы
Материалы статей собраны из открытых источников, владелец сайта не претендует на авторство. Там где авторство установить не удалось, материал подаётся без имени автора. В случае если Вы считаете, что Ваши права нарушены, пожалуйста, свяжитесь с владельцем сайта.