با سلام
دوستان من یک بانک dbfدارم که میخوام ازش اطلاعات بخونم.اطلاعات رو تبدیل به اکسس می کنم و بعد تو grid نمایش میدم،هیچ مشکلی هم پیش نمیاد اما وقتی که میخوام تو بانکم بگردم و یک بازه زمانی خاص(از روز تاریخ سیستم تا 2 روز بعد) رو نمایش بدم،مشکل پیدا میکنم.
مشکل هم اینه که تمام تاریخهارو تبدیل میکنه اما به 30/2/1387 که می رسه error میده که is not a valid date.
ضمنا فیلد تاریخ در dbf از نوع رشتس که من تبدیل به تاریخ می کنمش.
ممنون میشم اگه منو راهنمایی کنید.
b:=date;
a:=b+2;
c:=b+1;
datesystem:=DateToStr(miladytoshamsi(a));
datesystem1:=DateToStr(miladytoshamsi(b));
datesystem2:=DateToStr(miladytoshamsi(c));
sys1:=StrToDate(datesystem);
sys2:=strtodate(datesystem1);
while not(datamodule5.Table1.Eof) do
begin //while
datamodule5.ADOTable2.Close;
datamodule5.ADOTable2.Open;
datamodule5.ADOTable2.Append;
if (datamodule5.table1.fieldbyname('SHOMADST').asstri ng<>'') then begin
tatah:=IranSystemToUnicode(datamodule5.Table1.fiel dbyname('tatah').AsString);
t:=strtodate(tatah);
if (t>sys2)and(t<sys1) then