想實現 輸入 ‘/’ 變成 ‘finish’代碼如下: 在tadoquery.field.onvalidate 中寫入procedure TWRK_Pay_InputF.master_qthalf_prd_noValidate(Sender: TField);
begin
if sender.value=’/’ then
begin
sender.value=’finish’
showmessage(sender.value) //會顯示 ‘finish’ ;
end;
end; 但最後卻不變 ,還是 ‘/’
begin
if sender.value=’/’ then
begin
sender.value=’finish’
showmessage(sender.value) //會顯示 ‘finish’ ;
end;
end; 但最後卻不變 ,還是 ‘/’
如何實現,給點代碼