[reyn90]

program Calk;

var ch1,ch2,ress,ch11,ch22,res:integer;
  //  ch11,ch22,res:real;
    cmdr:command;
    chislo1,chislo2:string;
begin
	ShowForm;
	ch1:=FormAddTextField('Первое число','1.0',50,TF_NUMERIC);
	ch2:=FormAddTextField('Второе число','2.0',50,TF_NUMERIC);
	cmdr:=createCommand('Решить',CM_SCREEN,1);
	addCommand(cmdr);
	repeat
	until GetClickedCommand = cmdr;

chislo1:=formGetText(ch1);
chislo2:=formGetText(ch2);

	ch11:=StringToInteger(chislo1);
  ch22:=StringToInteger(chislo2);

res:=ch11+ch22;
ress:=FormAddTextField('Результат:',IntegerToString(ress),50,TF_NUMERIC);
delay(5000);
end.

В пример складываю 10+2
Результатом является 0
почему неработает команда

res:=ch11+ch22;