pascal(50分)

H

hug

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-04-05

• #1

void DoEvents()
{

static MSG msg;
if( :eekMessage(&msg,NULL,0,0,PM_NOREMOVE) ){
if (!AfxGetApp()->PumpMessage()) {
:ostQuitMessage(0);
return ;
}
}
}

再pascal里对应是什么？

 

W

wzwcn

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-04-05

• #2

我们不懂C语言啊

 

H

hug

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-04-06

• #3

dajia bang mang a

 

一

一点半

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-04-06

• #4

procedure DoEvents;
var
msg: TMsg;
begin
if(PeekMessage(msg,0,0,0,PM_NOREMOVE)) then
begin
//if (!AfxGetApp()->PumpMessage()) //这句不知道
PostQuitMessage(0);
exit;
end;
end;

 

B

boldfake

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-04-06

• #5

if (!AfxGetApp().PumpMessage())

 

H

hug

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-04-06

• #6

谢谢一点半

 

H

hug

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-04-06

• #7

同时也谢谢boldfake,

 

H

hug

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-04-06

• #8

AfxGetApp().PumpMessage在delphi里对应什么呢？

 

Y

ysai

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-04-06

• #9

Application.ProcessMessages;

 

T

TYZhang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-04-06

• #10

//TranslateMessage(Msg);
DispatchMessage(Msg);//分发消息吧

 

H

hug

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-04-06

• #11

谢谢大家，到底那个对呢？

 

H

hug

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-04-15

• #12

多人接受答案了。