دخول

tahar1983 · 19-09-2022, 07:00 PM

if edit9.Text <>'' then
begin
ADOQuery1.filter := 'datedos = '+strtodate(datetostr( edit9.Text));
ADOQuery1.filtered := true;
end
else
ADOQuery1.Filtered := false;

كود بحث تاريخ لانه لم ينجح معي وشكرا

larbiparadox

(19-09-2022, 07:00 PM)tahar1983 كتب : if edit9.Text <>'' then
begin
ADOQuery1.filter := 'datedos = '+strtodate(datetostr( edit9.Text));
ADOQuery1.filtered := true;
end
else
ADOQuery1.Filtered := false;

كود بحث تاريخ لانه لم ينجح معي وشكرا

كود :
if Length(edit9.Text) = 10 then

begin

  ADOQuery1.filter :=  'datedos  = '+ edit9.Text;

  ADOQuery1.filtered := true;

  end

  else

  ADOQuery1.Filtered := false

tahar1983 · 20-09-2022, 09:29 PM

(19-09-2022, 09:32 PM)larbiparadox كتب :
(19-09-2022, 07:00 PM)tahar1983 كتب : if edit9.Text <>'' then
begin
ADOQuery1.filter := 'datedos = '+strtodate(datetostr( edit9.Text));
ADOQuery1.filtered := true;
end
else
ADOQuery1.Filtered := false;

كود بحث تاريخ لانه لم ينجح معي وشكرا

كود :
if Length(edit9.Text) = 10 then begin ADOQuery1.filter := 'datedos = '+ edit9.Text; ADOQuery1.filtered := true; end else ADOQuery1.Filtered := false

شكرا لك وجزاء الله كل خير

دخول
اسم المستخدم/البريد الالكتروني :
كلمة المرور :	فقدت كلمة المرور ؟
	تذكرني بالمرة القادمة