Zitat von
Poring:
Er berechnet so oder so immer nur vom MP bis zum Kreis.
Ich will nur, das ich auserhalb des roten Kästchen klicken kann, ohne das er irgendwas berechnet, zeichnet, oder ähnliches. Sondern das alles nur macht wenn man innerhalb des roten Kästchen drückt?
Ich habe dir doch die Funktion bereits genannt: PtInRect. Beispiel: (schnell hingetippt)
Delphi-Quellcode:
var
Rec: TRect;
RecWidth, RecHeight: Integer;
begin
RecWidth := Radius + 10;
RecHeight := Radius + 10;
Rec.Left := Mitte.X - RecWidth;
Rec.Right := Mitte.X + RecWidth;
Rec.Top := Mitte.Y - RecHeight;
Rec.Bottom := Mitte.Y + RecHeight;
if PtInRect(Rec, Point(X, Y)) then
Rechnen();
end;
Musst du natürlich auf dein Programm zuschneiden.
Zitat von
mr_emre_d:
Nein nein Robby.. Geht viel einfacher:
Deins ist im Wesentlichen das gleiche wie meins, ich habe nur den Zwischenschritt mit dem Betrag weggelassen