Цитата:
|
Сообщение от Metal71
Хотелось бы что бы было "примерно" как на рисунке №2. С помощью какого компонента этого можно добиться?
Рис.№1 сделан в DBMemo. Примечание: используется компонент для большого ввода данных (текстовых, длинной больше 255 символов). |
Могу предложить с помощью WebBrowser, модератор этого форума мне такую функцию подкинул (ник не вспомню):
Код:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 | procedure TGTMailMain.ShowHTML(AText: String);
var
Document: IHTMLDocument2;
Element : IHTMLElement;
V: OleVariant;
begin
If webBrowser.Document = Nil Then webBrowser.Navigate('about<b></b>:blank');
While webBrowser.Document = Nil Do
Application.ProcessMessages;
Document := webBrowser.Document As IHtmlDocument2;
V := VarArrayCreate([0, 0], varVariant);
V[0] := AText;
Document.Write(PSafeArray(TVarData(v).VArray));
Document.Close;
Element := Document.Body;
If Element <> Nil Then
Begin
Element.Style.BorderStyle := 'none';
End;
end;
|
переменню webBrowser замени на свой компонент на форме
это пол работы, потом при помощи этой функции установи текст в WebBrowser'е на подобие этого:
Код:
1 2 3 4 5 6 7 | <ul>
<li>1</li>
<li>2</li>
<li>3</li>
<li>4</li>
<li>5 </li>
</ul>
|
здесь нужно банальное знание языка (ну это канешно громко звучит) HTML
знаю муторно, но RichEdit'ом не сильно пользовался, незнаю как там в RunTime'е изменить текст (всмысле с форматированием)
26.04.2009, 17:22
В какой компонент можно вывести маркированный список?
Линейный вид
