美国三大牛仔裤品牌:请教:Delphi中过程的声明和调用

来源:百度文库 编辑:中科新闻网 时间:2024/05/10 07:48:04
像在VB中,声明一个TempCourse过程,然后用Call语句调用,请问在Delphi中如何实现?

Private Sub Command1_Click()
Call TempCourse
End Sub

Private Sub TempCourse()

End Sub

Procedure Command1_click;
Begin
TempCourse;
End;

第二种调用方法
var
P: Pointer;
begin
P := @TempCourse;
asm
pushad;
call p;
popad;
end;
end.