gan, kalo pas di klik tanda silang utk keluar yg di form itu, gimana caranya agar ada peringatan misal seperti ini "anda yakin ingin keluar ?" trus ada pilihan yes dan no. nah itu gimana gan bikinnya ? pake onClose kan. . . tapi gimana cara menampilkan form untuk menampilkan peringatan ...
donlod dulu gan komponen skinnya nih sedikit dari ane http://www.mediafire..com/download.php?g7fo26i43p9zhmz semoga berkenan :o :o :o itu buat delphi ya gan. . . ane pake lazarus. . . masih bingung cara menggunakannya walaupun ada menu utk convert dari delphi ke lazarus. yg di convert yg unitnya ...
iya bisa pake skin jg gan..... :thumbup btw enaknya pake apa lg ya gan? :bingung gimana dan dimana settingnya gan pake skin ?
gan, kalo ngerubah warna button pas tersentuh kursor mouse gimana ? pake onMouseEnter kan ? ane pake coding kaya gini : Button1.Color := clRed; tapi kok gak mau berubah jadi warna merah ya ? kan pas kena kursor mouse maka warnanya akan berubah kaya gini kan. . . http://cdn-u.kaskus.co.id/53/ykl...
turut :berduka gan. . . yg sabar ya. . . cari cewe yg lain aja. . . Tuh cewe gak bisa jaga kehormatannya.
tetep mau bijimana maksudny gan? apus adja button ny, ganti baru gan, daripada bingung kodingan udah di ubah tapi tetep aja tombol startnya nongol, padahal sudah di pilih false di propertinya, ternyata pas di buat lagi baru ngefek bila ada perubahan. dan emang kaya kodingan agan sebelumnya yg be...
gausah dan gapake gan 1 event sajah buat button1 dengan event onclick kodingnya ane setuju ma agan sedosone di atas :) ada yg aneh nih. . . ane hilangin kodingan yg ada di procedure TForm1.btnStartClick(Sender: TObject); begin end; tapi kok pas di Run programnya tetap mau ya. . . :bingungs
wew :matabelos mantap gan infonya. . . kalo udah install Gnome-nya update lagi ya. . . ane mau liat kaya apa . . . :D
coba ini gan procedure TForm1.Button1Click(Sender: TObject); begin if Button1.Caption='start' then begin //timer jalan Button1.Caption:='stop' end else if Button1.Caption='stop' then begin //timer stop Button1.Caption:='start'; end; end; tetep gak mau gan...
coba ini gan, pake even onclick buttonya gan. if lblStart.Caption = 'Stop' then blablablabla ; maksudnya ente kaya gimana gan. . . yang ane maksud kaya gini : pas ditekan tombol start maka waktu jalan, dan teksnya berubah, yg tadinya start berubah menjadi stop, nah. . . . pas ditekan ...
Ane baru install ulang (ganti ke FreeBSD 64-bit). Untuk package nya, ane cobain package 8 stable. Hasilnya cukup memuaskan. Firefox 5, LibreOffice 3.3.3, UMPlayer 0.95, XFCE 4.8, dll udah ready. Keliatannya cuma sedikit tertinggal dibanding ports. Tapi kalo mau pake package ini sebaiknya dari awa...
nanya dong gan. . . jadi gini : bila teks label caption ='stop' dan button di klik maka blablabla.. . . if (lblStart.Caption = 'Stop') and (btnStart di klik ) then blablabla. . . itu codingnya kaya apa ya bila btnStart di klik, ane bingungnya disini nih . . . :bingungs :(
unit Unit1; {$mode objfpc}{$H+} interface uses Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, StdCtrls, ExtCtrls; type { TForm1 } TForm1 = class(TForm) btnStart: TButton; btnPause: TButton; btnExit: TButton; btnReset: TButton; lblJam: TLabel; lblMenit: TLabel; lblDetik: TLabel...