救命啊!程序实现!!!(50分)

  • 主题发起人 月之暗面
  • 开始时间

月之暗面

Unregistered / Unconfirmed
GUEST, unregistred user!
[:)]我现在正在写一个程序:关于word操作题的自动判断,
比如:已给了一篇rtf格式的文档,用word2000对它进行排版,(加标题,对某段文
字的字号,字体等进行设置等)我该怎么能用程序对这份rtf文档进行自动判断,确认它
是否已经正确的排版了。
我该怎样用delphi来实现,一开始我想到用vba,后来发现它不能脱离word2000,我
是不是应该研究一下rtf文件格式啊??
 
这样的工作烦琐。建议改用其它思路。
 
呵呵, 不大可能吧? 程序怎么知道你的排版是否正确呢?
 
换个思路吧,这也太麻烦了.
 
kao,我也觉得不大可能
 
麻烦,那你起码要清楚rtf格式的定义。然后把之前、之后的两个rtf格式文件比较。
 
智能化?
 
加标题,对某段文
字的字号,字体等进行设置等
这些改变通过OLE都可以得到嘛,耐着性子慢慢写吧。
 
[:(]
看来这个软件我是做不出来了
rtf文件的格式我上什么地方去找啊?
我做的这个软件是针对江苏省高校非计算机专业一级考试的,希望各位大侠能给我一点指点
 
netkk
希望你能给我一个具体的思路!!!
 
首先来看看可行性:
1、各个RTF文件的格式是否是规范:
如标题的格式(是否在第一行;是否中间对齐……);各个段落的规范;
如何找出特定格式的段落……
2、除文字本身的意思外,如果要对某段(句、字)对行处理,该对象必须在当前的文章中
有唯一的标识。
如果你仍认为可行的话,现把情况说清楚一些;给出具体的例子。
 
netkk
首先谢谢你,过会儿我会给一个具体的例子,大家来讨论讨论!
 
我现在正在着一个自动阅卷系统,考卷一共分为六部分题目。第一第二部分是单选题和多选题自动阅卷比较好实现。
而第三部分是打字题,用程序来判分,用什么思路来实现呢,(我想了一种方法,那就是用kmp算法来实现程序判断它这段文字打错了打漏了多少字,不过这个算法用object pascal实现好像比较困难)我希望有那位大虾能够给我一点指点!!!
第四部分是操作题,建目录拷贝文件等,(我是不是改用控件读出软盘的目录结构,然后和我给出的答案进行比较???)
第五部分是word操作题,先给一段rtf格式的文章,然后有10个步骤的操作如1家一个标题,然后给某一段文字的字号进行改变,改变字体等操作。我实在是不知道该怎样用delphi编程然程序自动判断这个rtf格式的文档排版是否正确!
希望各位大虾能给我提供一点思路,小生在此有礼了!!!
 
我想请问一下晚上哪有关于rtf格式
 
第五部分可参考VBA,可以一行或一段处理,以前用过,如SelectRange什么的,但具体记不清
 
Delphi5/Demos/Richedit/richedit.dpr
是一个很好的例子,研究一下,对你会有用的,只要不怕麻烦,你的想法会实现的。
 
第三部分并不难,首先把所有空格和控制符都去掉,然后就是一个字符串比较的问题
第五部分可以按段落来做
看看Delphi带的例子就有数了。
比方说判断标题,一般是第一段
可以从第一段落开始循环,如果段落文本为空就过,直到遇到有文字的一段,一般就是标题了
然后就可以得到对齐方式,字体,颜色等数据,如果和要求一样就过
 
第三部分很麻烦,最好用memo控件,要考虑的问题有:输入的字符和答案次序不一样,如中间漏掉
一些字,允许漏掉多少个字符;中间打入若干半角字符;....等。
第五部,要求设置的答案应有关键字,可查找,判断其属性是否符合答案要求。
 
[:)]
wk_knife:
你好!
我的那个程序是用来判断学生是否按题目的要求对文章进行排版的,不是我用
程序来对rtf格式的文章进行排版?所以我不知道ole该怎么用!!!
例如:有一段文章,然后按下面的几个要求来进行排版
(1)给文章加上标题:"计算机",并使之居中,标题段后留空12磅
(2)设置标题字体:黑体,粗体,下划线,斜体,一号,蓝色,字符间距加宽4磅,填充
10%的底纹.
(3) .
(4) .
等等
我要做的程序是用来实现学生是否按要求进行了排版,我觉得这块我都不知道该怎么
下手,希望有相关经验的大虾能不吝赐教!!!
 
给你个思路,用vba和Delphi结合来做最好。
 
顶部