菜鸟刚学delphi,想问这两句话是什么意思？？？ (30分)

W

wanglongb

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-03-29

• #1

一：这句话起什么作用？？
t := gettickcount;
while (gettickcount - t < 1000) do
begin
.......
end;
二：下面的常数定义什么意思，为什么带$和#？？
const
IHead = $23534A57;
FunAlreadyReceive = #0;

 

H

Highpeak

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-03-29

• #2

gettickcount ：
the return value is the number of milliseconds that have elapsed since Windows was started.
二
16进制数表示。
char类型

 

G

gjdemj2000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-03-29

• #3

一　只要gettickcount - t 小于1000就执行下面begin 和eng间语句
二　$代表16进制数表示。
　＃是字符 char类型

 

W

wanglongb

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-03-30

• #4

谢谢大家，这句话我还是不知道起什么作用？？
t := gettickcount;
while (gettickcount - t < 1000) do
begin
application.ProcessMessages;
end;

 

H

Highpeak

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-03-30

• #5

gettickcount是获取机器开机以来的的时间，毫秒为单位。
你的代码等价与：

t := gettickcount;
{
这里应该还有代码。
}
t1:=gettickcount;//重新获取时间。
while (t1 - t < 1000) do
begin
application.ProcessMessages
//退出主程序。
end