文件名所指向的文件是否是同一个文件(100分)

现在有 2 个字符串
C:/1234/1234567890/123.txt
C:/1234/123456~1/123.txt
一个是长文件名格式，一个是8.3格式
如何判断这 2 个字符串是否指向同一个文件？

用 SameFileName 函数，返回 True 就是相同...

没遇到过这个问题
帮顶

to vvyang:
看看 SameFileName 的源代码再说吧。

[][][]

无语...............！！！
我的问题就是：要怎样才能知道他们是不是指向同一个文件啊？

function GetShortFilename(sLongName : string) : string;
var
sShortName : string;
nShortNameLen : integer;
begin
SetLength(sShortName, MAX_PATH);
nShortNameLen := GetShortPathName(PChar(sLongName),
PChar(sShortName), MAX_PATH-1);
if nShortNameLen = 0 then
begin
{ 错误处理... }
end;
SetLength(sShortName, nShortNameLen);
Result := sShortName;
end;

if GetShortFilename('C:/1234/1234567890/123.txt')='C:/1234/123456~1/123.txt' then
//指向同一个文件.
else
...

接受答案了.