PDA

View Full Version : چگونه می توان فهمید امروز چند شنبه می باشد



دنی کوئیل
جمعه 02 دی 1384, 13:14 عصر
چگونه می توان فهمید امروز چند شنبه می باشد

Developer Programmer
جمعه 02 دی 1384, 16:51 عصر
یه سرچ رو تاریخ هجری شمسی بزن... بارها بحث شده
می تونی از کامپوننت SalarSoft استفاده کنی

Iran-PC
جمعه 02 دی 1384, 17:54 عصر
میتونی از تابع DayOfWeek استفاده کنی.
البته اولین روزشون یکشنبه هستش.

szabeh
شنبه 03 دی 1384, 08:26 صبح
var
MyDate:TDateTime;
days: array[1..7] of string;
begin
MyDate := Date;
days[1] := 'یکشنبه';
days[2] := 'دوشنبه';
days[3] := 'سه‌شنبه';
days[4] := 'چهارشنبه';
days[5] := 'پنجشنبه';
days[6] := 'جمعه';
days[7] := 'شنبه';
Edit1.Text := 'today is a ' + days[DayOfWeek(Mydate)];

Kamyar.Kimiyabeigi
شنبه 03 دی 1384, 09:09 صبح
اگر جستجو کنین زودتر به جواب میرسین
http://www.barnamenevis.org/forum/showthread.php?t=34196

Mahdi_S_T
یک شنبه 04 دی 1384, 09:46 صبح
در کل برای کار با توابع تاریخ باید از یونیت DateUtil استفاده کنید