Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.02.28;
Скачать: CL | DM;

Вниз

System form menu   Найти похожие ветки 

 
DJ X ©   (2002-02-08 16:15) [0]

Как показать системной меню формы по щелчку на каком-то элементе.


 
DJ X ©   (2002-02-08 16:49) [1]

Что - нету вариантов?!


 
Romkin ©   (2002-02-08 18:12) [2]

Нмчего лучше не придумал...

procedure TForm1.Button1Click(Sender: TObject);
begin
keybd_event(VK_MENU,0,0,0);
keybd_event(VK_SPACE,0,0,0);
keybd_event(VK_SPACE,0,KEYEVENTF_KEYUP,0);
keybd_event(VK_MENU,0,KEYEVENTF_KEYUP,0);
end;


 
Юрий Зотов ©   (2002-02-08 18:29) [3]

Этот код показывает системное меню формы в месте клика по ней. Но меню "нерабочее", код надо дополнить.


procedure TForm1.FormClick(Sender: TObject);
begin
with Mouse.CursorPos do
TrackPopupMenu(GetSystemMenu(Handle, False), 0, X, Y, 0, Handle, nil)
end;


 
BlankAlex ©   (2002-02-08 18:32) [4]

Почему не срабатывает
SendMessage(Self.Handle ,WM_SYSCOMMAND,SC_KEYMENU,0);


 
DJ X ©   (2002-02-10 17:18) [5]

Нужно, чтобы выводилось копия системного меню формы!



Страницы: 1 вся ветка

Текущий архив: 2002.02.28;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.007 c
3-90479
_Mihail_
2002-02-04 06:13
2002.02.28
Переход к записи по номеру


3-90464
Dinara
2002-01-31 00:15
2002.02.28
Поле Memo в Paradox


7-90688
Dimonf
2001-11-20 17:48
2002.02.28
Как написать прогу для посылки SMS с компьютера через мобильный телефон.


4-90714
Profi .
2001-12-30 16:27
2002.02.28
SHELLEXECUTE !!!! HELP !!!


3-90471
Alex_C
2002-02-02 18:00
2002.02.28
Помогите!!! Необходимо ДОБАВИТЬ СТОЛБЕЦ к существующей базе данных (мучаюсь третий день, задача вроде простая, а уперся и все тут)!