форма по верх остальных

Вопросы программирования и использования среды Lazarus.

Модератор: Модераторы

Ответить
shum_ont
незнакомец
Сообщения: 4
Зарегистрирован: 26.07.2011 23:12:36

форма по верх остальных

Сообщение shum_ont »

Что бы сделать форму поверх остальных я использую следующий код

Код: Выделить всё

with Form1 do
  SetWindowPos(Handle,
    HWND_TOPMOST,
    Left,
    Top,
    Width,
    Height,
    SWP_NOACTIVATE or SWP_NOMOVE or SWP_NOSIZE);

но он выводит ошибку Error: Identifier not found "SetWindowPos", в чем проблема? возможно её нужно где нить объявить?
Mr.Smart
долгожитель
Сообщения: 1796
Зарегистрирован: 29.03.2008 00:01:11
Откуда: из леса!

Сообщение Mr.Smart »

Подключить модуль Windows.
shum_ont
незнакомец
Сообщения: 4
Зарегистрирован: 26.07.2011 23:12:36

Сообщение shum_ont »

спасибо все работает
v-t-l
энтузиаст
Сообщения: 744
Зарегистрирован: 13.05.2007 16:27:22
Откуда: Belarus

Сообщение v-t-l »

Код: Выделить всё

FormStyle:=fsStayOnTop;
и никакого uses windows
Ответить