Кнопки и событие Onclick Опции

[Вадян!]

Народ помогите ??? В программировании новичёк, пытаюсь освоить
Дельфи так вроде не сложно, но в одном месте стопорнулся, если кто
знает подскажите
как зделать пример
Button1:=(1);
Bytton2:=(+);
Button3:=(2);
Button4:=(=);
Edit1:=(3);
Как мне сделать чтобы путём реакции (onClick) на эти кнопки в Edite
высчитаволась сумма?!
На F1 не посылайте пожалуста я там не один раз побывал и ничего такого
не нашёл, также просмотрел не одну документацию по дельфи-результат
оказался тот же что и с помощью (F1) !!!!!
Заранее спасибочки!!!!

[klem4]

можно так:

Код

procedure TForm1.Button1Click(Sender: TObject);
var i:integer;
begin
  i:=StrToInt(Edit1.text)+ StrToInt(Edit2.text);
  Edit3.text:=IntToStr(i);
end;

вообще не очень понятно, что ты хочешь сделать.

[Guest]

Я хочу сделать калькулятор, не буду же я просить написать мне весь калькулятор, того что я узнаю из этого вопроса думаю будет больше чем достаточно!!! Вот

[Вадян!]

Я думаю твой ответ не совсем подходит мне
Я хочу присвоить кнопкам цифровые значения, а ты помойму показываеш
как вывести текстовое сообщение, проще говоря мне нужно уравнение!!! :p2:
P.S. Да , спасибо за внимание !!!!!!!

[klem4]

да, то что я написал, это не то.

[Вадян!]

Так ты поможеш мне с моими трудностями???

[klem4]

ну можно так :

В событиях каждой кнопки считывать Edit1.text, присвоить численное значение переменной i c помощью StrToInt , потом очистить строку Edit1, и еще раз запросить ввод и соответственно кнопке проделать мат операцию

допустим кнопка '+'
Вводить число a;
i:=a;
Вводим b;
i:=a+b;
Выводим рузультат.

Сообщение отредактировано: klem4 - 13.03.2005 21:29

[volvo]

Так ты поможеш мне с моими трудностями???

Помочь-то можно, но вот только что значит "помочь"? Написать для тебя готовую программу? Я не думаю, что от этого у тебя трудностей поубавится. Ты сам-то ее писать начинал? Или просто решил, что это слишком сложно?

[Вадян!]

Я не просил писать мне прогу, всего лишь код 3х её компонентов, и выше я говорил что новичок, думаю если быть добрым к окружающим, то меня можно понять!!!
:fire:

Добавлено: (13.03.05 21:50)

ну можно так :

В событиях каждой кнопки считывать Edit1.text, присвоить численное значение переменной i c помощью StrToInt , потом очистить строку Edit1, и еще раз запросить ввод и соответственно кнопке проделать мат операцию

Спасибо вроде началось получаться!!! :thanks:

[volvo]

Я не просил писать мне прогу, всего лишь код 3х её компонентов, и выше я говорил что новичок, думаю если быть добрым к окружающим, то меня можно понять!!!

"Всего лишь"? Да у калькулятора вообще все компоненты одинаковые !!! Под копирку пишутся.

Кстати, будь поспокойней.
В аттаче - рабочий пример программы для 3-х кнопок (1, 2, 3) и двух действий (+ и -)... Я думаю, это поможет разобраться что к чему... (Проверялось на Delphi 6)

[Вадян!]

Спасибо за пример, теперь стало намного легче, а то у меня с выше указанным ответом на мой вопрос многое не сросталось.
:D
P.S. Не обращай внимание на те недобрые слова, с кем не бывает <Я погорячился>!!!!!!!!! I'am sorry!!!!!!!