Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 24.12.2015, 18:10   #1
Jed1kiss
 
Регистрация: 24.12.2015
Сообщений: 4
По умолчанию Как перенести процедуру? Lazarus

Помогите пожалуйста решить такой вопрос: Есть мини-програмка которая строит декартовую систему и по заданным координатам можно нарисовать точки.

Если менять размер окна программы, то нарисованные точки не сохраняют свои координаты, необходимо во время изменения окна программы использовать 2 процедуры которые отвечают за расположение точек по координатам.

Вопрос: как эти 2 процедуры использовать из модуля, который отвечает за построение точки? Скрины прилагаю.

Заранее спасибо огромное!
Изображения
Тип файла: jpg nFibWmqeJsE.jpg (92.7 Кб, 72 просмотров)
Тип файла: jpg MOHxeMau69Y.jpg (70.9 Кб, 75 просмотров)
Jed1kiss вне форума Ответить с цитированием
Старый 24.12.2015, 20:53   #2
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

В uses пропиши UPointObj, создай объект класса TPointObj, и сможешь использовать его методы.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 24.12.2015, 20:59   #3
evg_m
Старожил
 
Регистрация: 20.04.2008
Сообщений: 5,527
По умолчанию

перейти в редактор unit1
нажать Alt + F11
выбрать UpintObj

получится такое
Код:
unit1;
interface
....
implementaion
uses uPointObj;
...
end.
программа — запись алгоритма на языке понятном транслятору
evg_m вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Необходимо исправить код программы, желательно перенести его в процедуру! leshka_good Помощь студентам 0 01.06.2015 20:25
Перекомпиляция программы(простой) Win Lazarus в Linux Lazarus Toxifer Фриланс 0 27.11.2012 22:46
Как перенести автозамены??? Vetlblya Microsoft Office Word 3 02.07.2010 22:08
А как перенести... Busine2009 Microsoft Office Word 1 03.07.2009 01:02