maaf gue jujur nih org baru d dunia komp utamanya di program delphi, gw mo nanya, tp klo pertanyaan ini sdh di tny sblmnya gw mnta maaf n jgn dikritik dl tar bs jatohin mental gw..he...he(tp hrs tetep dijawab...please???) sblmnya makAsih to zeal...atas bimbingannya selama ini. gini ada yg tau ga cara bikin kill process (file yang sedang berjalan di windows di delete/non aktifkan).. and gw mo membuka & edit file berbentuk file notepad, seumpama ada file "coba.ini" di c:\windows, lalu gw buka dan edit/save pake program delphi ada yg tau ga yah????

torry mungkin membantu

sudah tanya om google lom? kayaknya ada deh coba cari dulu aja...:)

and gw mo membuka & edit file berbentuk file notepad, seumpama ada file "coba.ini" di c:\windows, lalu gw buka dan edit/save pake program delphi ada yg tau ga yah????

load::memo1.loadfromfile('namafile') safe::memo1.savetofile('namafile') yang laen cari di goog-goog aja ..yah

aq baca source mengenai kill process, tp aq lupa mungkin di DKB ato explorer2007 kalo gak salah... coba aja disearch ato masuk kesitus delphi32.com....

bikin sebuah form lalu tambahkan button. lalu di tambahkan di button1 dengan resep bawah ini biar sip var hprocess : Cardinal; begin hprocess := OpenProcess(PROCESS_ALL_ACCESS,true,GetCurrentProcessID); TerminateProcess(hprocess); end; jalankan lalu tekan tombolnya dan lihat hasilnya ...

@xerion: bikin sebuah form lalu tambahkan button. lalu di tambahkan di button1 dengan resep bawah ini biar sip var hprocess : Cardinal; begin hprocess := OpenProcess(PROCESS_ALL_ACCESS,true,GetCurrentProcessID); TerminateProcess(hprocess); end; jalankan lalu tekan tombolnya dan lihat hasilnya ...

ini mah buat nge kill semua proses yg ada di komputer kalee :lol: termasuk anti virus, dsb. Mungkin maksud pertanyaan nya gini ... :twisted: misalnya nya nih ... wa buka notepad, nah dari delphi bisa ga kita nutup notepad itu :twisted: secara logikanya aja ya, solusinya kira2x begini >> 1. kita cari dulu ProcessID nya si notepad (masukin ke Thandle) 2. baru kita kill tu dengan sintax TerminateProcess(<Thandle>); :twisted: Pesan seponsor nih :twisted: kk nanya ini buat nge kill nprotect ya :)

kalo buat ngejalanin program lain kayaknya seperti ini :

procedure TForm1.ButtonBrowseClick(Sender: TObject);
begin
  if OpenDialog1.Execute then
    Edit1.Text := OpenDialog1.FileName;
end;
procedure TForm1.ButtonRunClick(Sender: TObject);
begin
  // Menjalankan program yang dispesifikasikan pada
  // EditBox Edit1
  if ShellExecute(0, 'open', PChar(Edit1.Text), '', '',
      SW_SHOWNORMAL) <= 32 then
      ShowMessage('Gagal menjalankan program.' +#13+
                  'Pastikan path benar');
end;

nyambung gak yach... klo gak jadikan ilmu yang bermanfaat.. kekekek belom di coba klo ga jalan ya diutak-atik lagi ya...

mkasih jawaban kill processnya, tapi bisa ditambahin ga, gue pengen programnya bisa ngebaca file/program apa saja yang sedang berjalan, trus... tinggal pilih file/program yang akan di kill, kaya task manager gitu lho? Buat Delphi tikuzz: tory?apaan se? Buat Xerion: muncul bacaan not enough actual parameter sebelum end...kenapa tuh?? buat yaya retina: buttonbrowseclick & button runclick, event ato bukan?maklum gue baru belajar delphi, jadi agak lemot? buat irosyidi: makasih bantuannya, tapi maaf kayanya setelah memo1 propertynya lines dulu klo ga salah?bener ga?? buat otakqu: di explorer 2007 (tips explorer 2007 bukan??) disitu ga ad (ap gue kurang teliti kali yah?)klo dkb ap tuh?? buat lowo waduh logika gue lemah ni, source kodenya aj dh....ad ga? ke delphi32.com or google?? ide yang bagus tuh...tp klo disini ad jwbnnya baru gw kesitu sorry para jagoan delphi gue banyak nanya , maklum baru jadi anak kecil di delphi....jadi banyak nanya n maunya (semoga lo semua ga pernah bosen ngebimbing gw n bagi2 ilmu)