uses
SysUtils,
Classes;
{$R *.res}
function add(Value1:integer;value2:integer):integer;stdcall;
begin
Result:=Value1+value2;
end;
function subtract(Value1:integer;value2:integer)
我有這樣的代碼: type
TMyClass = class
private
procedure SetKeyValue(const Key: WideString; Value: Widestring);
function GetKeyValue(const Key: WideString): WideString;
public