Código Delphi [-] procedure TForm1.DateTimePicker1Change(Sender: TObject); begin DataSet.Edit; DataSet.FieldByName('ShipDate').AsDateTime := TDateTimePicker(Sender).DateTime; //... end;
procedure TForm1.DateTimePicker1Change(Sender: TObject); begin DataSet.Edit; DataSet.FieldByName('ShipDate').AsDateTime := TDateTimePicker(Sender).DateTime; //... end;