제어판에서 국가별옵션에 날짜탭에서 날짜 형식을 변경하는 비베소스입니다
델파이로 바꿀수 잇나요?
소스는 아래와 같습니다
Private Declare Function SetLocaleInfo Lib "kernel32" Alias _
"SetLocaleInfoA" ( _
ByVal Locale As Long, _
ByVal LCType As Long, _
ByVal lpLCData As String) As Long
Private Declare Function GetSystemDefaultLCID Lib "kernel32" () As Long
Private Const LOCALE_SSHORTDATE As Long = &H1F
Private Sub Command1_Click()
Dim LCID As Long
Dim NewFormat As String
LCID = GetSystemDefaultLCID()
NewFormat = "yyyy-MM-dd"
Call SetLocaleInfo(LCID, LOCALE_SSHORTDATE, NewFormat)
End Sub
부탁드리겠습니다
그냥 똑같이 변경하시면 될거 같네요...
var
DefLCID: LCID;
NewFormat: string;
begin
DefLCID := GetSystemDefaultLCID;
NewFormat := 'yyyy-MM-dd';
SetLocaleInfo(DefaultLCID, LOCALE_SSHORTDATE, NewFormat);
end;
^^ 항상 즐코하세요...