Как получить размер окна и клиентской области?

[gudzon]

Hi
Никак не соображу как решить следующую задачку. Надо при запуске отображать форму строго в заданных координатах главного окна аксапты. Но для этого нужно знать разрешение экрана (ну или размеры главного окна) при запуске. Как это узнать? Запранее спасибо.

[George Nordic]

Приветствую, gudzon!
Ну, вот уж от кого не ожидал!
Перекрой ты просто порты, что б не ломились.

Я в класс WinAPI добавил новый метод:

PHP код:

client static container getWindowRect_FLX(int _hWnd)
{
    #define.structSize(36)

    DLL         _winApiDLL  = new DLL('USER32');
    DLLFunction _getWndRect = new DLLFunction(_winApiDLL, 'GetWindowRect');
    Binary      struct      = new Binary(#structSize);
    int         x1,x2,y1,y2;
    container   ret = connull();
    ;

    _getWndRect.returns(ExtTypes::DWord);
    _getWndRect.arg(ExtTypes::DWord, ExtTypes::Pointer);

    //struct.dWord (0, #structSize);

    if (_getWndRect.call(_hWnd, struct))
    {
        x1 = struct.dWord(0);
        x2 = struct.dWord(4);
        y1 = struct.dWord(8);
        y2 = struct.dWord(12);

        ret += x1;
        ret += x2;
        ret += y1;
        ret += y2;
    }
    return ret;
} 


И давайте оставим тему об "окошке в правом нижнем углу", а? Спрашивай - ответим.

С Уважением,
Георгий

[belugin]

PHP код:

container getClientRect(hwnd _window)
{
    Binary      data            = new Binary(32);
    DLL         _winApiDLL      = new DLL('user32');
    DLLFunction fun  = new DLLFunction(_winApiDLL, 'GetClientRect');

    fun.returns(ExtTypes::DWord);

    fun.arg(ExtTypes::DWord, ExtTypes::Pointer);
    fun.call(_window, data);

    return [data.dWord(0), data.dWord(4), data.dWord(8), data.dWord(12)];
}

...
hWnd MdiClient = WinAPI::FindWindowEx(infolog.hWnd(), 0, 'MDIClient', '');
getClientRect(MdiClient); 


[George Nordic]

Максим! Включи галку "Отключить смайлики в сообщении"!

С Уважением,
Георгий

[gudzon]

2 George Nordic
Спасибо. Я поиском пользовался. Честно.

[gudzon]

Цитата:

Изначально опубликовано Zabr


Что-то мне подсказывает, что первоначальная задача была - скрыть окошко с лицензией. Если так - то для этого уже давно найден более простой способ, без программирования.

Да нет. Просто нужно отображать форму для внутренней рассылки сообщений. А как скрыть лицензию? Можно ссылочку?

[George Nordic]

Да не за что. Максиму тоже спасибо сказать не забудь!

Максим!
Посмотри:

PHP код:

hWnd MdiClient = WinAPI::FindWindowEx(infolog.hWnd(), 0, 'MDIClient', ''); 


Мне кажется, что можно просто использовать infolog.hWnd()? Или возможны состояния, когда они будут различаться?

С Уважением,
Георгий

[belugin]

PHP код:

container getClientRect(hwnd _window)
{
    Binary      data            = new Binary(32);
    DLL         _winApiDLL      = new DLL('user32');
    DLLFunction fun  = new DLLFunction(_winApiDLL, 'GetClientRect');

    fun.returns(ExtTypes::DWord);

    fun.arg(ExtTypes::DWord, ExtTypes::Pointer);
    fun.call(_window, data);

    return [data.dWord(0), data.dWord(4), data.dWord(8), data.dWord(12)];
} 


[belugin]

При придоченных окнах у меня различается

PHP код:

static void TestJob(Args _args)
{
    hWnd MdiClient = WinAPI::FindWindowEx(infolog.hWnd(), 0, 'MDIClient', '');
container getClientRect(hwnd _window)
{
    Binary      data            = new Binary(32);
    DLL         _winApiDLL      = new DLL('user32');
    DLLFunction fun  = new DLLFunction(_winApiDLL, 'GetClientRect');

    fun.returns(ExtTypes::DWord);

    fun.arg(ExtTypes::DWord, ExtTypes::Pointer);
    fun.call(_window, data);

    return [data.dWord(0), data.dWord(4), data.dWord(8), data.dWord(12)];
}
    ;
    info(con2str(getClientRect(infolog.hWnd())));
    info(con2str(getClientRect(mdiCLient)));
} 


[mazzy]

Уважаемые участники, может пора закругляться?

[AndyD]

2 mazzy

Можно еще 5 копеек?

2 belugin, George Nordic

infilog.hWnd() - это главное окно Axapta
MDIClient - это дочернее окно infilog.hWnd(), на экране - это область, где отображаются формы (являются дочерними для этого окна). Располагается м-ду тулбаром и статусной строкой

[George Nordic]

Да, это так. Таким образом, пользуясь моей getWindowRect можно рисовать везде, вплоть до тул-бара (правда, стирается при перерисовке окна ),
А, пользуясь функией Максима getClientRect - получаем размер клиентской области. Все корректно!

Вообще, WinApi и WinGDI - хорошие, конечно, классы. Но куцые

С Уважением,
Георгий.

[AndyD]

При чем здесь getWindowRect? Рисовать можно даже не зная размеры окна.

[George Nordic]

Сорри. Имелось ввиду "узнать размеры окна".

С Уважением,
Георгий

[George Nordic]

2 gudzon: Можно, я переименую ветку в "Размеры окна и клиентской области"?
А так же откорректируй сообщение без "правого нижнего угла"? Хорошо?

Приведем ветку в нормальный вид, ок?

С Уважением,
Георгий.

[belugin]

лучше выжать только полезную информацию и добавить в erpkb - все равно форум предназначен для дискуссий а не для накопления знаний