求html控件！

Question

目前要使用delphi对在网页中显示的那容进行设定，请问大家有没有一种可以将设定好的样式直接转化成HTML语言的控件？谢谢大家！

Answer 1

>>设定好的样式直接转化成HTML语言
表达不清楚？是不是类似word 另存为 html 的那种功能？

Answer 2

如果是我说的那个功能，很多报表控件，都带有 export to html的功能

Answer 3

谢谢aiirii，是这样的：
在delphi中设置一段文字，这段文字有可能存在不同的字体、大小和颜色。并且要将这段文字按照设置的情况在网页上显示出来。
我想找一种控件可以通过在delphi中对字体的设置情况直接获得html语言，将html语言保存到数据库中以便在网页上显示。没表述清楚，不好意思^_^

Answer 4

to cuteant
不是吧？这根自己写一个HTML解析器没什么区别
就算能自己写，时间上也是个问题呀

Answer 5

to cuteant
我的确不是解析别人的，但是要解析的内容不止是一段文字，而且内容、格式不定。要是仅仅是简单的几种情况自己作一个解析也就无所谓了

Answer 6

to aiirii
是类似word 另存为html那种功能，但是我只需要其中的html语句，而不需要html文件
出了报表以外还有那种控件比较好用，推荐一下好吗？谢谢了。

Answer 7

可以用Rave报表的Export
或直接用MS的DHTML,就直接编辑网页的

Answer 8

to ly_liuyang
谢谢!
不知道Rave对于中文支持的不太理想会不会有影响
DHTML没用过，我试试先有没用相关资料，谢了！

Answer 9

TWebBrower你要实现的功能是不是对网页中的<input>之类进行赋值。

Answer 10

没做过webServer，不过好像有页面生成控件，忘了是哪个，你找找看，也许是你需要的

Answer 11

DHTML和我想要实现的效果不太一样TwebBrower的确可以获取HTML，但是我现在无法生成一个可以让TWebBrower显示的页面看到《Delphi 6 高级编程》似乎有这方面的介绍，我先找找看

Answer 12

RxLib，俄罗斯的程序员写的控件，五星级，内含RichEdit,支持超链。

Answer 13

用delphi没做过BS，请教作bs的最好用什么开发？？？

Answer 14

http://www55.pair.com/betasoft/scroogexhtml/classTCustomScrooge.html

Answer 15

简单的，可用如下：unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs,comobj, StdCtrls, ComCtrls,word2000;type
  TForm1 = class(TForm)
    Button1: TButton;
    RichEdit1: TRichEdit;
    Button2: TButton;
    Button3: TButton;
    procedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
    procedure Button3Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;implementation{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject); //html2rtf
var
  Wordapp : oleVariant;
  Doc : olevariant;
begin
  Wordapp := CreateOleObject('Word.Application') ;
  Doc := Wordapp.documents.open('C:\Documenti\manualeASP.htm');
  Doc.saveas('C:\manualeASP.rtf',wdFormatRTF);
  wordapp.quit;
  Doc  := VarNull;
  WordApp := VarNull;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
richedit1.Lines.LoadFromFile('C:\manualeASP.rtf')
end;procedure TForm1.Button3Click(Sender: TObject);   //rtf2html
var
  Wordapp : oleVariant;
  Doc : olevariant;
begin
  Wordapp := CreateOleObject('Word.Application') ;
  Doc := Wordapp.documents.open('C:\manualeASP.rtf');
  Doc.saveas('C:\manualeASP.html',wdFormatHTML);
  wordapp.quit;
  Doc  := VarNull;
  WordApp := VarNull;
end;
end.

Answer 16

不过，如果 RxLib 有类似的功能，建议先试下 RxLib

Answer 17

已经结贴了，问个额外的话题：怎么把信誉搞上去呀？
自从原来莫名其妙的被扣调信誉以后来CSDN就少一些了