Ergebnis der Suchanfrage

• Forum: Sonstige Fragen zu Delphi

  Re: Cursor an Raster schnappen wie dieser Code ?

    Delphi
    by Union, 3. Feb 2009
  Ich bin leider nicht bei Codeproject angemeldet und kann daher den Source nicht ansehen. Aber mit Delphi geht das einfach (schöner geht's immer):
  procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
  const
  GridSize = 10;
  var
  NewPos : TPoint;
  Changed : boolean;
  begin
  NewPos := Point(X, Y);