新手问题

Question

请问以下的vb6代码，用delphi该怎么写俄？
对那个AddressOf 晕晕的ret = RCA_submitDurableImageOrderBstr(iod, xmlImageOrder, AddressOf orderStatusCallback)Public Function orderStatusCallback(ByVal orderStatus As String) As Long
    CurrentOrderStatus = orderStatus
    MainForm.LargeText.Text = orderStatus
    sFlag = "1"
End Function

Answer 1

RCA_submitDurableImageOrderBstr(iod, xmlImageOrder,@orderStatusCallback);
Function orderStatusCallback(orderStatus:String) :Integer;
begin
CurrentOrderStatus:= orderStatus;
MainForm.LargeText.Text:= orderStatus;
sFlag:='1';
end;我按照这个做了
但编译不过去
错误：Variable required