Frage zur mousemove Funktion!

[Die Muhkuh]

Hi,

ist aus dem Kopf getippt:

Delphi-Quellcode:

procedure TForm2.PaintBox1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
Begin
  Label7.Caption := FloatToStr(Y / 100) + '°C';
end;