Kodbank İndir

! CODEBANK 2012 !

İNDİRMEK&DETAYLI BİLGİ ALMAK İÇİN BURAYI TIKLAYINIZ.

ÖNEMLİ AÇIKLAMA: MUTLAKA OKUYUNUZ!

« önceki sonraki »
Sayfa: [1]   Aşağı git

Gönderen Konu: Temp Klasörünün Alınması  (Okunma sayısı 1464 defa)

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

Çevrimdışı CMNSOFT

  • Kıdemli Üye
  • *****
  • İleti: 82
  • Rep: +2/-2
  • Cinsiyet: Bay
    • http://www.cmnsoft.com
Temp Klasörünün Alınması
« : 13 Ekim 2005 14:51:30 »
Kod: Delphi
  1. Function GetTempDir(): String;
  2.  
  3. Var
  4.  
  5.    Lng: DWORD;
  6.  
  7. Begin
  8.  
  9.   SetLength(Result, MAX_PATH);
  10.  
  11.   Lng:= GetTempPath(MAX_PATH, PChar(Result));
  12.  
  13.   SetLength(Result, Lng);
  14.  
  15. end;




Kullanım Şekli

Kod: Delphi
  1. procedure TForm1.Button1Click(Sender: TObject);
  2.  
  3. begin
  4.  
  5.   label1.caption := GetTempDir;
  6.  
  7. end;
Kayıtlı
:::::::::::::::::::: www.CMNSOFT.com ::::::::::::::::::::
Sayfa: [1]   Yukarı git
« önceki sonraki »