Расположить форму
HELP...
Мне нужно сделать... куда я кликну мышью на экране, появилась форма в том же месте нижний угол формы был у курсора... как контекстное меню
Мне нужно сделать... куда я кликну мышью на экране, появилась форма в том же месте нижний угол формы был у курсора... как контекстное меню
У мыши есть события, левый клик, правый итд , пишешь в событии нажатия, смотря как тебе надо при нажатии или после него код. Алгоритм такой:
Берём координаты мыши, создаём или перемещаем окно в нужное место на экране. Ещё будет лучше сделать проверку, может мышь была нажата по углам монитора т.е. выводить нужно не справа или лева, а наоборот. Показать форму метод Form1.show, перед этим поменять свойства Left и Right у формы, переместить вообщем туда где и курсор мыши. Form1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) вот эти X,Y тебе нужны. ПОмоему всё очень просто. Покрайней мере как я понял, у тебя есть форма, ты по ней щёлкаешь мышью в любом месте и появляется другая форма типа меню, допустим слева от курсора.
Берём координаты мыши, создаём или перемещаем окно в нужное место на экране. Ещё будет лучше сделать проверку, может мышь была нажата по углам монитора т.е. выводить нужно не справа или лева, а наоборот. Показать форму метод Form1.show, перед этим поменять свойства Left и Right у формы, переместить вообщем туда где и курсор мыши. Form1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) вот эти X,Y тебе нужны. ПОмоему всё очень просто. Покрайней мере как я понял, у тебя есть форма, ты по ней щёлкаешь мышью в любом месте и появляется другая форма типа меню, допустим слева от курсора.
Смотри АПИ getpixel - получишь координаты мыши в любой точке экрана.
А далее - Left и Right у формы приравниваешь к этому значению.
Не забуд про scalemode, вроде все :)
А далее - Left и Right у формы приравниваешь к этому значению.
Не забуд про scalemode, вроде все :)
[QUOTE=АлРАД]Смотри АПИ getpixel - получишь координаты мыши...[/QUOTE]
Ето не то API. Ты наверное хотел сказать GetCursorPos ?
Ето не то API. Ты наверное хотел сказать GetCursorPos ?
Цитата:
Ето не то API. Ты наверное хотел сказать GetCursorPos
Блин, точно! Спасибо за поправку, перепутал.
Правда это тоже АПИ, но для того, чтобы узнать цвет пиксела :)
Человек хотел, как японял, кликнув на экране отобразить там форму. А для этого придётся постараться. Надо поставить глобальный хук(ловушку) на "отлов кликов". Хуки ставятся из _стандартных_ dll, коих VB делать не умеет.