30-12-2011, 07:13 PM
السلام عليكم
اعمل بالدالفي 5 وحاولت حساب عدد ايام بين تاريخين ولم انجح في دلك
لدي جدول كالتالي produit/// N°, date , qte, prix, montant
في الفورم يوجد, edit1 , DATETIMEPICKER1 , DATETIMEPICKER2 .button 1 et 2
اردت حساب مبيعات خلا ل 10 ايام باستعمال DATETIMEPICKER 1 و datetimepicker 2
var
Date1, Date2 : TDateTime;
Diff : Extended
Day1, Month1, year1 : Word;
day2, Month2, year2 : Word;
begin
datetimepicker1.date:=date;
datetimepicker1.date:=date;
Date1 := EncodeDate(Year1, Month1, Day1);
Date2 := EncodeDate(year2, Month2, Day2);
Diff := DaysBetween(Date2, Date1);
TABL1.FILETRED:=TRUE;
end;
متلا عندما احدد التاريخ 01/12/2011 و 10/12/2011 في datetimepicker 1 et 2
واضغط على الزر يقوم الجدول بالتصفية من 01/12/2011 الى 10/12/2011
وعندما اضغط على زر 2 يضع حساب الكمية في edit1
وشكرا
اعمل بالدالفي 5 وحاولت حساب عدد ايام بين تاريخين ولم انجح في دلك
لدي جدول كالتالي produit/// N°, date , qte, prix, montant
في الفورم يوجد, edit1 , DATETIMEPICKER1 , DATETIMEPICKER2 .button 1 et 2
اردت حساب مبيعات خلا ل 10 ايام باستعمال DATETIMEPICKER 1 و datetimepicker 2
var
Date1, Date2 : TDateTime;
Diff : Extended
Day1, Month1, year1 : Word;
day2, Month2, year2 : Word;
begin
datetimepicker1.date:=date;
datetimepicker1.date:=date;
Date1 := EncodeDate(Year1, Month1, Day1);
Date2 := EncodeDate(year2, Month2, Day2);
Diff := DaysBetween(Date2, Date1);
TABL1.FILETRED:=TRUE;
end;
متلا عندما احدد التاريخ 01/12/2011 و 10/12/2011 في datetimepicker 1 et 2
واضغط على الزر يقوم الجدول بالتصفية من 01/12/2011 الى 10/12/2011
وعندما اضغط على زر 2 يضع حساب الكمية في edit1
وشكرا