On top

[v@Mp!rO]

Мне нужно сделать так чтобы форма была поверх... но не всех окон, а вообще всего что отображается на экране например игру я запустил и играю а в углу моя форма... и игре не мешает.

Это мне надо для таймера.
А то когда по нету играеш, такое творится!!!

[JohnK]

А игрушки полноэкранные?

[xolod]

Сделать это можно только одним способом, алгоритм:
выяснить, кто сейчас ActiveWindow (окно, directx, opengGL или overlay) -> получить идентификатор процесса, нарисовать или вставить (в зависимости от типа ActiveWindow, в overlay ничего не вставишь) что-то, что тебе надо.

Как сделать? Код не 2-3 строчки, и даже не 10-20.. читай MSDN - там есть все!

[v@Mp!rO]

xolod:

Как сделать? Код не 2-3 строчки, и даже не 10-20.. читай MSDN - там есть все!

У меня MSDN'a нету. Где его взять?
Точно никокого примера нет.
Очень нужно.

[xolod]

Что ж, есть более простой способ. Только сразу предупреждаю.
Во первых: форма будет мигать в полноэкранном режиме
Во вторых: timer требует много (сравнительно) ресурсов

Private Declare Function SetWindowPos Lib "user32" Alias "SetWindowPos" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
Private Const HWND_TOPMOST = -1
Private Const SWP_NOMOVE = &H2
Private Const SWP_NOREDRAW = &H8
Private Const SWP_NOSIZE = &H1

'Помести таймер с интервалов <= 100 в код

Private Sub Timer1_Timer()
SetWindowPos hwnd, HWND_TOPMOST, 0&, 0&, 0&, 0&, SWP_NOMOVE or SWP_NOREDRAW or SWP_NOSIZE
End Sub

А вообще MSDN можно купить (~3 CD или 1 DVD) или скачать с www.microsoft.com если трафик халявный (читай: на работе)

[v@Mp!rO]

Я тут немного подумал и придумал:

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

Private Sub out_Timer()
Dim tr As RECT
tr.Left = 1 * Screen.TwipsPerPixelY
tr.Top = 1 * Screen.TwipsPerPixelX
tr.Right = 100 * Screen.TwipsPerPixelY
tr.Bottom = 20 * Screen.TwipsPerPixelX

Call SetTextColor(myhdc, QBColor(4))
Call DrawText(myhdc, d8mScrT, Len(d8mScrT), tr, 0)
End Sub

Можно обойтись и без формы.
Только как задний фон изменить. Цвет текста это понятно.

[xolod]

Мне нужно сделать так чтобы форма была поверх...

Так что думаю отрисовка текста здесь мало подходит..[/quote]

[v@Mp!rO]

Почему текст рисуется поверх большинства приложений в том числе и игр. В старкрафте это работает а мне для него и надо.
Только таймер всёравно отстает.

[v@Mp!rO]

А и ещё как всётаки на тексте задний фон изменить?