|
#2
Button2009-09-15 10:31
谁晓得怎么回事呢
 |
程序代码：var
ck :integer;
ckk :double;
begin
ck := strtoint(edit5.Text) + strtoint(edit6.Text);
edit1.Text := inttostr(ck);
ck := strtoint(edit5.Text) - strtoint(edit6.Text);
edit2.Text := inttostr(ck);
ck := strtoint(edit5.Text) * strtoint(edit6.Text);
edit3.Text := inttostr(ck);
ckk := strtofloat(edit5.Text) div strtofloat(edit6.Text);
edit4.Text := floattostr(ck);
[错误] Unit1.pas(50): Operator not applicable to this operand typeck :integer;
ckk :double;
begin
ck := strtoint(edit5.Text) + strtoint(edit6.Text);
edit1.Text := inttostr(ck);
ck := strtoint(edit5.Text) - strtoint(edit6.Text);
edit2.Text := inttostr(ck);
ck := strtoint(edit5.Text) * strtoint(edit6.Text);
edit3.Text := inttostr(ck);
ckk := strtofloat(edit5.Text) div strtofloat(edit6.Text);
edit4.Text := floattostr(ck);
[致命错误] Project1.dpr(5): Could not compile used unit 'Unit1.pas' 这是怎么一回事？