у меня код такой при нажимание создается новые edit ы
Код:
begin
i:=i+1;
Ed:= TEdit.Create(Self);
Ed.Parent:= Form1;
Ed.Top:=20*i;
ed.text:='5,0';//+IntToStr(i);
Ed.Name:='Edit'+IntToStr(i);
end;
как умножит с друг другом и вывести в label1
Админ: Не забываем про использование тегов!