Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.25;
Скачать: [xml.tar.bz2];




Вниз

TImage - почему у меня ничего не получается :-(( ?? 


A.H.   (2002-03-12 19:26) [0]

Мне нужно изобразить линию из точек с зумом (то есть с увеличением). Я хотел сделать это так: каждую точку линии нарисовать на TImage как квадрат, у которого длина стороны равняется фактору увеличения. Всё это получается, но проблемы в другом - так как я не знаю, какой длины будет эта линия (её должен вводить пользователь во время работы), то я хотел в run-time изменять размер TImage динамически через Image1.Width:=X; Image1.Height:=Y; где X и Y соответствуют координатам нижнего правого угла последнего квадрата (то есть ставить величину картинки таким образом, чтобы цепь из квадратов точь-в-точь вошла в поверхность картинки). Ну вот, а проблема в том, что если я ставлю размер картинки от руки до компиляции (например 500 * 500), то вся линия изображается корректно, но мне не нравится такой вариант, потому что он некрасивый, вдруг нужно будет больше чем 500 точек и т.д., - а если я изменяю размеры картинки в ходе программы описанным выше образом, то сами размеры изменяются, но линия после этого нифига не рисуется. Почему ? Что я делаю неправильно ?

Или подскажите, каким другим образом можно изображать такую линию, при этом речь не о вычислении координат и т.д., а мне нужно, чтобы картинку можно было изменять в размере и скролить, если её размер превышает размер окна. Сейчас у меня Image лежит в ScrollBox, и он скролится автоматически, когда надо.



A.H.   (2002-03-12 19:29) [1]

Извиняюсь, если непонятно объяснил. Кто интересуется, зачем мне вся эта ерунда - в школе задали.




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.25;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.016 c
1-80596           .Horol.               2002-03-03 16:40  2002.03.25  
посылка нажатых клавиш в дос програму


3-80440           prorok                2002-02-27 13:51  2002.03.25  
Индексирование


14-80654          |\/\/ \/\/ \/\/|      2002-02-03 05:34  2002.03.25  
Два вопроса!


1-80483           KIR                   2002-03-12 15:05  2002.03.25  
Изменение шрифта отдельной ячейки TStringGrid a


6-80633           and_or                2002-01-09 20:26  2002.03.25  
ping & tracertМожнping & tracert