Thema: Delphi Pen : Farbe ändern

Einzelnen Beitrag anzeigen

OregonGhost

Registriert seit: 8. Jun 2002
Ort: Lübeck
1.216 Beiträge
 
Delphi 3 Professional
 
#7
  Alt 22. Jun 2002, 13:44
Muss man das nicht eigentlich so machen:
Code:
pen := CreatePen(PS_SOLID,5,rgb(r,g,b));
oldPen = SelectObject(DC,pen); // <<-- hier, das meine ich    
{ Dein Code }
SelectObject(DC, oldPen); // <<-- und das auch
DeleteObject(pen);
Zumindest steht im PSDK, dass man keine GDI-Objekte löschen soll, die noch in einen Gerätekontext selektiert sind. Also wird es vielleicht gar nicht gelöscht.
Konnte ich leider nicht nachprüfen, weil mein Taskmanager hat für das Testprogramm immer 38 Handles angezeigt, egal ob ich den immer freigegeben hab' oder nicht ;c)
Oregon Ghost
---
Wenn NULL besonders groß ist, ist es fast schon wie ein bisschen eins.
  Mit Zitat antworten Zitat