The_Reason, ааа... ну это проще некуда... просто объявляешь какую нибудь переменную, например i: int64; присваеваешь ей 0 В теле процедуры (таймера) простенький код inc(i); edit1.text := inttostr(i); и все...
PEDAGOG2O12, а при чем тут track bar??? полнее задачу описывай... ПЫ.СЫ. делфием не занимался уже года 2... все по памяти... так что если че не пинайте
PEDAGOG2O12, ну примерно такой код должен быть: summ := 0; for i:=0 to trackbar.position do summ := summ + i; ну и выводишь значение переменной summ куда нибудь...
5 мар 2008 в 12:49