救急！Delphi竟然不行！！！(10分)

B

beachboy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-15

• #1

我用OpenDlg.filename获得的文件名为fn，
fn用edit控件显示为c:/data/test.txt
变量fdef：string；
赋值给fdef:='c:/data/test.txt';
我用下面语句检测fn和fdef是否相同:
if fn<>fdef then
showmessage('It's not same');
结果表示两个值不相同，为什么！

 

C

ckzn

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-15

• #2

是否需要去空格再比较？

 

T

tseug

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-15

• #3

1 大小写的缘故
2 空格的缘故

 

K

kkyy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-15

• #4

大小写

 

W

w12345678

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-15

• #5

if uppercase(trim(fn))<>uppercase(trim(fdef)) then
showmessage('It's not same');

 

B

beachboy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-15

• #6

大小写我试过，没关系的
空格也没关系

 

刘

刘李子

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-15

• #7

mei daoli!

 

M

maming

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-15

• #8

把这个fdef：string；改成
fdef : Tfilename;试试

 

影

影 子

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-15

• #9

明显是大小写的问题。
盘符C应该是大写，还有，那个showmessage的语句错了。

 

A

antic_ant

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-15

• #10

重启机器

 

C

CJ

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-15

• #11

fn := 'c:/test/t.txt';
fdef :='c:/test/t.txt';
if uppercase(trim(fn))<>uppercase(trim(fdef)) then
showmessage('我自杀算了');

 

C

chemer

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-15

• #12

if lowercase(fn)<>lowercase(fdef) then
showmessage('It''s not same');
成功！

 

B

beachboy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-16

• #13

这是Ｄｅｌｐｈｉ程序呀，大小写无关的

 

C

chemer

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-16

• #14

你操作的是字符串，又不是标示符或者关键字，当然区分大小写了。

 

刘

刘李子

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-20

• #15

 

T

tan_jian

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-20

• #16

beachboy可真幽默!

 

B

beachboy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-23

• #17

重新启动电脑，好了，谢谢antic_ant！并谢谢各位的答复！！！

 

B

beachboy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-23

• #18

接受答案了.