[Lazarus] tachart on mousemove
Alexander Klenin
klenin at gmail.com
Tue Apr 27 15:51:10 CEST 2010
On Tue, Apr 27, 2010 at 23:41, Andrea Mauri <andrea.mauri.75 at gmail.com> wrote:
> Anyway simply put a tchart on a form and two label (label1 and label2) then
> put this code in the mousemove event:
> procedure TForm1.Chart1MouseMove(Sender: TObject; Shift: TShiftState; X,
> Y: Integer);
> begin
> Label1.Caption:= 'X: ' + IntToStr(X);
> Label2.Caption:= 'Y: ' + IntToStr(Y);
> end;
> Nothing happen, the labels are not modified. They are modified only if I
> hold shift.
Indeed. This is related to the new toolset code.
Please try r25005.
--
Alexander S. Klenin
More information about the Lazarus
mailing list