Hallo Forum,
ja, schon wieder ich und meine Device Contexts... Also, alles was ich will, ist mit bestimmtem Font und bestimmten Vorder- und Hintergrundfarben mit DrawText etwas auf einen
DC zu zeichnen. Das mit dem Font funktioniert auch, nur mit Pen und Brush hab ich meine Probleme.
Code:
winDC := GetDC(hWnd);
Font := CreateFont(-MulDiv(8, GetDeviceCaps(winDC, LOGPIXELSY), 72),
0, 0, 0, 0, 0, 0, 0, ANSI_CHARSET, OUT_DEFAULT_PRECIS,
CLIP_DEFAULT_PRECIS, DEFAULT_QUALITY, DEFAULT_PITCH,
'MS Sans Serif');
SelectObject(winDC, Font);
SelectObject(winDC, PEN_LIME);
SelectObject(winDC, COLOR_BLACK);
DrawText(winDC, PChar(s), Length(s), r, DT_TOP or DT_RIGHT);
DeleteObject(Font);
ReleaseDC(hWnd, winDC);
LIME_PEN und COLOR_BLACK sind korrekte Werte, SelectObject() funktioniert. GetStockObject führt nur dazu, dass SelectObject() fehlschlägt.
Ich hoffe, ihr könnt mir helfen.
Danke im Voraus,
d3g
[edit]Da hat was mit dem Code-Kopieren nicht geklappt...[/edit]