NOT NULL,DEFAULT ' ',修改後無法存入空白字串 |
缺席
|
cosuki
一般會員 發表:10 回覆:40 積分:10 註冊:2003-06-05 發送簡訊給我 |
我在此一事件下想要把使用者輸入930101年改成20030101存入
且希望若輸入空白時,能存入空白..
但一直會有錯誤訊息出來
"提供不一致或不完全的資訊導致參數物件不適當地被拒,錯誤碼3708
是為什麼哩 procedure TMD.vCDStrepstOUT_DTSetText(Sender: TField; const Text: String);
var newDate:string;
begin //轉中文年存入
if trim(text)='' then
begin
Sender.Value:='';
exit;
end; newDate:=inttostr(strtoint(Text) 19110000);
try
StrToDate(sToDateStr(newDate));
Sender.Value :=newDate;
except
on E: EConvertError do
begin
showmessage(ERROR_INPUT_DATE);
exit;
end;
end; 發表人 - cosuki 於 2004/02/16 14:31:15
|
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |