Калькулятор Опции

[Catty]

я только вотъ начала осваивать делфи, нам задали сделать калькулятор, я почти доделала только вот такая проблемма : нужно разработать кнопку Backspace(удаляет последнюю цифру)
я написала так

Код

s:=Edit1.text;
Delete(s,length(s),1);

почему-то никак не реагирует...
и еще вопрос как можно сделать, что бы цифры вводились не с начала строки, а с конца(как в стандартном калкуляторе Windows)??

[Catty]

!!
спасибо!
а как начсет второго вопроса?
И еще вопрос:
Заголовок обработчина для события OnKeyDown
Допустим я хочу что бы при нажатии клавиши Backspace на клаве, срабатывала кнопка на калькуляторе. В книге я прочла что нужно сделать что то вроде этого, вот только не знаю, как перейти к определенной кнопке, что нуно поставить вместо ".........."

Код

procedure TForm1.Edit1Mouseup(Sender: TObject; var Key:word;Shift:TShiftState);
begin
if (Key=8) then
...............
end;

:flowers:

Сообщение отредактировано: Catty - 19.03.2005 18:14