wie temoräres Canvas erstellen und nutzen?

[Assertor]

Hi,

@himitsu: Sollte gehen, aber ich würde aus einem Bauchgefühl heraus das gecastete Canvas bevorzugen.

Zitat von taaktaak:

Oh, oh, das ist wieder einmal so ein Moment, wo sich die Spreu vom Weizen trennt

Du meinst aber nicht meine Antwort, oder

Da ich zur Bescheidenheit erzogen wurde, werd ich sonst selbst gleich

Zitat von DeddyH:

Macht nichts, Ralph, nobody' s perfect (ich schon lange nicht)

Gleiches gilt für mich. Hautpsache wir können es nachschlagen, oder uns hier helfen lassen

Zitat von taaktaak:

Danke, Detlef, das hast du lieb gesagt!
Arbeiten wir also weiter an unserer Fortbildung!

Ihr zwei Beide seit ja wohl die, die mir hier am häufigsten geholfen haben. Also von mir auch ein Feierabend-

Gruß Assertor

[taaktaak]

Zitat von Assertor:

Du meinst aber nicht meine Antwort, oder

Doch, doch, von solchen Lösungen bin ich als Hobby-Autodidakt noch sehr weit entfernt.
Vielleicht haben wir zusammen auf der "Cap San Diego" ja mal Gelegenheit für ein "echtes"

[himitsu]

hab's doch über das Canvas gelöst ... hatte fast vergessen, daß ich an einer Stelle das Canvas weitergeb

es gibt zumindestens keine Exception mehr

ob die Berechnung dann stimmt werd ich ja bald erfahren ... muß aber erst noch die Anzeigeprozedur wieder instandsetzen.

Delphi-Quellcode:

Canvas := TCanvas.Create;
Try
  Canvas.Handle := GetDC(GetDesktopWindow);
  ResizeTextComp(Comp, Canvas, 1, 1.0);
  //ReleaseDC(Canvas.Handle); 
Finally
  Canvas.Free;
End;

Danker erstmal.
da fallen einem fast die Schuppen aus den Haaren, wenn man sieht, wie einfach es sein kann und man einfach nicht sieht


Das Desktop-Handle muß ich dann nicht extra noch freigeben ... dürfte doch hoffentlich vom Canvas erledigt werden?

[Assertor]

Hi,

Zitat von taaktaak:

Zitat von Assertor:

Du meinst aber nicht meine Antwort, oder

Doch, doch, von solchen Lösungen bin ich als Hobby-Autodidakt noch sehr weit entfernt.

Vielleicht haben wir zusammen auf der "Cap San Diego" ja mal Gelegenheit für ein "echtes"

Auf jeden Fall, sehr gerne! Ich weiß nur nicht, wie wir uns alle dann erkennen - ist für mich ja das erste mal Delphi-Tage. Wir können ja Namensschilder mit den Pseudonymen machen

Gruß Assertor

[Apollonius]

Du musst das Desktop-Handle selbst freigeben! Das Canvas kann das gar nicht automatisch tun, da es weder über die Besitzverhältnisse des HDC informiert ist noch über das Fensterhandle, welches zur Freigabe benötigt wird.

[himitsu]

Hab auch grad gemerkt, TCanvas besitzt nichtmal Destroy/Free-Methoden, um da überhaupt was beim Löschen freigeben zu können.

Das Ergebnis sieht nun so aus

Code:

Canvas := TCanvas.Create;
[b]Try[/b]
  Canvas.Handle := GetDC(GetDesktopWindow);
  [color=gray]ResizeTextComp(Comp, Canvas, 1, 1.0);[/color]
  ReleaseDC(GetDesktopWindow, Canvas.Handle);
[b]Finally[/b]
  Canvas.Free;
[b]End[/b];

Und laut Taskmanager bleiben die GDI-Objecte auch konstant (ohne ReleaseDC stiegen die wirklich an)


also Danke nochmal an alle