[Pyro]

первое что бросается в глаза

PHP код:

begin
label1.Caption := inttostr(function test.x(5));
end; 


PHP код:

var
  testobj: test;
begin
  testobj := test.create(10);
  label1.Caption := inttostr(testobj.x(20));
  testobj.free;
end