[[seoane]]

Asi a primera vista, podriamos intentar algo como esto:

Código Delphi [-]
var
  ZChatOutput: procedure (lpcMsg: PChar; iType,iLoc: Integer; dwColor: DWORD); cdecl;
begin
  ZChatOutput:= Pointer($00429e60);
  // Ahora usamos ZChatOutput como cualquier otro procedure
  ZChatOutput( .....
end;