Как сделать, чтобы в delphi можно было использовать процедуру для графических объектов?

Question

[Kezzya]

У меня есть процедура, но она не видит компонент, mmo1 (memo) , т.к. это отдельная функция, которую я написал. Я так понял, что придётся нажимать на объект мемо и только там писать код? Просто у меня рекурсия с процедурой, не понятно тогда как я в мемо могу это реализовать.

Answer 1

[kalapanga]

Или сделайте эту процедуру методом формы, на которой это мемо лежит.
Или обращайтесь к нему так Form1.mmo1.Text где Form1 Ваша форма.

Comments

[Kezzya]

Спасибо. У меня последний вопрос, если это не нагло с моей стороны. Можно ли как-то задать N в Edit , чтобы процедура не ругалась на программу перед запуском, что не видит N? У меня сейчас в const задаётся, но мне надо чтобы при вводе N разное решение было, залезать в код и менять постоянно N - нельзя.

[kalapanga]

Kezzya, так и напишите в начале этой процедуры N = StrToInt(Form1.Edit1.Text);
Проверки на корректность введённых значений и настройки Edit добавить по вкусу.

[Kezzya]

kalapanga, только у меня тут проблема ещё в том, что массив статический[1..N], в константу я не могу вписать N = StrToInt(Form1.edt1.Text); т.к. только константы принимает, а едт1 изменчива. Если переделывает всё под динамический, то надо будет всю логику менять, из-за того что номер элемента массива не с 1 начинается, а с 0

[kalapanga]

Kezzya, либо динамический массив, либо объявляете массив с запасом на максимально возможное число элементов (M), а N будет число используемых элементов (N <= M)

[Kezzya]

kalapanga, спасибо!

Answer 2

[Kezzya]

Извиняюсь, разобрался. Нашёл на форуме что через класс формы будет видно.Form1.memo1...
Спасибо, если кто сидел над этой проблемой, но пока не ответил.