Hi,
ich habe jetzt schon einige RTF 2
HTML Units ausprobiert. Dummerweise funktioniert keine richtig.
- JvRichEditToHTML: Übernimmt nicht die korrekte Formatierung. Z. B. wird anstatt dfdsfdfs, dfdsfdfs dargestellt.
- RTF2HTML von dsdt: " "
- RTF2HTML von Troels S Eriksen (gibts bei torry) bekomm ich nicht zum laufen. Habs so probiert:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
I: Integer;
html: TStringList;
begin
if opendialog1.Execute
then
begin
html := TStringList.Create;
listbox1.Items.LoadFromFile(opendialog1.filename);
for I := 0
to listbox1.items.count - 1
do
begin
html.add(RtfToHtml(listbox1.Items.Strings[i]));
//sobald i = 2 bekomm ich die meldung "listindex überschreitet das maximum (11059968)", meine testdatei hat aber gar nicht soviele zeilen...
end;
html.SaveToFile(changefileext(opendialog1.FileName, '
html'));
html.free;
end;
end;
Kennt jemand eine funktionierende
Unit/Komponente oder weiß jemand wie man die obengenannten zum laufen bekommen kann?
bye,
Andy