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

Вниз

API функция для изменения шрифта TextOut   Найти похожие ветки 

 
CodeMaster ©   (2008-11-13 16:47) [0]

Здраствуйте Мастера! Возникла делема с изменением шрифта API функции TextOut(DC: HDC,X,Y: Integer;Str:PAnsiChar;Count:Integer);

Как задать DC другой шрифт?
Вот моя функция:
if Succeeded(FrmMain.FDDSMenuButton.GetDC(DC)) then begin

SetBkMode(DC,TRANSPARENT);
SetTextColor(DC,RGB(153,153,153));

TextOut(DC,Width div 2,15,PChar(Txt),Length(Txt));
SetBkMode(DC,OPAQUE);
FrmMain.FDDSMenuButton.ReleaseDC(DC);
end;

FDDSMenuButton это IDirectDrawSurface7 из модуля DirectDraw компонента DirectX.
Читал про функцию EnumFonts - но толком ничего не понял - может вы мне сможете помочь?


 
MBo ©   (2008-11-13 20:19) [1]

SelectObject


 
CodeMaster ©   (2008-11-15 12:21) [2]

Спасибо - всё работает



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

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

Наверх




Память: 0.46 MB
Время: 0.009 c
15-1257975683
Германн
2009-11-12 00:41
2010.01.17
Параметр "Рабочая папка" в свойствах ярлыка


10-1161933035
incms
2006-10-27 11:10
2010.01.17
Онибка при вызове метода интерфейса


3-1233213892
Ruslan777
2009-01-29 10:24
2010.01.17
Клиент серверное приложение!


2-1259002119
kyran29
2009-11-23 21:48
2010.01.17
отразить процесс закачки файла


2-1258720030
Andrewtitoff
2009-11-20 15:27
2010.01.17
VBA => Delphi