Вопрос № 122468: Здравствуйте! Простой вопрос поставил меня в тупик. Как можно из unit2 вызвать процедуру, объявленную в unit1? В unit2 после "implementation" у меня написано "uses Unit1;", сама процедура называется "procedure FormCreate(Send...Вопрос № 122497: Здравствуйте ув эксперты помогите пожайлуста
Нужно вычислить на ПК значения функции
40
z = П (cos an + n)
n=1
Заранее спасибо...
Вопрос № 122.468
Здравствуйте! Простой вопрос поставил меня в тупик. Как можно из unit2 вызвать процедуру, объявленную в unit1? В unit2 после "implementation" у меня написано "uses Unit1;", сама процедура называется "procedure FormCreate(Sender: TObject);". Что нужно написать после begin в unit2? Заранее спасибо! Если информации недостаточно, сообщу всё что нужно.
Отправлен: 10.02.2008, 11:42
Вопрос задал: Caspian (статус: 1-ый класс)
Всего ответов: 3 Мини-форум вопроса >>> (сообщений: 3)
Отвечает: Алексей Акишин
Здравствуйте, Caspian!
А так прямо и пиши
unit1.FormCreate(Sender);
И все!
--------- Что бы ни делать - лишь бы ничего не делать!
Ответ отправил: Алексей Акишин (статус: 3-ий класс)
Ответ отправлен: 10.02.2008, 12:28 Оценка за ответ: 5 Комментарий оценки: Так не получилось, зато получилось, когда я написал "unit1.Form1.FormCreate(Sender);". Так что ответ хоть и не полный, но всё равно помог. Спасибо!
Отвечает: Marked One
Здравствуйте, Caspian!
Напиши Form1.FormCreate(nil);
Эта конструкция вызывает процедуру FormCreate из модуля первой формы.
Если хочешь использовать переменную/функцию из другого модуля, то добавь имя модуля в раздел Uses и обращайся к ней так: Имя_Формы.Имя_функции/переменной.
Ответ отправил: Marked One (статус: 4-ый класс)
Ответ отправлен: 10.02.2008, 16:56 Оценка за ответ: 5 Комментарий оценки: Я уже успел разобраться, но всё равно большое спасибо!
Отвечает: Genia007
Здравствуйте, Caspian!
Я обычно делаю так:
В начале Unit1 там где описываются глобальные переменные после var Form:TForm; пишу например procedure bufer1;
A в unit2 после "implementation" пишу uses Unit1;
Теперь когда мне нужна процедура bufer1 из uses Unit1, просто в нужном месте вызываю bufer1 и всё, но это на будующее, а Вам нужно просто в нужном месте прописать Form1.OnCreate(form1).
Ответ отправил: Genia007 (статус: 6-ой класс)
Ответ отправлен: 11.02.2008, 21:40 Оценка за ответ: 5
Вопрос № 122.497
Здравствуйте ув эксперты помогите пожайлуста
Нужно вычислить на ПК значения функции
40
z = П (cos an + n)
n=1
Заранее спасибо
Отправлен: 10.02.2008, 14:45
Вопрос задал: Alex573 (статус: Посетитель)
Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 2)
Отвечает: Delph
Здравствуйте, Alex573!
Вот, к примеру, такое решение. Значение параметра a считывается из компонента Edit1, результат вычислений пишется в Edit2. Запуск процедуры происходит при нажатии на кнопку Button1 (в приложении - обработчик нажатия на эту кнопку).
Приложение:
--------- Сомневайся во всём! Реальность часто бывает не такой, как мы о ней думаем.
Ответ отправил: Delph (статус: Студент)
Ответ отправлен: 11.02.2008, 07:37 Оценка за ответ: 5 Комментарий оценки: у меня дочка точно так же решила
так что большое спасибо
