Цитата:
Сообщение от maddamo4ka
спасибо  мне с таймером нужна задержка, то есть будет показываться как двигается линия..не знаю как это осуществить..вчера с преподом на практике разбиралась..он сам не может это сделать. Эту процедуру с закраскй линий куда вставлять?
|
Как я понял твоя процедура DrawShape рисует линию. А в StringGrid у тебя записаны координаты линий. Во первых я не могу понять какую именно линию тебе на "двигать". С помощью StringGrid можно выбрать требуемую линию по координатам. Естественно на свою форму бросаешь компонент Timer и обрабатываешь событие OnTimer. Укажи глобальные переменные X1, X2, Y1, Y2 которые соответствует снало начальным координатам двигаемой линии, затем меняешь координаты линии, а старые оставляешь в этих глобальных переменных. DrawShape(newXY, newX1Y1, pen, color) а затем DrawShape(Point(X1, X2), Point(X2, Y2), pen, white). Время задержки подбираешь примерно из расчета 25 кадро в секунду это получается примерно Round(1000/25). Вот примерно так.