как написать в калькуляторе...

[Илюха]

как написать в калькуляторе режим деления??

[Stilet]

В каком калькуляторе, и что такое режим деления?

[Alex21]

/

p.s.:прошу прощения за миниатюрность сообщения.

[Илюха]

именно /. Например 4/2=2

[Квэнди]

И ? в чем вопрос ? напишите кооректно

[Omedus]

В поле Edit1 уже введено корректное число (надеюсь, что ты это сделал).
После этого делаешь кнопочку "деление":

procedure TForm1.Button1Click(Sender: TObject);
 begin
  f:=1; //Номер действия. К примеру: деление - 1, умножение 2 и др.
  k:=StrToFloat(Edit1.Text);
  Edit1.Text:='0';
 end;

После нажатия первое число будет записано в вещественной переменной k.
Дальше, в освободившееся поле ввода Edit1, вводим следущее корректное число.
Затем кнопочка "равно":

procedure TForm1.Button2Click(Sender: TObject);
begin
       if f=1 then
          begin
            l:=StrToFloat(Edit1.Text);
            if l<>0 then r:=k/l
            else showmessage('На ноль делить нельзя!');
            Edit1.Text:=FloatToStr(r);
       end;
end;

В принципе тут всё понятно) Результат деления будет в вещественной переменной r и так же он будет выведен в Edit1

[puporev]

Уж этих программ про калькулятор в Интернете . . .