Отправляет email-рассылки с помощью сервиса Sendsay
  Все выпуски  

RusFAQ.ru: Программирование на Delphi


Новое направление Портала RusFAQ.ru:
MosHoster.ru - Профессиональный хостинг

РАССЫЛКИ ПОРТАЛА RUSFAQ.RU

/ КОМПЬЮТЕРЫ И ПО / Языки программирования / Delphi

Выпуск № 1065
от 15.02.2008, 17:35

Администратор:Калашников О.А.
В рассылке:Подписчиков: 435, Экспертов: 61
В номере:Вопросов: 2, Ответов: 4

Нам важно Ваше мнение об этой рассылке.
Оценить этот выпуск рассылки >>


Вопрос № 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
Комментарий оценки:
у меня дочка точно так же решила так что большое спасибо


Вы имеете возможность оценить этот выпуск рассылки.
Нам очень важно Ваше мнение!
Оценить этот выпуск рассылки >>

Отправить вопрос экспертам этой рассылки

Приложение (если необходимо):

* Код программы, выдержки из закона и т.п. дополнение к вопросу.
Эта информация будет отображена в аналогичном окне как есть.

Обратите внимание!
Вопрос будет отправлен всем экспертам данной рассылки!

Для того, чтобы отправить вопрос выбранным экспертам этой рассылки или
экспертам другой рассылки портала RusFAQ.ru, зайдите непосредственно на RusFAQ.ru.


Форма НЕ работает в почтовых программах The BAT! и MS Outlook (кроме версии 2003+)!
Чтобы отправить вопрос, откройте это письмо в браузере или зайдите на сайт RusFAQ.ru.


© 2001-2008, Портал RusFAQ.ru, Россия, Москва.
Авторское право: ООО "Мастер-Эксперт Про"
Техподдержка портала, тел.: +7 (926) 535-23-31
Хостинг: "Московский хостер"
Поддержка: "Московский дизайнер"
Авторские права | Реклама на портале
Версия системы: 4.70 от 17.01.2008
Яндекс Rambler's Top100
RusFAQ.ru | MosHoster.ru | MosDesigner.ru | RusIRC.ru
Kalashnikoff.ru | RadioLeader.ru | RusFUCK.ru

В избранное