如果有错误是不可能运算的,try excepte end 不是办法,只能返回一个异常或不显示异常。如果Edit内容为空,有两点:1)如果为空,则Exit,焦点指向Edit。 if Edit1.Text="" then begin Edit1.SetFocus; End;2)如果为空,Edit文本默认为0或1.这样才能运算。 Edit1.Text:='0'; 或 Edit1.Text:='1';
还没解决吗?上面的答案改动一下:1)如果为空,则Exit,焦点指向Edit。 if Trim(Edit1.Text)="" then begin Edit1.SetFocus; End; 2)如果为空,Edit文本默认为0或1.这样才能运算。 Edit1.Text:='0'; 或 Edit1.Text:='1';
if (!edit->Text.IsEmpty())
{
// +,-,*,/
}
try
......
except
eidt.clear;
end;
运行时应该不会有错
2.点运算时进行判断if trim(edit.text)='' then Exit;不计算
谢谢
except
end忽略一切错误
如果有错误是不可能运算的,try excepte end 不是办法,只能返回一个异常或不显示异常。如果Edit内容为空,有两点:1)如果为空,则Exit,焦点指向Edit。
if Edit1.Text="" then
begin
Edit1.SetFocus;
End;2)如果为空,Edit文本默认为0或1.这样才能运算。
Edit1.Text:='0'; 或
Edit1.Text:='1';
if Trim(Edit1.Text)="" then
begin
Edit1.SetFocus;
End; 2)如果为空,Edit文本默认为0或1.这样才能运算。
Edit1.Text:='0'; 或
Edit1.Text:='1';