VFP 愛用者社區

[CPS0204]

有set date to ansi
平時運作中,程式都是 2020.05.31 這樣沒問題

但進系統後,放幾個小時沒動時,再一次動一下鍵盤鼠標
就會便成 9/1/2020 這樣的8碼格式?

害我都需要每個程式,form點,去設定一次 set date to ANSI

請問:為何逾時不動作後,格式會跑走?

[215001]

我的客戶也反應會這樣

有時就是程式開著,然後去開個Excel檔案,或是其他的軟體,再回到我的程式時,日期格式就跑掉了

[CCB2000]

參攷：
SET SYSFORMATS ON | OFF

[215001]

我的是 VFP8

預設就是 SET SYSFORMATS OFF

[lygcw9603]

set date ansi

[CPS0204]

set date ansi 與 set date to ansi
是一模一樣的指令
都有下了,可是沒用

[張正國]

我只有在主程式裡面設置
Set DATE TO ANSI
Set CENTURY ON && 9999 四位年

呼叫 Date() 函數，都很正常，從沒發生過日期格式跑掉問題
不管程式開多久了

VFP 9 或 6 都正常

看其它高手有無解決方法

[CPS0204]

應該與SET SYSFORMATS ON | OFF有關
只好在每支程式,多執行一次 SET SYSFORMATS off

[CCB2000]

VFPA已脩復這個bug，請參攷：
http://baiyujia.com/vfpdocuments/f_vfp9fix175.asp

對于VFP9，VFP8，VFP7和VFP6，
如果錶單使用私有數據工作期，
建議在每個錶單的Load()或Init()中：
SET SYSFORMATS off

[215001]

8樓 , 9樓 +1

雖然 VFP 預設是: SET SYSFORMATS Off

但是當表單是 [私有工作區] 時,他又會變成 SET SYSFORMATS On ,日期格式就會被系統的格式設定影響到,又變成西元日期

所以建議在每個使用 [私有工作區] 的表單,最好都再設定一次 SET SYSFORMATS Off

[CPS0204]

這是我的每個form .ini 都會do set000.prg


set000.prg 如下
SET SYSFORMATS OFF
SET SAFE OFF
SET DELE ON
SET TALK OFF
SET ECHO OFF
SET EXCL OFF
SET CONF OFF
SET DATE ANSI
SET CLOCK OFF
SET CONF ON
SET CENT ON
SET DATE ANSI
SET DECI TO 7
SET MULT ON
SET HOUR TO 24


ZZ_TODAY=DTOC(DATE())
SET STATUS BAR ON
ON KEY

SET ESCAPE OFF
IF '/'$ZZ_TODAY
=MESSAGEBOX('系統錯誤: 您的電腦的日期格式內含有 / 字元,請重登錄一次系統',16,ZZ_BOX)
CLEAR EVENTS
QUIT
ENDIF