Delphi怎样判断除数为0

这个问题问的, 让给楼下回答...

引用
Delphi怎样判断除数为0

不太明白？是直接判断 if 除数=0 then 吗

恩~！因为我是学JAVA的，Delphi和JAVA不一样~！

num1:=strtofloat(Edit1.Text);
num2:=strtofloat(Edit2.Text);
if num2==0 then
begin
Label4.Caption:='除数不能为0';
end
else
begin
num3:=num1/num2;

Label4.Caption:=floattostr(num3);
end;

红色的地方怎么判断？

if num2 = 0 then

delphi 用 = 表示相等

:= 用于赋值

解决了~！

谢谢了

delphi判断相等时用 = 赋值是用 :=
java == =

引用
恩~！因为我是学JAVA的，Delphi和JAVA不一样~！

num1:=strtofloat(Edit1.Text);
num2:=strtofloat(Edit2.Text);
ifnum2==0 then
begin
Label4.Caption:='除数不能为0';

Python中的Unicode在Delphi如何还原成Gb2312？

已知Python 中：
s = unicode("测试", "gb2312")
s = u'\u6d4b\u8bd5'
print s
测试

在Delphi里面如何将\u6d4b\u8bd5这样的还原成Gb2312的汉字呢？
找到个方法
......

delphi Ctrl+左键无法查看 windows.pas 怎么办

我安装的是企业版。。。
我问下， CTRL+左键能查看 windows.pas 吗？
就是接口里的windows。

当然可以,CTRL+左键点击Interface部分的Windows就可以了

啥啥企业版？去安装目录看看lib文件夹下有没� ......

delphi編寫自動更新程序

由于客戶端有的文件經常更新（遠程的，不是局域網），
所以想寫個自動更新的程序。
看網上的方法資料，知道些方法，但不知道具體怎么寫。
......

Delphi中数据库查询的疑惑

昨晚在Delphi数据库查询中遇到了一个疑惑。代码如下：
procedure TFormSearchAchievement.ComboBoxXYChange(Sender: TObject);
var
XY : string;
begin
XY := comboboxxy.Items[comboboxx ......

delphi绘坐标图