Форум программистов, компьютерный форум, киберфорум
Delphi
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Delphi Проблeма с кодом ({$I-}) https://www.cyberforum.ru/ delphi/ thread281632.html
{$I-} repeat readln(choise); if not((choise=1)or(choise=2)) then writeln('Try again') else break; until 1=0; ...
Delphi Ошибка при нажатии на Кнопку
У меня такая проблема. Когда запускаю проэкт все работает как нажимаю на кнопку button1 вылетает ошибка "Project Project1.exe raised exception class EAccessViolation with message'Access violation at...
сколько дней прожил человек Delphi
составить программу, которая просит дату рождения человека в формате гг.мм.дд. подсчитать количество полных прожитых человеком дней У меня чего-то ничего не выходит .. =(( розсчитал как...
Delphi Полное копирование папки Подскажите пожалуйста, как сделать, что бы при нажатии на кнопку (Button1) выводилось окно, в котором надо вписать путь копирование файлов Копирование с использованием компонента TListView. Два... https://www.cyberforum.ru/ delphi/ thread281571.html
Delphi grid'ы и lookup поля https://www.cyberforum.ru/ delphi/ thread281521.html
юзал поиск, читал инструкции в общем не вышло описываю как делал MyTable2 справочник код_образования(k_o), образование MyTable6 таблица данные поле k_o нужно вывести DBLookUpcombobox выбираю...
Delphi Реализовать в Delphi систему классов
Реализовать в Delphi систему классов 1. Класс для работы с информацией о сотруднике (Поля – табельный номер, Фамилия, Имя, Оклад). Оклад может принимать значения в диапазоне от 10 000 до 35 0000....
Вопрос по таймеру Delphi
Подскажите пожалуйста, как сделать, что бы текст двигался как титры? После окончания опять начиналось всё заного.
Delphi Почему говорят, что конструктор не наследуется - я сейчас убедился в обратном) Вот код: mytype = class public a:integer; c:integer; d:string; procedure akm; function nal(j,l:real):real; constructor create; overload; constructor... https://www.cyberforum.ru/ delphi/ thread281325.html
Delphi Команда "Определить мониторы" https://www.cyberforum.ru/ delphi/ thread281284.html
Доброго времени суток. Не подскажите, как можно выполнить команду "Определить" когда нужно узнать номер монитора ?
Delphi Как переопределяются методы в делфи? Если можно приведите соответствующий код, или хотя бы дайте ссылку в инете где показано, как переопределить методы, а то чего-то нормального примера найти не могу. https://www.cyberforum.ru/ delphi/ thread281246.html
199 / 186 / 26
Регистрация: 14.02.2010
Сообщений: 540
23.04.2011, 19:12 0

Лесенка

23.04.2011, 19:12. Просмотров 1467. Ответов 6
Метки (Все метки)

Ответ

Так в чем тогда проблемы. Используйте LineTo
Например, чтобы рисовать на канве самой формы:

Delphi
1
2
3
MoveToEx(Self.Canvas.Handle, 10, 20, nil); // выставляем начальное положение линии в 10 пикселей по горизонтали от левого края и 20 пикселей от верха (или используйте Canvas.MoveTo)
 
LineTo(Self.Canvas.Handle, 50, 20); // проводим линию от текущего положения до точки 50 пикселей от левого края и 20 пикселей от верхнего (или используйте Canvas.LineTo).
Запомните где-нибудь в переменной координаты конца последней нарисованной линии и пляшите от нее
Если надо определить цвет/толщину линии используйте Canvas.Pen.Color и Canvas.Pen.Width соответственно. Через Pen.Style можно задать стиль линии

Если надо рисовать именно на Image, то используйте не просто Canvas, а Image.Canvas

Вернуться к обсуждению:
Лесенка
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
23.04.2011, 19:12

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Лесенка
Лесенкой называется набор кубиков, в котором каждый более верхний слой содержит кубиков меньше, чем...

Лесенка из пробелов и #
нужно создать программу в которой пользователь будет вводить число, а результат должен быть такой...

Шифр «Лесенка»
К открытому тексту был применен шифр «Лесенка». Восстановите сообщение по шифрованному тексту...

программа лесенка
Напишите программу вывода на экран последовательности целых чисел, отличающихся на единицу, в виде...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.