Bu yazı yazarın Delphi’nin .NET uyumlu versiyonunu konu ettiği kitabının Api fonksiyonları adlı bölümün bir kısmıdır. http://www.seckin.com.tr/urun.aspx?productID=6451

Windows’un Kurulu Olduğu Klasörü Öğrenmek

Bazen de çalıştırılan programın hangi klasörden çalıştırıldığı veya o sırada söz konusu program için hangi klasörün geçerli klasör olduğu öğrenilmek istenir. Bu gibi durumlarda ExtractFilePath() fonksiyonundan yararlanabilirsiniz. Bu fonksiyonun nasıl kullanıldığını aşağıda görebilirsiniz. Bu fonksiyon Delphi’nin Borland.Vcl.SysUtils adlı Namespace’de tanımlı olduğu için projeye dahil edilmelidir.

Var
   Yol : String;
begin
   Yol := ExtractFilePath(ParamStr(0));
   TextBox1.Text := Yol;
end;
Yukarıda GetWindowsDirectory() fonksiyonu ile Windows’un kurulu olduğu klasörü öğrenirken Borland.Vcl.Windows’tan yararlandım. Eğer bu Namespace’ten yararlanmadan GetWindowsDirectory() fonksiyonunu kullanmak istemiş olsaydım bu fonksiyonu aşağıdaki gibi deklare ederdim.

Bu kodlar Delphi.net kodlarıdır (D2005-D2006). Artık Delphi.net yok bunun yerine Delphi Prism var ve bu da Visual Studio eklentisi olarak kullanılabilmektedir.