帮帮我

Question

var
  Form1: TForm1;
  RegName: ARRAY[0..100] of char;
  RegOrg: ARRAY[0..100] of char;
  TempBuffer: ARRAY[0..256] of char;
  RegVar: boolean;
  Executions, Days:integer;implementation{$R *.dfm}procedure ShowReg();
begin  MessageBox(0,'This example shows the use of Xprotector SDK-APIS in Delphi language','Xtreme-Protector',0);  RegVar := IsRegistered(); if (RegVar) then
   begin
      GetLicenseInfo(RegName, RegOrg);
      Days := DemoGetExecutionsToExpire();
      Executions := DemoGetDaysToExpire();      wsprintf(TempBuffer, 'Application Registered to: %s - %s, Days left = %i, Executions left = %i)', RegName, RegOrg, Days, Executions);*************//[i]运行到这里RegName显示"Too many actual parameters 该如何处理啊?  ****************[/i]
      MessageBox(0, TempBuffer,'REGISTERED version',0);    end  else
    MessageBox(0, 'This application needs a key to be executed','Xtreme-Protector',0);end;

Answer 1

wsprintf是個C++函數??你改過來了?? 將其聲明貼出來!

Answer 2

Delphi上到是有个format函数的，使用方法是format(formatstring,array of param).
具体例子类似format("%d,%s",[intParam,strParam]);
不知有无帮助。