Masaüstü

[serhat]

Merhaba; firemonkey tarafında "MAX_PATH" nette bu konuyla ilgili bir şey bulamadım, firemonkey masaüstünü nasıl bulabilirim?   

function GetSystemPath(Folder: Integer): string; // Masa Üstü Yolu
var
  PIDL: PItemIDList; // uses ShlObj, ActiveX
  Path: PChar;
  AMalloc: IMalloc;
begin
  Path := StrAlloc(MAX_PATH);
  SHGetSpecialFolderLocation(Application.Handle, Folder, PIDL);
  if SHGetPathFromIDList(PIDL, Path) then
    Result := Path;
  SHGetMalloc(AMalloc);
  AMalloc.Free(PIDL);
  StrDispose(Path);
end;

[SimaWB]

Sorun sadece MAX_PATH ise onun yerine 260 yazıp devam edebilirsiniz. Ama kullandığınız komutlar Windows'a özel gözüküyor. Buna dikkat edin.

[klavye]

Asagidaki link belki isini gorur.
http://www.malcolmgroves.com/blog/?p=865

[savasabd]

Yanlış anlamadıysam masaüstünün path bilgisini soruyorsunuz.
Firemonkey'de Windows'un masaüstünün path bilgisini aşağıdaki şekilde alabilirsiniz.

System.SysUtils.GetEnvironmentVariable('USERPROFILE')+PathDelim+'Desktop';

Şu linkte bu fonksiyonla hangi bilgileri alacağınız mevcut.

[SimaWB]

HomePath için daha da iyisi TPath.GetHomePath kullanılabilir

[savasabd]

(26-01-2018, Saat: 11:49)SimaWB Adlı Kullanıcıdan Alıntı: HomePath için daha da iyisi TPath.GetHomePath kullanılabilir

Hocam windows'ta tam olarak homepath'i getirmiyor bu fonksiyon,getdirdiği path bilgisi şu:C:\Users\<username>\AppData\Roaming.
Şu linkten bakılabilir.

[SimaWB]

Evet, ben de o linki paylaşmıştım zaten
Platform'a göre hangi değerleri döndüğü buradaki tablodan çok kolay anlaşılıyor. Desktop'a bir şekilde kolayca ulaşılabilir:
http://docwiki.embarcadero.com/RADStudio..._Platforms

[savasabd]

Evet bu konuda hemfikirim, ama daha iyisi olduğu konusunda ihtilaftayız.Aslında ben de yorumu güncelledim,en kısa yol

System.SysUtils.GetEnvironmentVariable('USERPROFILE')+PathDelim+'Desktop'

; bu gibi görünüyor.

[brs]

Bunlarda benden olsun;

 Memo1.Lines.Add('System.IOUtils.TPath.GetLibraryPath='+System.IOUtils.TPath.GetLibraryPath);
  Memo1.Lines.Add('System.IOUtils.TPath.GetDocumentsPath='+System.IOUtils.TPath.GetDocumentsPath);
  Memo1.Lines.Add('System.IOUtils.TPath.GetHomePath='+System.IOUtils.TPath.GetHomePath);
  Memo1.Lines.Add('System.IOUtils.TPath.GetSharedAlarmsPath='+System.IOUtils.TPath.GetSharedAlarmsPath);
  Memo1.Lines.Add('System.IOUtils.TPath.GetPublicPath='+System.IOUtils.TPath.GetPublicPath);
  Memo1.Lines.Add('System.IOUtils.TPath.GetSharedDocumentsPath='+System.IOUtils.TPath.GetSharedDocumentsPath);
  Memo1.Lines.Add('System.IOUtils.TPath.GetDownloadsPath='+System.IOUtils.TPath.GetDownloadsPath);
  Memo1.Lines.Add('System.IOUtils.TPath.GetMoviesPath='+System.IOUtils.TPath.GetMoviesPath);
  Memo1.Lines.Add('System.IOUtils.TPath.GetMusicPath='+System.IOUtils.TPath.GetMusicPath);
  Memo1.Lines.Add('System.IOUtils.TPath.GetPicturesPath='+System.IOUtils.TPath.GetPicturesPath);
  Memo1.Lines.Add('System.IOUtils.TPath.GetRingtonesPath='+System.IOUtils.TPath.GetRingtonesPath);
  Memo1.Lines.Add('System.IOUtils.TPath.GetSharedDownloadsPath='+System.IOUtils.TPath.GetSharedDownloadsPath);
  Memo1.Lines.Add('System.IOUtils.TPath.GetSharedMoviesPath='+System.IOUtils.TPath.GetSharedMoviesPath);
  Memo1.Lines.Add('System.IOUtils.TPath.GetSharedMusicPath='+System.IOUtils.TPath.GetSharedMusicPath);
  Memo1.Lines.Add('System.IOUtils.TPath.GetSharedCameraPath='+System.IOUtils.TPath.GetSharedCameraPath);
  Memo1.Lines.Add('System.IOUtils.TPath.GetSharedPicturesPath='+System.IOUtils.TPath.GetSharedPicturesPath);
  Memo1.Lines.Add('System.IOUtils.TPath.GetSharedRingtonesPath='+System.IOUtils.TPath.GetSharedRingtonesPath);