t_out:=GetTickCount + TrackBar1.Position ;
repeat
Application.ProcessMessages;
until GetTickCount>=t_out;
[Warning] RS_20.pas(511): Combining signed and unsigned types - widened both operands
Czy mogłby mi ktoś wyoślić co zrobić z tym ostrzeżeniem
PozdrAS