Einsamer Schütze - Sa 01.12.07 10:48
Titel: Canvas.Rectangle auf PageControl zeichnen

---

Hallo Delphianer,
ich suche nach einer Möglichkeit, über die Canvas-Eigenschaft des PageControls ein Rechteck oder ähnliche Figuren auf das Control zu zeichnen (ich würde auch anders zeichnen, aber das scheint mir der gängige Weg zu sein).
Irgendetwas scheint jedoch zu fehlen, denn PageControl.Canvas.Rectangle(,,,) lässt sich einwandfrei kompilieren, tut aber nicht; auch nicht, wenn ich mir vorher auf dem Control explizit ein eigenes Canvas erzeuge. Was fehlt?

Vielen Dank,

ES


Moderiert von Narses: Topic aus Delphi Language (Object-Pascal) / CLX verschoben am Sa 01.12.2007 um 09:52

Einsamer Schütze - So 02.12.07 18:01
Titel: Image benutzen

---

Ich umgehe das Problem indem ich ein Image hinlege, dessen Canvas tut das Gewünschte.

Warum das PageControl-Canvas nicht tut, würde ich trotzdem gern wissen.

Danke, ES

Delete - So 02.12.07 18:24

---

Setze die Eigenschaft "OwnerDraw" auf True. Benutze das Event "onDrawTab", wenn du das nicht schon bereits so machst.

//E: Ich gebe zu, ich habe es nicht getestet. Ich habe es nur von ListBox und anderen Beispielen abgeleitet, wo man Style auf OwnerDraw sezten musste.

gispos - So 02.12.07 18:56

---

Auf ein PageControl zeichnen? Du meinst auf ein Page zeichnen!
Und ein PageControl.Page[0] hat keinen Canvas!
Wenn PageControl.OwnerDraw auf true gesetzt wird, muß man auch die TabSheeds selber zeichnen. (Text etc.)
Ein TImage zu verwenden um in desen Canvas zu zeichnen ist unsinnig.
Dafür gibt es eine TPainBox, die viel weniger Resourcen als ein TImage verbraucht.

Gruß gispos

Delete - So 02.12.07 19:06

---

Stimmt. Es heißt ja onDrawTab und nicht onDraw. :gruebel:

//E: Aber eigentlich sehe ich keinen Sinn darin, etwas auf ein PageControl zu zeichnen, nur auf einen Tab. Aber ich weiß ja nicht wirklich was er vorhat.

gispos - So 02.12.07 19:47

---

Der einsame Schütze hat wohl daneben geschossen :D
Ich denke er meinte ein Page eines TPageControl.

Gruß gispos

Einsamer Schütze - Do 20.11.08 00:35

---

Also ich musste jetzt ne ganze Zeit woanders schießen, ich nehm' mich der Sache jetzt noch einmal an - with a vengeance.
Das sag ich Euch!

ES