Clipping

**AppleFan**

Hallo, hab noch ne Frage:

ich kachel auf diese Weise ein Bild als Hintergrundmuster auf die Form:

procedure TForm1.FormCreate(Sender: TObject);
begin
Brush.Bitmap := Bild;
end;

Soweit so gut, das gesamte Formular hat jetzt ein Muster.
Ich möchte aber einen rechteckigen Bereich des Formulars so lassen
wie er ist, ohne Muster !

Wie ?

**himitsu**

Mit CreateClipRect zwei Rechtecke erstellen, dieses verbinden (XOR, oder das Kleine vom Großen subtrahieren) und dem Canvas zuweisen.

Oder ganz einfach ... an der entsprechenden Stelle ein Objekt (z.B. Panel ohne Rand, oder TShape ...) einbauen.

Clipping

Clipping

Re: Clipping

Forumregeln

AppleFan Registriert seit: 15. Jan 2005 41 Beiträge Delphi 2005 Professional	#1 Clipping 21. Mär 2005, 14:15 Hallo, hab noch ne Frage: ich kachel auf diese Weise ein Bild als Hintergrundmuster auf die Form: procedure TForm1.FormCreate(Sender: TObject); begin Brush.Bitmap := Bild; end; Soweit so gut, das gesamte Formular hat jetzt ein Muster. Ich möchte aber einen rechteckigen Bereich des Formulars so lassen wie er ist, ohne Muster ! Wie ?
	Zitat

himitsu Online Registriert seit: 11. Okt 2003 Ort: Elbflorenz 44.063 Beiträge Delphi 12 Athens	#2 Re: Clipping 21. Mär 2005, 14:51 Mit CreateClipRect zwei Rechtecke erstellen, dieses verbinden (XOR, oder das Kleine vom Großen subtrahieren) und dem Canvas zuweisen. Oder ganz einfach ... an der entsprechenden Stelle ein Objekt (z.B. Panel ohne Rand, oder TShape ...) einbauen. Neuste Erkenntnis: Seit Pos einen dritten Parameter hat, wird PoSex im Delphi viel seltener praktiziert.
	Zitat