Example:
Code: Select all
procedure MyProcedure(var MyString: string);
begin
MyString := MyString + 'add this';
end;
Thanks for aid.
Pivello
Code: Select all
procedure MyProcedure(var MyString: string);
begin
MyString := MyString + 'add this';
end;