Исправить ошибку в процедуре калькулятора

@За · Регистрация: 07.09.2011

писал калькулятор все правильно,а тут ошибка.помогите исправить

Delphi

procedure TForm2.Button13Click(Sender:TObject);
begin Button13Click(sender) ;
 a:=strtofloat(edit1.Text);
cod:=1;
oper:=false;
 
end;

@Lord_Voodoo · 18.10.2011, 21:53

За, у тебя явно программа вылетает из-за переполнения стека... этот вызов функции явно лишний:

Delphi

1	Button13Click(sender) ;

@За · 18.10.2011, 21:56 **[ТС]**

вот фак то. Спасибо!

Добавлено через 1 минуту

Сообщение от Lord_Voodoo

За, у тебя явно программа вылетает из-за переполнения стека... этот вызов функции явно лишний:

Delphi

1	Button13Click(sender) ;

а что мне делать тогда,как сделать тогда?

@Arcor · 18.10.2011, 22:05

в таймере кликать заданное кол-во раз, просто процедура кликает до бесконечности вашу 3 кнопку

@За · 18.10.2011, 22:07 **[ТС]**

точно. что-то я туплю. спасибо

@Lord_Voodoo · 18.10.2011, 22:38

За, а что вам конкретно надо сделать, объясните... тогда смогу более предметно подсказать

@Arcor 5705 / 2296 / 466 Регистрация: 20.11.2009 Сообщений: 7,720 Записей в блоге: 1
	18.10.2011, 22:05	4
	в таймере кликать заданное кол-во раз, просто процедура кликает до бесконечности вашу 3 кнопку 0

@Lord_Voodoo Супер-модератор 8783 / 2536 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	18.10.2011, 22:38	6
	За, а что вам конкретно надо сделать, объясните... тогда смогу более предметно подсказать 0

Опции темы