Arsip: bikin folder baru

 
user image
more 19 years ago

lela

ada yang tau caranya bikin folder baru di derektori tertentu, pake Delphi :shock:
user image
more 19 years ago

ZeAL

errr... kalo gak salah.. createdir(dest); Tapi ini kalo gak salah loh ya.. lupa.. and dikantor gak ada delphi.. kalo salah maap yaa... heheh. :D
user image
more 19 years ago

novlog

test giniy coba.....

uses SysUtils;
..........
  IF ForceDirectories('C:\DeZip')
    then ShowMessage('Dah di create')
    else ShowMessage('Gagal di create')
:arrow: :arrow: :arrow:
user image
more 19 years ago

tox2wow

errr... kalo gak salah.. createdir(dest);
Xixixixi ... iya, ga salah ... :lol: ... dest = Variabel string yg mengacu ke path yang digunakan untuk membuat direktori dan nama direktori (Ex. 'C:\tox2wow') .. :P
user image
more 19 years ago

saysansay

Wakaka Main tebak2 aja Ini mah Ok dech uda lama nga posting Pertama deklarasikan Path untuk Kita bisa menecreate Direktori baru

var
  Form1: TForm1;
  Path: array of Char;
Nah Sekarang Mari Kita Mencrete directory Tentukan Lokasi Directory misalkan C:\ atau D:\ atau E:\ Dan laian Codingnya

procedure TForm1.btndirectoryClick(Sender: TObject);
begin
  Path:='D:\Saysansay\FOLDER Baru';
  CreateDirectory(Path, nil);
end;
Nah setelah itu bim sala bim tiup 3 kali akan muncul Seperti in gambarnya Nah Jangan Main tebak2an Ayuk Ngungsi ke Vb.Net Entar aku di Usir sama mas Ulil wakakakaka NB : Cuma Numpang Mampir Nah ini tampilannya
user image
more 19 years ago

J4ckR1pp3r

:roll: mana tampilannya om
user image
more 19 years ago

lela

Path:='D:\Saysansay\FOLDER Baru'; nah pas pathnya itu saya dapet dari caption label ttt, dia ga bisa gimana ya caranya biar bisa. disini caption label-nya:'D:\Saysansay\FOLDER Baru', ga bisa
user image
more 19 years ago

J4ckR1pp3r

wakakakak ........... sansay ga bener dikau :twisted: mbak lela ganti ajah pake ForceDirectories('D:\SaysansayBego\FOLDER Baru'); dijamin bisa tuh... wakakakak
user image
more 19 years ago

saysansay

buseeet kang jak...:-w Awas Dirimu Mbak Lela Coba Baca Artikel ini http://www.delphi-id.org/dpr/Article85.pas
user image
more 19 years ago

J4ckR1pp3r

permisi .... numpang ktawa ....... wakakakaka
more ...
  • Pages:
  • 1
Share to

AI Forward

🚀 We're thrilled to partner with Alibaba Cloud for "AI Forward - Alibaba Cloud Global Developer Summit 2025" in Jakarta! Join us and explore the future of AI. Register now: https://int.alibabacloud.com/m/1000400772/
#AlibabaCloud #DeveloperSummit #Jakarta #AIFORWARD

Local Business Directory, Search Engine Submission & SEO Tools FreeWebSubmission.com SonicRun.com