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

WriteText и белый фон   Найти похожие ветки 

← →
Rem ©   (2005-01-28 19:06) [0]

При выводе текста с помощью процедуры API WriteText(), фон текста закрашивается белым. Создание новой кисти с BS_HOLLOW и последующим использованием этой кисти в контексте - не помогает. Где грабли?

DC := GetDC(Handle);
try
 LogBrush.lbStyle := BS_HOLLOW;
 BR := CreateBrushIndirect(LogBrush);
 try
   OldBrush := SelectObject(DC, BR);
   try
     Format := Format + DT_END_ELLIPSIS;
     DrawText(DC, (@Text[1]), -1, R, Format);
   finally
     SelectObject(DC, OldBrush);
   end;
 finally
   DeleteObject(BR);
 end;
finally
 ReleaseDC(Handle, DC);
end;


P.S. Надо ради DT_END_ELLIPSIS. Возможно, есть другие решения, помимо использования WriteText?


← →
Rem ©   (2005-01-28 19:08) [1]

Упс... конечно же, DrawText


← →
akvilon ©   (2005-01-28 19:16) [2]

SetBkMode, SetBkColor



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

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



Память: 0.45 MB
Время: 0.027 c
9-1099832251
ASH
2004-11-07 15:57
2005.02.13
Звук для игр на Delphi..


3-1105051517
JaVa73
2005-01-07 01:45
2005.02.13
не открывается libmysql.dll


6-1100847332
Дмитрий76
2004-11-19 09:55
2005.02.13
Проблемы с функцией NetShareAdd (netapi32.dll)


14-1106433579
i-s-v
2005-01-23 01:39
2005.02.13
Молдова


1-1106902447
Jay1982
2005-01-28 11:54
2005.02.13
Icon handle




   Наверх