大家好,小弟我初学Delphi.问大家各字符串大小写的问题,希望高手们热心解决!

Question

比如:
IF FileExists ('C:\Windows\Regedit.Exe') Then
   Begin
     ShowMessage ('程序已经找到');
   End
   Else Begin
     ShowMessage ('程序没有找到');
End;
C盘的文件其实是c:\windows\regidit.exe注意了,大小写不一样!
程序运行后出现程序没有找到!经过修正FileExists ('c:\windows\regedit.exe')
把他们全部转换成了小写就可以了,可以如果我不知道是大写还是小写该怎么办呢?
怎么让他不区分大小写?

Answer 1

var  s : string;
  i : Integer;
begin
  { Get string from TEdit control }
  s := Edit1.Text;
  for i := 1 to Length(s) do
    if i mod 2 = 0 then s[i] := UpCase(s[i]);
  Edit1.Text := s;
end;

Answer 2

Delphi是不区分大小写的，你说的问题应该 不是这出现的问题，或许其他出现问题了

Answer 3

全部都用小写应该就没问题了
IF FileExists (LowerCase('C:\Windows\Regedit.Exe')) Then
   Begin
     ShowMessage ('程序已经找到');
   End
   Else Begin
     ShowMessage ('程序没有找到');
End;

Answer 4

同意 u2m(痛并快乐着)delphi却是不去分大小写的

Answer 5

Windows不存在大小写问题，应该是别的地方有问题。
不过要将一字符串转为大写或小写可以这样
s:=''C:\Windows\Regedit.Exe';
s:=LowerCase(s);//转为小写
s:=UpperCase(s);//转为大写

Answer 6

u2m(痛并快乐着) 说得没错，Delphi是不分大小写，但是FileExists调用了API--
HANDLE FindFirstFile(
  LPCTSTR lpFileName,               // file name
  LPWIN32_FIND_DATA lpFindFileData  // data buffer
);对于操作系统来说就很难说了：）
我试验过了，对于文件名中含大写字母的，用小写字母代替仍能找到，反之则

Answer 7

对，Delphi是不分大小写，我在这里试了，也没什么问题，我的操作系统是2000，如楼上说的，不知是不是操作系统的缘故,或是别的什么地方的问题，你仔细找一找

Answer 8

IF FileExists ('C:\Windows\Regedit.Exe') Then
   Begin
     ShowMessage ('程序已经找到');
   End
   Else Begin
     ShowMessage ('程序没有找到');
End;IF FileExists ('C:\Windows\regedit.exe') Then
   Begin
     ShowMessage ('程序已经找到');
   End
   Else Begin
     ShowMessage ('程序没有找到');
End;
都说程序已经找到
环境是d7 + win98
这个应该看操作系统

Answer 9

加 COLLATE SQL_Latin1_General_CP1_CS_AS 可以区分大小写

Answer 10

阿?郁闷阿,我是Windows2000 Sever Service Pack 3.我在试试吧,谢谢高手踊跃回答!

Answer 11

我在98-2000都试了,这个问题也是不应该的呀 Object Pasacal是不去分大小些的呀!

Answer 12

WINDOWS不区分大小写，但是LINUX，NUIX都区分大小写。WINDOWS下，全部用大写应该不会有问题。

Answer 13

d983074(d983074) 我试验过了，对于文件名中含大写字母的，用小写字母代替仍能找到，反之则
如果真的象 d983074(d983074) 所说这样，你就直接用小写不就完了？或者全部转成小写