>Dear All,
>
>In VFP, the label's caption is created by:
>
>

>this.caption = LEFT(CDOW(Date1),3)+", "+LEFT(CMONTH(Date1),3)+" "+ALLTRIM(STR(DAY(Date1)))
>

>
>However, when i combine to executable file, in ShowWindow = 2 (As Top Form),
>it seems it uses the system setting, which is in traditional chinese. How can I avoid that or detect it?

#define DAYNAMES "Monday,Tuesday,Wednesday,Thursday,Friday,Saturday,Sunday"
#define MONTHNAMES "January,February,March,April,May,June,July,August,September,November,October,December"
? myDateFormat(DATE())

Function myDateFormat
LPARAMETERS tdDate
RETURN LEFT(GETWORDNUM(DAYNAMES,DOW(m.tdDate,2),','),3)+', '+;
       LEFT(GETWORDNUM(MONTHNAMES,month(m.tdDate),','),3)+' '+;
       PADL(DAY(m.tdDate),2,'0')

Cetin