求html控件!

wzds2000 2006-03-21 01:37:17
目前要使用delphi对在网页中显示的那容进行设定,请问大家有没有一种可以将设定好的样式直接转化成HTML语言的控件?谢谢大家!
...全文
376 22 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
22 条回复
切换为时间正序
请发表友善的回复…
发表回复
wzds2000 2006-04-21
  • 打赏
  • 举报
回复
已经结贴了,问个额外的话题:怎么把信誉搞上去呀?
自从原来莫名其妙的被扣调信誉以后来CSDN就少一些了。。。
wzds2000 2006-03-22
  • 打赏
  • 举报
回复
谢谢各位了,我去试一下。。。^_^
aiirii 2006-03-22
  • 打赏
  • 举报
回复
不过,如果 RxLib 有类似的功能,建议先试下 RxLib
aiirii 2006-03-22
  • 打赏
  • 举报
回复
简单的,可用如下:

unit Unit1;

interface

uses
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.
aiirii 2006-03-22
  • 打赏
  • 举报
回复
http://www55.pair.com/betasoft/scroogexhtml/classTCustomScrooge.html
sdjxmikill 2006-03-22
  • 打赏
  • 举报
回复
用delphi没做过BS,请教作bs的最好用什么开发???
w95927w 2006-03-22
  • 打赏
  • 举报
回复
关注 hehe^^
darkliu 2006-03-21
  • 打赏
  • 举报
回复
RxLib,俄罗斯的程序员写的控件,五星级,内含RichEdit,支持超链。
wzds2000 2006-03-21
  • 打赏
  • 举报
回复
DHTML和我想要实现的效果不太一样。。。

TwebBrower的确可以获取HTML,但是我现在无法生成一个可以让TWebBrower显示的页面。。。

看到《Delphi 6 高级编程》似乎有这方面的介绍,我先找找看。。。
luxuewei5214 2006-03-21
  • 打赏
  • 举报
回复
没做过webServer,不过好像有页面生成控件,忘了是哪个,你找找看,也许是你需要的
slzzg 2006-03-21
  • 打赏
  • 举报
回复
TWebBrower

你要实现的功能是不是对网页中的<input>之类进行赋值。
wzds2000 2006-03-21
  • 打赏
  • 举报
回复
to ly_liuyang
谢谢!
不知道Rave对于中文支持的不太理想会不会有影响。。。
DHTML没用过,我试试先。。。有没用相关资料,谢了!
ly_liuyang 2006-03-21
  • 打赏
  • 举报
回复
可以用Rave报表的Export
或直接用MS的DHTML,就直接编辑网页的
wzds2000 2006-03-21
  • 打赏
  • 举报
回复
to aiirii
是类似word 另存为html那种功能,但是我只需要其中的html语句,而不需要html文件。。。
出了报表以外还有那种控件比较好用,推荐一下好吗?谢谢了。
cuteant 2006-03-21
  • 打赏
  • 举报
回复
我觉得应该只是一些基本的操作吧?比如说字体颜色,字体大小,表格,文字滚动等等的
wzds2000 2006-03-21
  • 打赏
  • 举报
回复
to cuteant
我的确不是解析别人的,但是要解析的内容不止是一段文字,而且内容、格式不定。要是仅仅是简单的几种情况自己作一个解析也就无所谓了。。。
cuteant 2006-03-21
  • 打赏
  • 举报
回复
问题是,你现在不是去解析别人的,只不过在你自己的操作后面转换一下而已
wzds2000 2006-03-21
  • 打赏
  • 举报
回复
to cuteant
不是吧?这根自己写一个HTML解析器没什么区别。。。
就算能自己写,时间上也是个问题呀。。。
cuteant 2006-03-21
  • 打赏
  • 举报
回复
很显然,不需要控件,自己写一点都不难吧?
wzds2000 2006-03-21
  • 打赏
  • 举报
回复
谢谢aiirii,是这样的:
在delphi中设置一段文字,这段文字有可能存在不同的字体、大小和颜色。并且要将这段文字按照设置的情况在网页上显示出来。
我想找一种控件可以通过在delphi中对字体的设置情况直接获得html语言,将html语言保存到数据库中以便在网页上显示。

没表述清楚,不好意思^_^
加载更多回复(2)

5,928

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧