shape verschwinden lassen

Zlatan · Beiträge: 175

Ein Shape soll bei Berührung mit einem andereren Shape verschwinden.
Wie geht das??
Bitte antworten :wink:

Regan · Verfasst: Do 27.01.11 18:53

Du prüfst, ob du Shape1 und Shape2 übereinanderliegen (mit Width und Left und Top und Height) und rufst dann Shape.Hide(); auf.

Zlatan · Beiträge: 175

wie prüfe ich das?

bummi · Verfasst: Do 27.01.11 19:13

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:

var
  r:TRect;
begin
  if IntersectRect(r,Shape1.BoundsRect,Shape2.BoundsRect) then Shape2.Hide;

end;

_________________
Das Problem liegt üblicherweise zwischen den Ohren H₂♂
DRY DRY KISS

Zlatan · Beiträge: 175

von was ist das die Procedur?
von FormCreate?
das funktioniert nicht

bummi · Verfasst: Do 27.01.11 19:42

Dein Ton macht richtig Spass ....
Wenn Du im Create prüfen willst ......

_________________
Das Problem liegt üblicherweise zwischen den Ohren H₂♂
DRY DRY KISS

Zlatan · Beiträge: 175

Was meinst du damit?
Beantworte doch bitte meine Frage

bummi · Verfasst: Do 27.01.11 20:08

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:

Procedure PruefeUndVersteckeWennNoetig(Shape1,Shape2:TShape);
var
  r:TRect;
begin
  if IntersectRect(r,Shape1.BoundsRect,Shape2.BoundsRect) then Shape2.Hide;

end;

Wo und wann Du das ganze aufruft bleibt Dir überlassen

_________________
Das Problem liegt üblicherweise zwischen den Ohren H₂♂
DRY DRY KISS

Zlatan · Beiträge: 175

geht irgendwie nicht
Das eine shape geht einfach unter das andere aber es verschwindet nicht

elundril · Verfasst: Do 27.01.11 21:41

Vielleicht hast du Shapes vertauscht und solltest eher shape1.hide; hinschreiben?

Vielleicht wären auch die zwei sachen ratsam für dich:
Christians Crashkurs
Delphi-Wikibook

lg elundril

_________________

This Signature-Space is intentionally left blank.
Bei Beschwerden, bitte den Beschwerdebutton (gekennzeichnet mit PN) verwenden.

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme