program Proba; var x: integer; begin showForm; x:=FormAddString('1'+chr(10)); x:=FormAddString('2'+chr(10)); x:=FormAddString('3'+chr(10)); delay(150000); end.