Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Can someone help translate a function call to a Delphi dll
Message
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Can someone help translate a function call to a Delphi dll
Divers
Thread ID:
00739174
Message ID:
00739174
Vues:
91
Hi,
Below are two functions of a dll that I need to call. Can anyone help me translate them into Foxpro Declare statements. I don't know what to do with the Var lines, or the arrays. And what's a PChar data type?
Thanks,
Allen

First function:

function Authorize_Trans(
Store_No:String;
Trans_No:String;
Cust_Data:String;
Trans_Amt:String;
Var Response_Code1:Integer;
Var Response_Code2:Integer;
Var Ret_Msg:TChar1;
Var Server_Msg:TChar2
):integer

Where TChar1 and TChar2 are:
TChar1=Array[0..1024] of char;
TChar2=Array[0..400] of char;

Second function:

function Submit_Trans(
Store_No:Pchar;
Trans_No:Pchar;
Auth_Code:Pchar;
Trans_Amt:Pchar;
Var A:Integer;
Var B:Integer;
Var Ret_Msg:TChar1
):integer
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform