Форум: "Начинающим";
Текущий архив: 2007.03.11;
Скачать: [xml.tar.bz2];
ВнизPopupMenu Найти похожие ветки
← →
FAskerQ © (2007-02-17 10:30) [0]Вызываю PopupMenu по нажатию кнопки, подскажите пожалуйста как реализовать примерно следующее
if PopupMenu.Появилось then
// Сделать что то
else
Exit;
Спасибо
← →
Рамиль © (2007-02-17 11:17) [1]Чет я не понял, раз вызываешь, то наверняка появилось, если оштибка не произошла.
← →
FAskerQ © (2007-02-17 11:25) [2]
> Рамиль © (17.02.07 11:17) [1]
Пытаюсь вызвать, иногда получаеться, иногда нет
← →
RASkov (2007-02-17 12:32) [3]> Вызываю PopupMenu по нажатию кнопки...
> иногда получаеться, иногда нет
Покажи как вызываешь. Т.е покажи "нажатие кнопки".
← →
FAskerQ © (2007-02-17 12:43) [4]
> RASkov (17.02.07 12:32) [3]
Я просто не могу вьехать как например сделатьif PopupMenu1.Popup(Mouse.CursorPos.X, Mouse.CursorPos.Y) then
...
else
...
как проверить появилось PopupMenu1 после нажатия кнопки или нет, визуально это понятно вижу или не вижу, мне нужен результат false или true
← →
RASkov (2007-02-17 12:51) [5]> [4] FAskerQ © (17.02.07 12:43)
Ну а почему оно может не появиться?
делай так:try
PopupMenu1.Popup(Mouse.CursorPos.X, Mouse.CursorPos.Y);
except
ShowMessage("Чёта попап не вылез");
end;
или координаты попапа получаются "за экраном", может их стоит проверять?
> if PopupMenu1.Popup(Mouse.CursorPos.X, Mouse.CursorPos.Y) then
Popup - это вообщето процедура, и она ничего не возврощает.
← →
RASkov (2007-02-17 12:58) [6]> [4] FAskerQ © (17.02.07 12:43)
Может так попробуй
if TrackPopupMenu(PopupMenu1.Handle, 0, Mouse.CursorPos.X, Mouse.CursorPos.Y, 0, Handle, nil)
then ShowMessage("Ура появилось") else ShowMessage("не появилось");
← →
FAskerQ © (2007-02-17 13:32) [7]to RASkov
Спасибо БОЛЬШОЕ за участие, всё получилось, respect
← →
RASkov (2007-02-17 13:35) [8]> [7] FAskerQ © (17.02.07 13:32)
И что все-таки было? Т.е. из-за чего не вылазил попап?
← →
FAskerQ © (2007-02-17 13:43) [9]
> RASkov (17.02.07 13:35) [8]
Из за глупости моей не проходимой и лени, на самом деле код очень большой, долго объяснять.
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2007.03.11;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.042 c