哪位大侠解释一下stdcall的用途，比如以下定义的函数有什么特别的地方？

Question

function f1: Integer;
begin
  Result := 1;
  ShowMessage('f1')
end;function f2: Integer;
begin
  Result := 2;
  ShowMessage('f2')
end;function f3(A, B: Integer): Integer; pascal;
begin
  Result := A + B;
  ShowMessage('f3')
end;function f4(A, B: Integer): Integer; stdcall;
begin
  Result := A + B;
  ShowMessage('f4')
end;procedure TForm1.Button1Click(Sender: TObject);
begin
  f3(f1, f2);
  f4(f1, f2);
end;

Answer 1

stdcall方式的函数，入栈方式为右——》左，而Object Pascal的入栈方式为左——》右。如果你的程序需要和别的开发工具写的程序交互，或写DLL的话，应该用stdcall
safecall相当于在stdcall的基础上加了异常保护（try）