20除以5等多少?请教delphi中数值之间相除的命令(50分)

L

laohe

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-16

• #1

我用 20/5=出错

用 20 div 5=不准确

请教运用过四则运算的朋友

 

C

cnkk

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-16

• #2

什么意思？

 

T

tseug

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-16

• #3

你变量类型有问题吧？

 

R

Rik

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-16

• #4

20/5不会有错的啊

 

B

bigroom

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-16

• #5

不是往整形变量里头放20/5吧？
20 div 5如果放到浮点形变量里头，就会变成带有一大串小数的值，也正常，本来就是这样的。

 

L

laohe

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-16

• #6

出来了，我主要是想让panle中的图相居中,所有参与者有分，谢谢

procedure TFormindex.Panel2Resize(Sender: TObject);
var a,e,d,c:integer;
begin
d:=Panel2.Width;
c:=Panel2.Height;
a:=Panelindex.Height;
e:=Panelindex.Width;
Panelindex.Top:=(c-a)div 2;
Panelindex.Left:=(d-e)div 2
end;