瑞星卡卡安全论坛

兄弟我的一个作业，在DELPHI里，需要把已经建好的edit框里的内容strtofloat转换，然后让edit.text：=#0，但是程序运行到这里的时候，就出错了，提示，空白不是FLOAT类型，这个问题怎么解决啊？

var
    t_r :real;
begin
    try
        t_r := strtofloat(edit1.text);
    except
        t_r := 0;
    end;
    edit1.text := '';
end;

这样应该没问题吧。

如果程序需要再一次调用EDIT来输入数值，那EDIT。TEXT就是''了，系统就会提示''不是float格式啊！！