Скачать: CL | DM;

TWebBrowser и таблица   Найти похожие ветки 

← →
Андрей (начинающий)   (2009-04-26 21:02) [0]

Подскажите, плиз, как вывести на TWebBrowser массив в виде таблицы.
Tекст и ссылки вставляются, а теги таблицы (<table>, <tr>, <td>) не срабатывают.


procedure TForm1.FormShow(Sender: TObject);
begin
 WebBrowser1.Navigate("about:<html><body></body></html>");
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
 s:="<br><a href="...">...</a>";
 (WebBrowser1.Document as IHtmlDocument2).body.insertAdjacentHTML("beforeEnd", s );
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
 (WebBrowser1.Document as IHtmlDocument2).body.insertAdjacentHTML("beforeEnd",  "<table><tr><td>");
 s:="<a href="...">...</a>";
 (WebBrowser1.Document as IHtmlDocument2).body.insertAdjacentHTML("beforeEnd", s );
 (WebBrowser1.Document as IHtmlDocument2).body.insertAdjacentHTML("beforeEnd",  "</tr></td></table>");
end;


---

← →
Igor2010   (2009-04-26 21:50) [1]

> TWebBrowser массив в виде таблицы.

WebBrowser1.Navigate(ПУТЬ К ФАЙЛУ С ТАБЛИЦЕЙ+"table.htm");

---

← →
Андрей (начинающий)   (2009-04-26 22:00) [2]

Спасибо, уже сам разобрался.
Мне массив надо выводить из программы "на лету" (т.е. он в разное время заполнен разными данными) и внешний файл не подходит.
Ошибка была в том, что надо было сначала заполнить строку s данными вместе с тегами html, а затем уже выводить с помощью

...insertAdjacentHTML("beforeEnd", s )


---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.007 c