Delphi'de Klasör Açma

Delphi 7 ile istenen klasörü pencere olarak açma:

procedure TForm1.bbtnKlasorAcClick(Sender: TObject);
begin
  ShellExecute(0,
                 'open',
                 PChar(GecerliKlasoruAl), //buraya açmak istediğiniz klasörü yazın.
                 nil,
                 nil,
                 SW_SHOWNORMAL);
end;

 

25.04.2020 09:05:27

Yorumlar

Bu yazıya henüz yorum yapılmamış.

Yazı hakkında yorum yapmak için, buraya tıklayın.

Kategoriler :

Reklam :

Arşiv :

Etiketler :

Bağlantılar :