delphi菜鸟问题(100分)

A

Andy.chen

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-01-09

• #1

1、怎样float类型的值小数四舍五入化整？怎样去小数化整？怎样四舍五入保留两位小数？
2、在一个MDIChildform1的button中写上
mdiChildform1.close;
运行，关闭老是跑出异常，怎么回事？

 

A

Andy.chen

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-01-09

• #2

第二个问题，
在非Mdi子窗体中也存在？？？

谢谢大家！！！~

 

C

cjsam

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-01-09

• #3

1。trunc(x),取整
round(x)，4舍5入
2。用你这个子窗体的关闭事件来关闭。
procedure mdiChildform1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Action:=cafree;
end;

 

A

Andy.chen

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-01-09

• #4

1、怎样四舍五入保留两位小数？
2、为什么会这样？没有错呀

 

C

cjsam

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-01-09

• #5

保留两位小数可能要你自己判断了来做了。
非Mdi子窗体不存在的。在子窗体中

If a form is an MDI child form, and its BorderIcons property is biMinimize, then the default Action is caMinimize. If a MDI child form does not have these settings, the default Action is caNone, meaning that nothing happens when the user attempts to close the form.

If a form is an SDI child form, Action defaults to caHide.

To close and form and free it in an OnClose event, set Action to caFree.

 

L

lichaogang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-01-09

• #6

1.y=round(x*100)/100

 

X

XWHope

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-01-09

• #7

怎样四舍五入保留两位小数？
value:=round(value*100)/100

 

A

Andy.chen

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-01-09

• #8

谢谢~~~
当我开了多个MID子窗体时，怎样取得当前激活的子窗体对象？？
我是不是较贪心，呵呵...

 

M

miaofeng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-01-09

• #9

通过主窗体的ActiveMDIChild属性得到当前激活的子窗口。

 

A

Andy.chen

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-01-09

• #10

谢谢~~

 

B

boyear

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-01-09

• #11

1、用formatfloat()函数，自己试试！！

2、把你MDIChildform1上的ado或其它控件Free，或者直接使MDIChildform1.visable:=false;