Цитата:
|
Сообщение от EvilRussian
Тогда радуйся! 
Поздравляю!
З.Ы. И скромно так: поста-а-а-авь плюсик ^_^ (весы справа сверху) |
Цитата:
|
Сообщение от kalinochkind
Лучше так:
Код:
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
Edit1.Text:=Edit1.Text+tcontrol(sender).caption;
end;
И на всех кнопках делаешь обработчик onclick - BitBtn1Click |
попробую так тоже) |