تاریخ

سلام.
من یک برنامه دارم با استفاده از کامپوننت solarcalendar .
در این برنامه وقتی کاربر روی تقویم کلیک کرد اگر اطلاعات با این تاریخ در پایگاه پیدا کرد در یک فرم این اطلاعات را که dbgrid در آن قرار دارد نشان می دهد و اگر اطلاعاتی با آن تاریخ پیدا نکرد برنامه را به سمت فرمی هدایت می کند تا در آنجا اطلاعات جدید وارد شود . ولی هر چی جستجو می کنم تاریخ مورد نظر را پیدا نمی کنه .
فیلد date1 هم از نوع (10)char است .
کدها :

کد:

---

  begin
SolarDatePicker1.Text :=SolarMonthCalendar1.OutDate ;
If SolarDatePicker1.Text ='' then
ShowMessage('áØÝÇ ÊÇÑíÎ ãæÑÏ äÙÑ ÑÇ ÇäÊÎÇÈ äãÇííÏ')
else
begin
ADOQuery1.Close ;
ADOQuery1.SQL.Add('select * from date where (( date1='''+ SolarDatePicker1.Text    +'''))');
ADOQuery1.Open ;
if ADOQuery1.RecordCount =0 then
begin
ShowMessage('ÇØáÇÚÇÊí ÈÇ Çíä ÊÇÑíÎ ÏÑ ÇíÇå ÐÎíÑå äÔÏå ÇÓÊ');
form12.Show ;
end
else
if ADOQuery1.RecordCount =1 then
begin
form17.DataSource1.DataSet :=ADOQuery1 ;
form17.DBEdit1.DataSource:=Form17.DataSource1;
Form17.DBEdit1.DataField :='name';
form17.DBEdit1.DataSource:=Form17.DataSource1;
Form17.DBEdit1.DataField :='title';
form17.DBEdit1.DataSource:=Form17.DataSource1;
Form17.DBEdit1.DataField :='kind';
form17.DBEdit1.DataSource:=Form17.DataSource1;
Form17.DBEdit1.DataField :='place';
form17.DBEdit1.DataSource:=Form17.DataSource1;
Form17.DBEdit1.DataField :='mokhatab';
form17.DBEdit1.DataSource:=Form17.DataSource1;
Form17.DBEdit1.DataField :='mihman';
form17.DBEdit1.DataSource:=Form17.DataSource1;
Form17.DBEdit1.DataField :='tozih';
Form17.Show;
end;

---

هم موقع ذخیره اطلاعات و هم موقع فراخوان اونا اط فرمان Trim استفاده کن که فاصله ها رو از بین ببره.
هر دو زمان هم اینا رو مشابه ذخیره کن.
یعنی هر دو SolarDate.text باشن. اینا رو چک کن و احتمالا مشکلت حل میشه.