Delphi 11.2
Ich erstelle eine TrackBar so: (FTrackBarA ist in der Form als Variable abgelegt und FFormA ist eine generierte TForm auf der es draufliegt.)
Delphi-Quellcode:
FTrackBarA := TTrackBar.Create(FFormA);
try
FTrackBarA.Parent := FFormA;
FTrackBarA.Align := alBottom;
FTrackBarA.Min := 15;
FTrackBarA.Max := 255;
FTrackBarA.Position := 255;
FTrackBarA.Frequency := 25;
FTrackBarA.OnChange := TrackBarAChange;
finally
end;
und reagiere beim OnChange so:
Delphi-Quellcode:
procedure TfrmMain.TrackBarAChange(Sender: TObject);
begin
FFormA.AlphaBlendValue := (Sender As TTrackBar).Position
end;
Aber obwohl ich ein unteres Limit angebe, pfeift die
Vcl drauf und lässt es bis 0 runtergehen.
Warum ist das so bzw wie geht es korrekt, bitte um Hilfe
