菜鸟设计一个计算器!程序出错了,请高手指点。
菜鸟的代码(一段): var
result:real;
op:char;
first:boolean;
procedure Addch(ch:char);
begin
if first
then begin
Form1.EditValue.Text:=ch;
first:=false;
end;
else Form1.EditValue.Text := Form1.EditValue.Text + ch; //这里显示出错,可是错在哪里啊?
Form1.EditExp.Text := Form1.EditExp.Text + ch;
请高手指点。