also if you specify the 1st digit of the mm and/or dd as 0 it forces the zero to show.
--------
Subject:  Re: 4 digit year

the way we do it here is at app startup we check to see if there is a
'yyyy' in the SysUtils.ShortDateFormat and if not just inform the user
that the regional settings need to be changed before the app can be run.

Alternatively, to answer your specific question I got this from the BDE
help file that comes with Delphi:

Set the date format for the current session.

This example uses the following input:

  fDbiSetDateFormat;

The procedure is:

procedure fDbiSetDateFormat;

var
  fDate : FMTDate;
begin
  // Specifies date separator character
  fDate.szDateSeparator := '/'; {}
  // Date format. 0 = MDY, 1 = DMY, 2 = YMD
  fDate.iDateMode := 0;
  // If TRUE, write year as four digits
  fDate.bFourDigitYear := False;
  // On input add 1900 to year if True
  fDate.bYearBiased := False;
  // Month displayed with a leading zero if True
  fDate.bMonthLeadingZero := False;
  //. Day displayed with leading zero if True
  fDate.bDayLeadingZero := False;

  Check(DbiSetDateFormat(fDate));
end;
On Wed, 21 Oct 1998, Rafael Zamora Matamoros wrote:

>
> How can I set the Borland Database Engine (DBE) to use 4 DigitYear
> programaticaly?
> Also, I want to set the BDE's configuration programatically because of I
> need to change the default configuration. Can someone help me please?
----------