Форум: "Основная";
Поиск по всему сайту: 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.021 c
4-80720           Cranium               2002-01-25 01:47  2002.03.25  
Как с помощью API под Windows 2000 server писать в LPT?


14-80680          Loxly                 2002-02-12 14:51  2002.03.25  
О написании help ов


1-80600           tovSuhov              2002-03-11 12:28  2002.03.25  
Люди, подскажите...


1-80611           Seven                 2002-03-11 15:49  2002.03.25  
Как программно выделить строку в TStringGrid ?


1-80577           A.H.                  2002-03-10 00:20  2002.03.25  
Градусы