gan, kalo misalnya gini : 'jika form sedang ditampilkan dan ketika klik kanan di tray icon program maka salah satu item popUp tidak aktif, (enablednya = false), itu gimana ya ? :bingungs misalnya di tray icon pas klik kanan ada menu 'Open', 'Option', dan 'Exit',...
code yg itu tuh dah bener gan, ane nyoba dan it works ! buat ngetes, coba agan create new project tanpa apa2, trus event formkeydownnya masukin kode tersebut, di run, trus coba di drag di bagian client formnya, bisa ga ? udah dicoba gan. . . tapi tetap gak mau. . . :(
Formnya tertutup ga dgn control lain ? misalnya di form itu ada Tpanel atau Timage yang align nya diset alclient sehingga nutupin seluruh form ? tetap gak mau. . . :( padahal gak ketutup apa - apa gan. . .:( Ketika melakukan klik dan drag di form, system akan mengirimkan pesan WM_SYSCOMMAND ke ...
kalau melihat mudahnya di sisi design, lebih mudah pilihan kedua @BERHADIAHCENDOL: enakan pake Panel.. terutama pas klien revisi besok :) oke gan thanks. . . btw, lebih baik pake kaya gini : panel1.visible := false; panel2.visible := true; atau lebih baik kaya gini : panel1.hide; panel2.show; ...
gan, misalkan kalo ada 2 menu di form, nah... bila di cek radiobutton1 maka akan tampil menu yang posisi tombol, posisi teks, dsb... sesuai dengan yang sudah ditentukan. pas di cek radiobutton2 maka posisi teks, tombol, dsb... berubah tidak sama posisinya dengan yang ada di radiobutton1, nah... y...
Gunakan wm_NCHitTest untuk menangkap event yang berhubungan dgn mouse spt kursor mouse bergerak, tombol mouse ditekan atau dilepas, kemudian lakukan trik seolah2 yang didrag adalah title bar (meskipun sebenarnya yg diklik adalah bagian client dari form) sehingga formnya bisa di drag 1. Tambahkan ...
Dalam loopingnya tambahkan baris berikut : Application.ProcessMessages; mantap gan. . . :2thumbup thanks ya. . . :2thumbup
gan, agar form bisa di drag pas proses sedang belangsung itu gimana ya. . . ane kan bikin looping, nilai loopingnya ditampilkan di memo, nah pas sedang jalan programnya, maka formnya gak bisa di drag, kecuali bila programnya udah selesai...
cara gampang : tambahkan komponen ApplicationEvents (komponen standar delphi yg ada di Tab Additional), disana ada even OnMinimize, onRestore, OnActivate... bla bla bla cara ribet : pake koding ... public procedure WMSysCommand (var Msg: TWMSysCommand) ; message WM_SYSCOMMAND; ... implementation...
kayaknya gini doang: writeln(longint(@andi)); P.S: baca2 buku deh oke mod. . . Kalau gak mau bingung pakai quotedstr aja, misalnya : showmessage ('arieq'); // outputnya adalah arieq showmessage (quotedstr ('arieq')); // outputnya adalah 'arieq' daripada nulisnya sho...
bingung bejimana? :D ada variabel andi. var andi : string; nilai dari variabel andi adalah : andi := 'aku suka semangka'; yang bingungnya itu cara mengetahui alamat andi tersebut. . . . . bingung juga nih cara nanyanya. . . :( udah, nonton Aoi Sora dulu aja biar ga bingung :hammer...
PAnsiChar type is a pointer to an AnsiChar value. AnsiChar \t\tA character type guaranteed to be 8 bits in size AnsiString \t\tA data type that holds a string of AnsiChars coba liat di properties combobox nya cari properties style,silahkan ganti2,tar juga nemu yang dipengen :) m...
pertama2,pada tabelnya klik kanan - add all fields hmmmmm yang koding suara tadi kenapa ga bunyi ya? :bingungs pake skrip lain gan coba,jangan yang playsound(); akhirnya mau gan. . . kaya coding agan yg ada di page sebelumnya : procedure TForm1.Button1Click(Sender: TObject); begin PlaySound(Pans...
coba gini gan: var petik : char; begin petik := ''''; sql := 'where nama = ' + petik + 'takwajujur' + petik; end; tetap gak mau gan. . . :berdukas ukuran fontnya paling d gedeeinnn :D ternyata, di property editbox, Autosize-nya bernilai true, jadi gak bis...
gan, tinggi dari Tedit tidak bisa di ubah ya. . . emang udah di setting dari sononya ya tingginya 21, ane coba ubah gak mau-mau.:berdukas
y gan pahami dlu :) setelah di paham-pahami, itu misal pas di tekan tombol langsung menampilkan isi dari file tes.txt secara langsung tanpa harus memilih dulu seperti lewat OpenDialog. kaya gitu kah. . . mau playsound berarti file yang dipainkan nya minimal .wav dlu gan :D coba udah di filter h...
dibawa2 tuh liat gambar gan http://i26.lulzimg.com/2a1c5a.jpg nah jadi si file txt nya ada dalam satu polder,itu maksud dari kode yang memo1.Lines.LoadFromFile(extractfiledir(application.ExeName)+'\tes.txt'); :D gitu gan gitu ya gan. . . pahami dulu. . . :D terus yang playsound si...