Variable RESULT contain the result of the previously called function

[mihey78]

procedure TForm1.Button1Click(Sender: TObject);
var i:integer;
begin
 form1.caption:='test '+inttostr(12345);
 memo1.Text:=txt;
end;
//
function TForm1.txt:string;
begin
result:=result;
end;
//
Why does the variable RESULT contain the result of the previously called function inttostr?

[Thaddy]

Because the result variable or register is not cleaned up, so the right - old result - is assigned to the left - new - result.
This is by accident and depends on platform and optimizations.
You can not rely on this behavior. Any in between calls would possibly trash the result anyway.

Anyway it of course is bad code.