»
» » Membuat Folder dengan Delphi
Minggu, 12 April 2009

Artikel kali ini saya akan share gimana caranya bikin Folder secara otomatis dengan Delphi tentunya,,mau tau carany???cari aja sendiri!!!!he...nih ikutin aja2 langkah2 berikut:
1.Buka Delphi nya masing2
2.tambain aja satu buah Component Button.
3.Dobel click
4.ketik or Copas(copy paste)kode berikut:

Procedure TForm1.Button1Click(Sender:TObject);
var
Dir: string;
begin
Dir := 'C:\APPS\SALES\LOCAL';//Directory dimana Folder akandibuat
ForceDirectories(Dir);//Function untuk membuat Folder or dir
if DirectoryExists(Dir) then //cek apakah dir exist?
ShowMessage(Dir + 'Udah dibikin bos!');
END;

Guampang banget kan?????iyalah soalnya yang susah2 saya gak bisa,he...
semoga ada manfaatnya ya ^__^
12 Apr 2009
Posted by Unknown at 20.43
Artikel ,

7 comments:

  1. Cari Duit Gratisan di Internet25 April 2009 pukul 13.47

    Wah hebat Bro, tapi gue ga mudeng yang namanya Delphi...
    Tapi Gue ada info Gratisan ni...Mau?

    BalasHapus
  2. Anonim14 Mei 2009 pukul 15.04

    Sebagai bahan share untuk tutorial delphi dapat berkunjung ke : http://pustaka-kita.com/

    BalasHapus
  3. AaEzha9 Januari 2010 pukul 20.35

    makasih ya..

    BalasHapus
  4. Diardo Marendi Krista5 Agustus 2010 pukul 15.48

    pas wktu ane lagi nyari. thx bro.
    tp kalo buat shortcut dari suatu exe gmana caranya?? :d

    BalasHapus
  5. asrul barru20 Juli 2011 pukul 19.06

    klo listing kopy folder bagaimana bro?

    BalasHapus
  6. andstm22 Juli 2012 pukul 09.05

    kalau membuat path dialog folder gmn ya bro? thanks

    BalasHapus
  7. Unknown13 Oktober 2021 pukul 09.14

    bermanfaat. lanjutkan!

    BalasHapus

Katakan Sesuatu

:) :)) ;(( :-) =)) ;( ;-( :d :-d @-) :p :o :>) (o) [-( :-? (p) :-s (m) 8-) :-t :-b b-( :-# =p~ $-) (b) (f) x-) (k) (h) (c) cheer
Click to see the code!
To insert emoticon you must added at least one space before the code.

Langganan: Posting Komentar (Atom)