Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Nikolas,
30. Jul 2006
bei seinem Dond sind die Koffer aber nicht schön wie auf einem Schachbrett angeordnet, sondern die zweite Reihe beginnt eine halbe Kofferbreite weiter rechts als die erste. Um das auch noch zu berücksichtigen müsste man auch noch ein paar Abfragen schreiben.
Da die Koffersuche aber nur alle paar minuten mal ausgeführt werden muss, ist es hier wichtiger einen gut verständlichen Code zu...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Nikolas,
30. Jul 2006
Wo ist denn das Problem?
// Bei rectangle waren doch die ersten Koordinaten die ecke links oben und die zweiten rechts unten, oder?
Function inRect(Rect, X, Y): boolean;
begin
result:= false;
if (x>Rect.x1) and (x<(Rect.x2-Rect.x1)) and (das gleiche für y ) then result:= true;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Nikolas,
30. Jul 2006
machs doch so:
x,y: Mauskoordinate; top, left, width, height: ein Zielbereich:
if (x>left) and (x<(left+width)) and (y>top) and (y<(top+height)) then showmessage('drin');