Код:
procedure TForm1.BitBtn20Click(Sender: TObject);
begin
Edit1.Text:= Edit1.Text + (Sender as TBitButton).Caption;
end;
ошибка.
Вот этот пошел
Код:
procedure TForm1.BitBtn20Click(Sender: TObject);
begin
Edit1.Text:= Edit1.Text + (Sender as TBitBitbtn).Caption;
end;
И как мне это помогло. Расскажите полностью.