如何得知副檔名關聯的執行檔名?    Windows內將副檔名與執行檔的關係存放於Registry中的 HKEY_CLASSES_ROOT中.    有一個更簡便的辦法是使用Windows API函數FindExecutable(),見以下程式.    

   
 program Project1;    uses
  Forms, Dialogs, ShellAPI, SysUtils, Windows;    {$R *.RES}    var
  sApp : array [0..256] of char;
begin
  // 這個程式應顯示如同c:\program files\office\excel.exe之類的執行檔名.
  if FindExecutable('c:\test.xls', nil, sApp) >= 32 then
    ShowMessage(sApp)
  else
    ShowMessage(SysErrorMessage(GetLastError));
end.

～～～Delphi K.Top討論區站長～～～

------
～～～Delphi K.Top討論區站長～～～