ReSQL.ru
     
powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Как создать меню
2 сообщений из 2, страница 1 из 1
Как создать меню
    #32012961
ivan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ivan
Гость
Люди кто знает как сделать менюшку внизу, наподобие виндового "ПУСКа"
...
Рейтинг: 0 / 0
28.08.2001, 05:31
| Ответить | Цитировать | Написать  
Период между сообщениями больше года.
Как создать меню
    #32231782
NightSpider
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
NightSpider
Участник
Может не самый лучший вариант, но можно сделать так:

Код: plaintext
1.
2.
3.
4.
5.
 procedure  TForm1.Button1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
 begin 
PopupMenu1.Popup(Form1.Left+Button1.Left,Form1.Top+ Button1.Top- 120 );
 //120 - высота самого меню 
 end ;

PopupMenu1 создается отдельно.

Модератор: Пользуйтесь тегом (кнопкой) SRC для оформления кода, пожалуйста.
...
Рейтинг: 0 / 0
09.08.2003, 07:57
| Ответить | Цитировать | Написать  
2 сообщений из 2, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Как создать меню
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]