Message汉化&数据校验(50分)

爬

爬爬虫

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-08-31

• #1

我有两个问题：
1.用什么方法能将delphi4中的错误信息进行汉化？最好有具体的例程。
2.在Paradox表中如何对datetime型的字段进行输入并进行校验？请举例说明！
我的妹:h87401@263.net

 

S

SeaSky

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-08-31

• #2

2.在Paradox表中如何对datetime型的字段进行输入并进行校验？请举例说明！
针对你的例子.
使用TDateTimePicker .
var
NEW_Date:TDateTime;
SQL_Text:String ;
New_Date:=int(DateTimePicker1.Date);
//取整数.
SQL_Text:='update Table1 set date="'+DateTostr(new_date) + '"';

//date is a Field name
...
query1.Execsql;

 

D

delphiwolf

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-08-31

• #3

SysConst.pas
BdeConst.pas
ComStrs.pas
Consts.pas
DbConsts.pas
修改以上5个文件。
我有汉化好的，要不要？
用
try
StrToDate('1999-9-9');
except
ShowMessaage('error');
end;
校验.

 

爬

爬爬虫

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-08-31

• #4

delphiwolf:
汉化文件好像不是很大，就妹一份给我吧，e_mail:h87401@263.net or discass@263.net
非常感谢！另外，校验的例程好象不对，还未执行except时，系统已经出现错误信息。

 

C

CJ

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-08-31

• #5

mailto:cjcjc@online.sh.cn
try
//
except
on e:exception
if e.message = 'xxx' then
showmessage('pxx');
if e.message = 'zzzz' then
showmessage('pzzz');
end;

var
mydate:Tdatetime;
begin
try
mydate := strtodate(edit1.text);
except
//error in inputing date
end;
end;

 

D

delphiwolf

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-09-01

• #6

>另外，校验的例程好象不对，还未执行except时，系统已经出现错误信息
在调试期间有错误信息，在Delphi外运行则没有。
汉化文件已发送.

 

L

Lilin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-09-01

• #7

delphiwolf老兄
汉化文件能给我一份吗？多谢了！
mail: lilin@yeah.net

 

爬

爬爬虫

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-09-01

• #8

delphiwolf老兄：
好象汉化后的程序不是全部出错信息都汉化，对吗？比如：非日期型数据的类型
错误，是不是将那5个文件中的字符串都换成中文就可以了？

 

S

sherman

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-09-01

• #9

delphiwolf老兄 汉化文件能给<a href='mailto:shermanc@online.sh.cn>我一份吗？</a>

 

D

delphiwolf

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-09-03

• #10

to 爬爬虫:
如果错误信息是BDE或数据库返回的则没有汉化。
是将那5个文件中的字符串都换成中文就可以了，不过工作量不小。
分分吧！
to sherman:
汉化文件已发送.

 

爬

爬爬虫

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-09-04

• #11

接受答案了

 

D

delphiwolf

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-09-15

• #12

加分呀？！

 

L

lshiren

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-09-29

• #13

我也想要一份汉化文件，谁能Mail给我一份？

 

C

cAkk

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-03-17

• #14

多人接受答案了。