Передача управление стартовой формой процедурам модуля

← →
fokas © (2008-08-27 18:41) [0]

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

← →
{RASkov} © (2008-08-27 19:29) [1]

не понятно...

← →
fokas © (2008-08-27 19:30) [2]

Извините, не указал: D7, XP

← →
Джо © (2008-08-27 19:31) [3]

<telepator mode="пробегал мимо">

procedure Abc (Form: TForm);

</telepator>

← →
Сергей М. © (2008-08-27 19:38) [4]

> fokas © (27.08.08 18:41)

В русском языке семь падежей.
Ты какие из них знаешь ?

← →
fokas © (2008-08-27 19:44) [5]

форма имеет класс TForm1, который наследуется от TForm. сам же TForm не содержит компонентов и их процедур. Как TForm1 передать в модуль я не знаю. Потому и не могу в заголовке процедуры указать этот класс. Простое подключение Form1.pas в модуле вызывает ошибку :(

← →
Сергей М. © (2008-08-27 19:47) [6]

> Как TForm1 передать в модуль я не знаю

Я тоже.
Ибо нонсенс - передать чего-то там в модуль.

← →
Сергей М. © (2008-08-27 19:48) [7]

ты мож модуль с юнитом путаешь ?
Довольно разные разницы(

← →
fokas © (2008-08-27 19:56) [8]

возможно. может у меня с этим не правильное представление, тогда полезу сейчас в учебники исправлять свои знания
верно, создаю юнит. есть форма Form1, имеющая класс TForm1 (в нём прописаны компоненты и их процедуры)
Если сделать как предложено выше ABC(Form:TForm), ничего не получу, т.к. это не класс формы. Если ABC(Form:TForm1). ошибка - такого класса в юните не существует

← →
Сергей М. © (2008-08-27 19:59) [9]

> полезу сейчас в учебники исправлять свои знания

Видимо, пора)

← →
fokas © (2008-08-27 20:19) [10]

Помощи я здесь не получил, только немного издевательств. Наверное мне просто надо было указать тип ошибки и не распинаться. ну не смог я корректно объяснить =(
Circular unit references

Решение:
подключить юнит с формой (или как его) в фактических параметрах Implementation. Тогда не будет кругового обращения - зацикливания

← →
{RASkov} © (2008-08-27 20:29) [11]

> [10] fokas © (27.08.08 20:19)
> Помощи я здесь не получил, только немного издевательств

Всего лишь только из-за

> ну не смог я корректно объяснить

Бывает, не переживай. Кстати, не издевательств, а попытки вытянуть из тебя инфу... а ты партизан. :)

← →
Сергей М. © (2008-08-27 20:51) [12]

> в фактических параметрах Implementation

Что еще за зверь ?

> не смог я корректно объяснить =(
> Circular unit references
>

Первый раз о тебя это слышим.

Привел бы ты сразу дословный текст сообщения об ошибке - не было бы и базара)

Т.е. классика - ССЗБ)

← →
Palladin © (2008-08-27 22:16) [13]

>Помощи я здесь не получил,

ну ясен пень... здесь мало кто подскажет почему шушканчики фапыками не речусят...особенно рапесные шушканчики... они только на чукотке вакуют...

← →
Плохиш © (2008-08-28 09:39) [14]

> fokas © (27.08.08 20:19) [10]
> Помощи я здесь не получил, только немного издевательств.
> Наверное мне просто надо было указать тип ошибки и не распинаться.

Поплачь

> Circular unit references

А додуматься F1 нажать на ошибке не судьба?

← →
любитель задавать вопросы (2008-08-28 14:37) [15]

Удалено модератором

← →
Германн © (2008-08-28 14:48) [16]

> > А додуматься F1 нажать на ошибке не судьба?
>
> я сначала здесь спрашиваю - когда посоветуют нажать F1,
> тогда нажимаю.
>

Но по нажатию F1 ошибка почему-то сама на исправляется. Только показывает какой-то нечитаемый текст :(((

← →
aaaaa (2008-08-28 14:51) [17]

Удалено модератором

← →
aaaaa (2008-08-28 14:59) [18]

Удалено модератором

> А не шесть ? :)

Пять баллов!
Но было чего-то семь. Дней недели?

> Но было чего-то семь. Дней недели?

Нот. Цветов в радуге. Лепестков у цветка махровой сирени.

> Игорь Шевченко (28.08.2008 15:22:19) [19]

Шесть обычных, а один - паленку выпил.

> Anatoly Podgoretsky © (28.08.08 15:41) [22]

Чё-то сильно смахивает на стишок про 10 негритят ставший основой для знаменитого детектива. :)

Передача управление стартовой формой процедурам модуля Найти похожие ветки