Source position: gdate.inc line 115
procedure g_date_set_dmy(
date: PGDate;
day: TGDateDay;
month: TGDateMonth;
y: TGDateYear
);