ربط ال DateTimePicker بقواعد البيانات

سلام

إن DataTimePiker ليس عنصر Db لكي تربطه مع الداتابيس

ولكن إن أردت التخزين منه إلى الداتا بيس

فممكن كتابة

Table1Date_FieldName.Value := DataTimePiker1.date;

أو

Table1.FieldByName('Date_FiledName').AsDateTime := DateTimePiker1.Date

السلام عليكم ورحمة الله وبركاته.

أخي الكريم بل ويتم القراءة من قاعدة البيانات وذلك عن طريق عكس الكود السابق ووضعه في حدث AfterScroll للـ Table المراد استخراج التاريخ منه.

والله ولي التوفيق.

أخوكم أبو النور.

السلام عليكم

يمكن ربط DateTimePicker بقواعد البيانات ايضاً عن طريق استعلام

ويمكن كتابة هذا الكود

with Query1 do
begin
  Close;
  SQL.Clear;
  SQL.Add(' select * from EMP where EMPNO='+Edit1.Text+'');
  Open;
  DateTimePicker1.Date := fieldbyname('HIREDATE').AsDateTime;
end;
end;

B)

وإذ تريد التخزين

with Query1 do
  begin
	Close;
	SQL.Clear;
	SQL.Add(' insert into EMP (HIREDATE) values(to_date(' + QuotedStr(DateToStr(DateTimePicker1.Date)) + ',''dd/mm/yyyy'') ');
	ExecSQL;
  End;

;)