[Pyro]

http://www.delphisources.ru/forum/sh...ad.php?t=17828
у меня это бы выглядело так

PHP код:

var
  p: TFoo;
begin
 p := TFoo.create(FormMain, 'Caption');
 p.let(p.get + '111'); // caption = 'FormMain111'
end;