Changing trackbar position in program doesn't trigger OnChange
Original Reporter info from Mantis: pik33
-
Reporter name: Piotr Kardasz
Original Reporter info from Mantis: pik33
- Reporter name: Piotr Kardasz
Description:
Opensuse 11.0 x64, Lazarus SVN 20760, qt
Sample code:
---------------------------------------------------
procedure TForm1.BitBtn1Click(Sender: TObject);
var i:integer;
begin
i:=trackbar1.position;
i+=1;
if i>9 then i:=1;
trackbar1.position:=i;
end;
procedure TForm1.TrackBar1Change(Sender: TObject);
begin
label1.Caption:=inttostr(trackbar1.position);
end;
-----------------------------------------------
There is trackbar, button and label on Form1
In GTK2, when button1 is clicked, label1 displays actual trackbar position. In QT, label1 remains unchanged.
Mantis conversion info:
- Mantis ID: 14131
- Version: 0.9.27 (SVN)
- Fixed in revision: 20842 (#ee0e6084)
- Target version: 0.9.27 (SVN)
- LazTarget: 0.9.28