powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Открытие формы в указанной позиции?
30 сообщений из 30, показаны все 2 страниц
Открытие формы в указанной позиции?
    #32265443
Dimaris
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Подскажите неучу,

можно ли открыть форму, указав при этом ее положение относительно курсора мыши? Все что нашел - AutoCenter (Yes/No)...

Заранее спасибо!
...
Рейтинг: 0 / 0
Открытие формы в указанной позиции?
    #32265470
Фотография Senin Viktor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Можно, только надо ручками прогить: берем позицию мыши - передвигаем форму.
...
Рейтинг: 0 / 0
Открытие формы в указанной позиции?
    #32265484
Dimaris
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2 Senin Viktor:

А как передвигать-то?

На самом деле, передвигать не нужно, нужно открыть форму в заданном месте.
Никаких Properties для формы касательно ее положения при открытии не нашел, окромя AutoCenter - но это не катит.....
...
Рейтинг: 0 / 0
Открытие формы в указанной позиции?
    #32265490
Фотография Senin Viktor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
>А как передвигать-то?

docmd.MoveSize ...
или Forms!NameForm.Move ... (for Access 2002)
...
Рейтинг: 0 / 0
Открытие формы в указанной позиции?
    #32265518
Dimaris
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2 Senin Viktor

Может подскажешь, где текущие координаты курсора хранятся?

Очччень надо...

Спасибо.
...
Рейтинг: 0 / 0
Открытие формы в указанной позиции?
    #32265531
Фотография Лифчик
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А очень нужно двигать всякий раз относительно мышки? Если нужно просто где-то разместить - то в режиме дизайнирования определи положение и спаси. Тогда плюс-минус лапоть она там и будет открываться, если автоцентр убрать
...
Рейтинг: 0 / 0
Открытие формы в указанной позиции?
    #32265536
Dimaris
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2 Лифчик:

нужно, чтобы форма открывалась точно ниже и правее курсора...
...
Рейтинг: 0 / 0
Открытие формы в указанной позиции?
    #32265550
Фотография Лифчик
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Тогда событие MouseMove даст тебе текущие координаты мыши, а DoCmd.MoveSize X,Y -подвинет открытую форму в нужную позицию (сам такого не делал, но должно работать)
...
Рейтинг: 0 / 0
Открытие формы в указанной позиции?
    #32265553
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Модератор форума
Надо искать API. Все, что предложено до сих пор, - не катит. Например, MouseMove работает только при условии, что мышь находится на фоне формы.
...
Рейтинг: 0 / 0
Открытие формы в указанной позиции?
    #32265579
Фотография SergeySV
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А че там искать:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
Public Type POINTAPI
  x As Long
  y As Long
End Type

Private Declare Function GetCursorPos Lib  "user32"  (lpPoint As POINTAPI) As Long

Dim CurPos As POINTAPI

' получаем новые коорд.
GetCursorPos CurPos
' соотв. имеем CurPos.x и CurPos.y


только надо эти абсолютные коорд. переконверт. в Access_формовские
...
Рейтинг: 0 / 0
Открытие формы в указанной позиции?
    #32265586
Фотография Лифчик
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Мне бы эта фенечка была бы интересна в таком контексте: кликаешь по контролу, а ниже и правее открывается формочка для заполнения.
...
Рейтинг: 0 / 0
Открытие формы в указанной позиции?
    #32265644
Фотография Senin Viktor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2Саныч
> Все, что предложено до сих пор, - не катит. Например, MouseMove работает только при условии, что мышь находится на фоне формы.

Окстись, Саныч :)
Все работает. Хоть курсор убрать к едрене-фене за экран. Проверено на событие Load.
...
Рейтинг: 0 / 0
Открытие формы в указанной позиции?
    #32265857
Фотография Senin Viktor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Перечитал с утра по-раньше:
оказываеться, на Саныча наехал :) без причины

MouseMove - работает когда курсор на форме, а форму двигать можно при любой ситуации. Но все-равно: все будет работать: когда щелкаем на некой кнопке, то курсор-то на форме, MouseMove сработает - координату подсчитаються (а можно и через API - тогда этот маусмуве нафиг не нужен) - форома откроеться и передвиниться в нужную позицию. Так что все должно работать.
...
Рейтинг: 0 / 0
Открытие формы в указанной позиции?
    #32265867
Фотография Geo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2Cенин Виктор
Только если нажимать на кнопку, то курсор будет не на форме, а на самой кнопке.
Кроме того, судя по условию задачи, форма д. открываться не по нажатию на кнопку (иначе не надо было бы искать позицию курсора), а по какому-нибудь контекстному меню. Так что, апи, наверное :)
...
Рейтинг: 0 / 0
Открытие формы в указанной позиции?
    #32265887
Фотография Senin Viktor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2Geo
>Только если нажимать на кнопку, то курсор будет не на форме, а на самой кнопке.

А что на кнопке событие MouseMove отменили?
Хотя вариант с API мне лично больше нравиться.
...
Рейтинг: 0 / 0
Открытие формы в указанной позиции?
    #32265892
Фотография Geo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Дык и я про то же - на форму 1 обработчик повесить не получится, надо будет на все кнопычки, поля и пр.
...
Рейтинг: 0 / 0
Открытие формы в указанной позиции?
    #32265903
Фотография Senin Viktor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2Geo

И я про тоже. Хотя гадание дело не благодарное (цыгыней в пример не приводить! :)
Надо Dimaris подробней расписать че он хочет. Но по-любому: способов решения - тьма.
...
Рейтинг: 0 / 0
Открытие формы в указанной позиции?
    #32266195
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Модератор форума
> Окстись, Саныч :)
> оказываеться, на Саныча наехал :) без причины

Чего ж это, я зря окщался?.. :^)))
...
Рейтинг: 0 / 0
Открытие формы в указанной позиции?
    #32266316
Dimaris
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Всем спасибо, получилось через АПИ (THNX SergeySV).

А вообще, задача стояла такая:

есть существующая таблица tblBudgets, где в полях указан год, страна, продукт, количество.

Для работы юзеру неудобно использовать эту таблицу, т.к. надо видеть все страны одновременно ---> Pivot Query.

Но пивот-то редактировать низзя! (или можно?)
Поэтому по клику на соотв. ячейке открывается формочка с вводом этого значения, которая пишет его непосредственно в tblBudgets и обновляет форму.

Может можно было сделать лучше, но работает - и славно..
...
Рейтинг: 0 / 0
Открытие формы в указанной позиции?
    #32266332
Фотография Senin Viktor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2Dimaris
>Но пивот-то редактировать низзя! (или можно?)

Можно, только надо: adp (MS SQL)+INSTED OF триггер на "перекрестный" запрос (в итоге получишь как сейчас у тебя и реализовано)

2Cаныч
>Чего ж это, я зря окщался?.. :^)))

Зря все-равно она крутиться :)
...
Рейтинг: 0 / 0
Открытие формы в указанной позиции?
    #32303737
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
только надо эти абсолютные коорд. переконверт. в Access_формовские
Подскажите, пожалуйста, как выглядит этот формат???
...
Рейтинг: 0 / 0
Открытие формы в указанной позиции?
    #32303742
Фотография Geo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2VsevolodV
Твип (twips). Единица измерения, равная 1/20 пункта или 1/1440 дюйма. В одном сантиметре содержится 567 твипов.

Из справки. Получено посредством последовательных нажатий в access:
Alt-F11
t
o
p
F1
...
Рейтинг: 0 / 0
Открытие формы в указанной позиции?
    #32303747
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А как быть, если мне нужно открыть форму не под указателем мыши, а под контролом на форме??? Т.е я имею ввиду, что где взять координаты контрола в окне аксеса, а не на форме? Да и возможно ли такое? :)
...
Рейтинг: 0 / 0
Открытие формы в указанной позиции?
    #32303748
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Модератор форума
Так добавь координаты формы к координатам контрола относительно формы.
...
Рейтинг: 0 / 0
Открытие формы в указанной позиции?
    #32303752
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А где взять координаты формы?
...
Рейтинг: 0 / 0
Открытие формы в указанной позиции?
    #32303753
Фотография Geo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Forms(0).WindowTop+Forms(0)(0).Top
(для msa 200x)

Опять же, из F1...
...
Рейтинг: 0 / 0
Открытие формы в указанной позиции?
    #32303755
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А2000
Есть только WindowHeight и WindowWidth
...
Рейтинг: 0 / 0
Открытие формы в указанной позиции?
    #32303756
Фотография Geo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Нажми Ctrl-g, напиши ?forms(0).WindowsTop (не важно, что после точки он не показывается) и запусти. У меня (правда в 02) - работает.
...
Рейтинг: 0 / 0
Открытие формы в указанной позиции?
    #32303757
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ошибка: Application-defined or object-defined error
...
Рейтинг: 0 / 0
Открытие формы в указанной позиции?
    #32303758
Фотография Geo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
...
Рейтинг: 0 / 0
30 сообщений из 30, показаны все 2 страниц
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Открытие формы в указанной позиции?
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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