Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by xZise,
30. Jul 2006
(Das TRect könnte ich in der Zeichenrutine unterbringen :D)
Aber hier ist jetzt die Lösung des Problems!
Es funktioniert eigentlich genz gut!
Was noch fehlt, ist, dass man nicht rechts neben den Koffern klicken kann!
procedure TForm1.SpielfeldMouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
var row, side, col, KofferNum,prefrows : Integer;
begin
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by xZise,
30. Jul 2006
Okay die Funktion könnte ich mir selber schreiebn (:D), was mich am ersten asnatz gestört hat ist die "komplexibilität"...
Da bilckt man nicht so einfach durch... Da ist die "InRect" Methode besser.
Okay... Dann mache ich's so ;)
o.O
Öhm ja, so könnte man es machen :D
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by xZise,
30. Jul 2006
So... Und jetzt 26 mal???
ich dachte da vielleicht an einen Vergleich:
for i := 0 to 25 do
if inRect(myRect, X, Y) then begin
{...}
end;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by xZise,
30. Jul 2006
Ich habe ein großes Image und möchte überprüfen ob der Mausklick in bestimmten Rechtecken war.
Welche Prozeduren etc würden da gehen?