Arsip: ask? cara menampilan hari dari tanggal?

 
user image
more 18 years ago

faridx

ask? cara menampilan/mengambil hari dari tanggal? menta contoh dari datetimepicker aja. ga kepikiran lg puyeng, plis secepatnya.
user image
more 18 years ago

Lamsidjan

procedure TForm1.Button1Click(Sender: TObject); begin Edit1.Text := FormatDateTime('ddd',DateTimePicker1.Date); //between 1 and 7, where 1 indicates Monday and 7 indicates Sunday. //Edit1.Text := IntToStr(DayOfTheWeek(DateTimePicker1.Date)); end;
user image
more 18 years ago

faridx

Thanx bro...
user image
more 18 years ago

p2bf

OOT: mas faridx dari cianjur kah?
user image
more 18 years ago

iPOEL

gtu aja ko repot
user image
more 18 years ago

S4D

ane nimbrung nih bang, ane make listing beginian biar datetimenya langsung masuk ke DataBase M$. Access : Procedure TForm1.Button1Click(Sender: TObject); begin ADOQuery1.Close; ADOQuery1.SQL.Clear; ADOQuery1.SQL.Add('Insert Into Nama_Table(No,Tanggal)'); ADOQuery1.SQL.Add('values('+QuotedStr(Edit1.Text)+','+QuotedStr(FormatDateTime('dd/mm/yyyy',now)+')'); ADOQuery1.ExecSQL; end; yg jadi masalah terkadang Tahun yg tersimpan di database ko' berubah menjadi 1899 ya' ??? mohon pencerahan
user image
more 18 years ago

zieborg

coba gini Procedure TForm1.Button1Click(Sender: TObject); begin ADOQuery1.Close; ADOQuery1.SQL.Clear; ADOQuery1.SQL.Add('Insert Into Nama_Table(No,Tanggal) values (:No,:Tanggal)'); ADOQuery1.parameters.parambyname('No').value := Edit1.Text; ADOQuery1.parameters.parambyname('Tanggal').value := now; ADOQuery1.ExecSQL; end;
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

Random Topic

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