AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Image Position überprüfen

Ein Thema von newmusicslamer · begonnen am 10. Mär 2012 · letzter Beitrag vom 11. Mär 2012
Antwort Antwort
noob2k9

Registriert seit: 1. Aug 2008
13 Beiträge
 
Delphi XE2 Starter
 
#1

AW: Image Position überprüfen

  Alt 10. Mär 2012, 17:50
Du möchtest also überprüfen ob 2 Rechtecke sich überlappen nehme ich an

Schau dir mal die Funktion IntersectRect() an

Delphi-Quellcode:
function IntersectRect(const Rect1, Rect2: TRect): Boolean;
function IntersectRect(out Rect: TRect; const R1, R2: TRect): Boolean;
function IntersectRect(const Rect1, Rect2: TRectF): Boolean;
function IntersectRect(out Rect: TRectF; const R1, R2: TRectF): Boolean;
Um zu prüfen ob sich 2 Rechtecke überlappen benötigst du insgesamt 4 Vergleiche - wenn du sicherstellen kannst das die Rechtecke sich nur entlang einer Achse bewegen reichen sogar 2
  Mit Zitat antworten Zitat
newmusicslamer

Registriert seit: 27. Feb 2012
29 Beiträge
 
Delphi 7 Personal
 
#2

AW: Image Position überprüfen

  Alt 10. Mär 2012, 17:52
geht das auch mit images?
newmusicslamer
Delphi for the win!
  Mit Zitat antworten Zitat
noob2k9

Registriert seit: 1. Aug 2008
13 Beiträge
 
Delphi XE2 Starter
 
#3

AW: Image Position überprüfen

  Alt 10. Mär 2012, 18:03
Ein einfacher Aufruf könnte so aussehen

Delphi-Quellcode:
if IntersectRect(Image1.BoundsRect, Image2.BoundsRect) then begin
  //...
end;
Einen Nachteil hat diese Funktion jedoch: Sie liefert auch True zurück wenn die Rechtecke exakt nebeneinander liegen ohne sich zu überlappen. Wenn dies nicht der Fall sein sollte müsstest du dir eine eigene Funktion bauen (siehe oben 4 Vergleiche)
  Mit Zitat antworten Zitat
newmusicslamer

Registriert seit: 27. Feb 2012
29 Beiträge
 
Delphi 7 Personal
 
#4

AW: Image Position überprüfen

  Alt 10. Mär 2012, 20:14
Jetzt sagt er mir dazu: Konstantenobjekt kann nicht als Var-Parameter weitergegeben werden.

Könntest du sonst mal als Beispiel einen ganzen Quellcode posten? Ich bin noch ein blutiger Anfänger was Delphi und programmieren angeht...
newmusicslamer
Delphi for the win!
  Mit Zitat antworten Zitat
Benutzerbild von Bummi
Bummi

Registriert seit: 15. Jun 2010
Ort: Augsburg Bayern Süddeutschland
3.470 Beiträge
 
Delphi XE3 Enterprise
 
#5

AW: Image Position überprüfen

  Alt 10. Mär 2012, 22:05
Delphi-Quellcode:
var
  r: Trect;
begin
  if intersectRect(r, Image1.BoundsRect, Image2.BoundsRect) then
  begin
    Caption := Format('L: %d, T: %d, R: %d B: %d', [r.Left, r.Top, r.Right,
      r.Bottom]);
  end;
end;
Thomas Wassermann H₂♂
Das Problem steckt meistens zwischen den Ohren
DRY DRY KISS
H₂ (wenn bei meinen Snipplets nichts anderes angegeben ist Lizenz: WTFPL)
  Mit Zitat antworten Zitat
newmusicslamer

Registriert seit: 27. Feb 2012
29 Beiträge
 
Delphi 7 Personal
 
#6

AW: Image Position überprüfen

  Alt 11. Mär 2012, 09:50
Danke jetzt geht es mir hat nur die Variable gefehlt
newmusicslamer
Delphi for the win!
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 10:39 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz