![]() |
Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.
![]() |
Client |
![]()
Сообщение
#1
|
Профи ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 865 Пол: Мужской Реальное имя: Вячеслав Репутация: ![]() ![]() ![]() |
Привет!
Я хочу из всплывающего меню (на скрине) изменять размер шрифта в мемо. procedure TForm1.PopupMenu1Change(Sender: TObject; Source: TMenuItem;Выдает ошибку сразу при запуске. Как тут быть? Эскизы прикрепленных изображений ![]() |
![]() ![]() |
Client |
![]()
Сообщение
#2
|
Профи ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 865 Пол: Мужской Реальное имя: Вячеслав Репутация: ![]() ![]() ![]() |
new_button := TButton.Create(Application);Добавил описание new_button:tbutton;При нажатии кнопки создаю, но ничего нету... Что не так? procedure TForm1.Button1Click(Sender: TObject); Добавлено через 13 мин. procedure TForm1.Button1Click(Sender: TObject);Получилось) А как добавить кнопку на панель инструментов? Это же не обычная кнопка? И что значит new_button.Parent:=Self? |
![]() ![]() |
![]() |
Текстовая версия | 11.07.2025 0:03 |