Überlappende Elemente in TPainbox

Schokolade · Hält's aus hier Beiträge: 9

Moin,
im onPaint Event einer Paintbox zeichne ich ein Quadrat mit Rectangle(). Außerdem benutze ich moveTo und LineTo um eine vertikale Line zu ziehen, die durch das Quadrat geht. Diese Linie ist unterhalb des Quadrates. Das Quadrat übedeckt es und das ist ok und erwünscht für mich. Eine zweite Linie die horizontal verlauft kreuzt auch das Quadrat, sie sollte auch darunter verlaufen. Tut sie aber nicht. Ich habe verschiedene Reihenfolgen des Zeichnens benutzt. Immer mit dem gleichen Ergebnis. Wie kann ich festlegen, welches Zeichenelement welches Andere überlappt/verdeckt oder darunter verläuft.

Für eine Denkanregung (oder Lösung) wäre ich sehr dankbar.

Mit besten Grüßen

ub60 · Beiträge: 762 Erhaltene Danke: 127

Zeige doch mal Deinen Quelltext. Bei mir funktioniert das einwandfrei:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:

  with PaintBox1.Canvas do
    begin
      Brush.Style:=bsClear;
      Pen.Width:=3;

      Pen.Color:=clRed;
      MoveTo(100, 40);
      LineTo(100, 160);

      Pen.Color:=clGreen;
      MoveTo(40, 100);
      LineTo(160, 100);

      Pen.Color:=clBlue;
      Rectangle(50, 50, 150, 150);
    end;

ub60

Schokolade · Hält's aus hier Beiträge: 9

Hallo Ub60
danke für Deine Mühe, inzwischen habe ich auch eine Lösung gefunden, ich weiß allerdings nicht warum sie funktioniert 8-(
In meinem Programm waren alle grafischrn Befehle in einer For-Schleife. Ich habe eine der Linien ausgelagert in eine eigene Schleife. Jetzt geht es.
Es wäre interessant zu wissen, ob Dein Beispielprogramm auch funktioniert wenn bei Dir Brush.Style:=bsClear geändert würde
derart, das zB Brush.Color:=clYellow als Füllung des Quadrates sichtbar würde.

Noch ein schönes Restwochenende wünscht
Rolf

jaenicke · Verfasst: So 22.11.20 19:05

Was man mit einer Paintbox so alles machen kann habe ich hier mal gezeigt:
Periodensystem Xtreme 1.1 beta
(Ich müsste meine Beiträge mal wieder auf Vordermann bringen was Bilder usw. angeht fällt mir dabei auf...)

Moderiert von Th69: URL-Titel hinzugefügt.

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme