Code: Alles auswählen
procedure TForm1.Button1Click(Sender: TObject);
var html: TIpHtml;
ms:TMemoryStream;
MyString:AnsiString;
begin
MyString:='<html><b>mal</b> sehen</html>';
html:=TIpHtml.Create;
ms:=TMemoryStream.Create;
ms.Write(MyString[1],Length(MyString));
ms.Position:=0;
html.LoadFromStream(ms);
IpHtmlPanel1.SetHtml(html);
ms.free;
//html.free; Kackt ab, evtl. nur eine globale Instanz machen
end;
Code: Alles auswählen
MyString:='<html><b>mal</b> sehen <i>mal</i> sehen <a href="test.htm">mal</a> sehen</html>';
unterstreichen will er aber nach wie vor nicht
pluto hat geschrieben:Schau dir mal den "Soruce-Code" und suche nach 'u'.
)Code: Alles auswählen
<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"><html><head><meta http-equiv="content-type" content="text/html; charset=ISO-8859-1"><title>Vorschau</title></head><body> <u>test</u><br><br><s>test2</s>
<br></html>
Verein
Links Suche
