Suche funktionierende rtf zu html unit

[Andreas L.]

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