Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.07.18;
Скачать: CL | DM;

Вниз

окно поверх ВСЕХ остальных   Найти похожие ветки 

 
heady   (2005-06-26 18:13) [0]

Хочу, чтобы моя Form2 появлялась поверх ВСЕХ остальных и получала фокус, накопал кучу вариантов, большинство выдает одинаковую ошибку:
procedure TForm2.FormShow(Sender: TObject);
begin
with Form2 do
SetWindowPos(Handle, HWND_TOPMOST, Left, Top,
Width, Height, SWP_NOACTIVATE or SWP_NOMOVE or SWP_NOSIZE);
Edit1.SetFocus;
end;
Выдает ошибку: [Error] Unit2.pas(35): Incompatible types: "HWND" and "QOpenScrollViewH"

какой модуль требуется подключать для использования SetWindowPos?


 
Reindeer Moss Eater ©   (2005-06-26 18:16) [1]

Смени тип проекта на Win32 приложение


 
heady   (2005-06-26 18:21) [2]

application по дефолту - это оно?


 
Reindeer Moss Eater ©   (2005-06-26 18:24) [3]

нет не оно


 
heady   (2005-06-26 18:34) [4]

а как?
New -> именно Win32 Application отссутствует... есть просто дефолное Application


 
Reindeer Moss Eater ©   (2005-06-26 18:38) [5]

Вот и сделай
File->New->Application
а не
File->New->CLXApplication



Страницы: 1 вся ветка

Текущий архив: 2005.07.18;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.025 c
1-1120394991
Толян
2005-07-03 16:49
2005.07.18
Загрузка кода изи MEMO


3-1118139857
-=snoop=-
2005-06-07 14:24
2005.07.18
вопрос по ADO(ADOQuery)


1-1120204747
kyn66
2005-07-01 11:59
2005.07.18
Как подставить путь к имени таблицы?


1-1120033637
_Max
2005-06-29 12:27
2005.07.18
Алгоритм прохождения по массиву


11-1103199023
Роман
2004-12-16 15:10
2005.07.18
Модальная форма в ActiveX под IE