Gracias por contestar
procedure TForm1.Edit3Change(Sender: TObject);
begin
TrackBar1.Position:=strtoint(edit3.text);
ganancia := TrackBar1.Position;
Este es el código que tengo puesto, donde ganancia es una variable que no tiene nada que ver, es raro porque tengo varios scrollbar de la misma manera y funcionan bien aunque estos no tienes valores negativos.
|