Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.10.13;
Скачать: 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 вся ветка

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

Наверх




Память: 0.47 MB
Время: 0.021 c
1-40475
Dysan
2003-10-02 14:37
2003.10.13
CreateOleObject( Excel.Application );


14-40662
Журнал "Здоровье"
2003-09-23 22:45
2003.10.13
Нам пишут


8-40526
LedWorm
2003-06-11 19:24
2003.10.13
Эквалайзер в делфи


14-40594
AlexRush
2003-09-23 13:14
2003.10.13
Любителям поэзии :)))


4-40719
Alexander
2003-08-05 08:31
2003.10.13
Изменяю в реестре значение, например для HKCR TXTFile DefaultIcon