Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2008.04.06;
Скачать: [xml.tar.bz2];

Вниз

Как определить куда выпадет popup   Найти похожие ветки 

 
Strate   (2008-03-14 14:28) [0]

Доброго времени суток.

Вопрос следующий: как определить куда выпадет popup: вверх или вниз?

Хочу сделать следующее: при нажатии на кнопку вызывать popup, примерно по такому принципу:

popupmenu.popup(button.left, button.top+button.height);

соответственно если оно развернётся наверх, то надо бы делать так:

popupmenu.popup(button.left, button.top);

чтобы менюшка на  кнопку не налезала.

Как это можно определить?


 
АИК   (2008-03-14 14:42) [1]

procedure TForm1.Button1MouseDown(Sender: TObject; Button: TMouseButton;
 Shift: TShiftState; X, Y: Integer);
begin
If Button=mbRight then
 PopupMenu1.Popup( form1.Left+Button1.Left+Button1.Width,
                   form1.Top+Button1.Top+Button1.Height);
end;


если я правильно понял вопрос


 
clickmaker ©   (2008-03-14 15:11) [2]

GetMenuItemRect * GetMenuItemCount ?



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

Форум: "Начинающим";
Текущий архив: 2008.04.06;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.013 c
2-1205225687
031178
2008-03-11 11:54
2008.04.06
DBGrid


4-1185472181
Dib@zol
2007-07-26 21:49
2008.04.06
Область под окном


2-1205233899
Washington
2008-03-11 14:11
2008.04.06
DrawText


15-1203697665
kernel
2008-02-22 19:27
2008.04.06
record => PHP


2-1204969060
Galiaf
2008-03-08 12:37
2008.04.06
Проблема с BlockRead и динамическим массивом





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский