如何取得SQL SERVER的安裝路徑

Question

在Delphi中怎樣可以獲取SQL Server的安裝路徑.請賜教.先謝了!

Answer 1

HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\MSSQLServer\MSSQLServer

Answer 2

这个可以通过查找注册表来得到。
[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\MSSQLServer\Setup]
"SQLPath"="d:\\Program Files\\Microsoft SQL Server\\MSSQL"查找到[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\MSSQLServer\Setup]该键，取得SQLPath的值就是你要的了。

Answer 3

uses Registry; 
function GetRegistryValue: string;
var
  Registry: TRegistry;
  S: string;
begin
  Registry:=TRegistry.Create;  Registry.RootKey:=HKEY_LOCAL_MACHINE;
  
  Registry.OpenKey('SOFTWARE\Microsoft\MSSQLServer\Setup',False); 
  s :=Registry.ReadString('SQLPath');  Registry.Free;
end;