
16.08.2008, 03:24
|
|
Постоянный
Регистрация: 31.01.2008
Сообщений: 643
Провел на форуме: 6128108
Репутация:
445
|
|
И так я хочу создать калькулятор
Задал кнопке событие чтобы оно писало в мое окошечко где все вводиться
Код:
procedure TForm1.but1Click(Sender: TObject);
begin
txtN.Text:='1';
end;
Так он мне выводит в строчку одну единицу а я хочу чтобы было столько единиц скока я нажал на кнопку
Собственно как изменить код чтобы так и было ( как я пожелаю )
И вот я еще с чем столкнулся
Написал событие
Код:
procedure TForm1.Button1Click(Sender: TObject);
begin
if rad1.Checked:=True then
begin
memo1.Lines.Add(txtA.Text);
txtB.Text(txtA.Text);
txtC.Text(txtA.Text);
end;
end;
Так оно ругаеться

Последний раз редактировалось diznt; 16.08.2008 в 06:22..
|
|
|