Вниз
Скачать: CL | DM;

Вывод сообщения поверх всех-всех окон. Не умрут ли игрушки?   Найти похожие ветки 

← →
Calm ©   (2003-07-26 16:34) [0]

Если я покажу форму, которая StayOnTop во время работы полноэкранной игрушки (типа Quake 3), это не убьет игру?
И всегда ли покажется моя форма?

Как сделать вывод поверх всех-всех окон наиболее культурным способом?
В DirectX я несилен :(
Буду благодарен за советы.


← →
Ghost ©   (2003-07-28 08:45) [1]

procedure DeskTopPaint(msg: string;LeftX:Integer;TopY:Integer);
var DeskTop:TCanvas;
begin
DeskTop:=TCanvas.Create;
try DeskTop.Handle:=GetDC(0);// Получим Handle Рабочего стола
DeskTop.Brush.Style:=bsClear; // Устанавливаем тип кисти

With DeskTop.Font do // Подбираем шрифт
Begin
Color:=pic_col;
Size:=pic_raz;
Name:="Arial";
Style:=[fsBold];
end;
DeskTop.TextOut(LeftX,TopY,msg);
ReleaseDC(0, DeskTop.handle);
finally
DeskTop.Free; // Уберем за собой
end;
end;


запускать так : DeskTopPaint("Сообщение",70,70);

Удачи


← →
VMcL ©   (2003-07-28 14:22) [2]

>Ghost © (28.07.03 08:45)

Только небольшое замечание. Сцена игры имеет такую особенность - перерисовываться N раз в секунду. Чему равно N неизвестно.



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.016 c
11-40325
Zelius
2003-01-30 17:54
2003.10.13
Как создать контрол в качестве Child а по парентовому хендлу?


1-40373
ikar
2003-10-01 13:55
2003.10.13
шифрование текстовых файлов XOR


14-40646
pasha_golub
2003-09-24 11:44
2003.10.13
Не могу найти IDE у FreePascal 1.0.10


6-40561
Vredina
2003-08-01 15:20
2003.10.13
UDP Message


1-40351
Maximus2002
2003-10-01 20:26
2003.10.13
Форма лога в 1С




   Наверх