Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2007.11.18;
Скачать: [xml.tar.bz2];

Вниз

Объявление переменных смежных модулей   Найти похожие ветки 

 
Alex8   (2007-10-27 13:51) [0]

Уважаемые мастера, подскажите, пожалуйста
как быть в следующем случае:

 В одном из модулей такая процедура

Procedure A (pFrm: Tform);
begin
 pFrm.ab := " ";
end;
где ab-глобальные переменные (похожие), объявленные в разных
формах другого модуля т.е. в  pFrm.
Компилятор, естественно выдает, что "ab" - не декларируема. Что
нужно сделать. Спасибо.


 
vpbar ©   (2007-10-27 14:31) [1]

ab в public


 
Alex8   (2007-10-27 15:48) [2]

> ab в public

Хорошо бы поподробней.
ab  у меня и так в public (в разных формах).
А  в модуле приведенной процедуры форм нет.
И потом важно, чтобы  pFrm.ab воспринималось,
как  ab  из фориы  pFrm


 
Anatoly Podgoretsky ©   (2007-10-27 15:53) [3]

> Alex8  (27.10.2007 15:48:02)  [2]

Это ты говоришь, а как на самом деле


 
Alex8   (2007-10-27 16:04) [4]

В Form1 модуля U1
........................
Public
 ab: String;
---------------------------------
В Form2 модуля U1
........................
Public
 ab: String;
------------------------
В  модуле U2  (без форм)

Procedure A (pFrm: Tform);
begin
pFrm.ab := " ";
end;


 
Anatoly Podgoretsky ©   (2007-10-27 16:06) [5]

Это огрызок а не код, где uses, где заголок класса.
Ответь в Tform у тебя есть ab


 
Alex8   (2007-10-27 16:32) [6]

> Ответь в Tform у тебя есть ab
Нет. ab-не базовая переменная.

Ее как-то надо обЪявить в модуле U2,
как принадлежащую формам pForm.
 Вот только не соображу, как это сделать.

Можно, конечно, писать в лоб.
Form1.ab,   Form2.ab ......,
но это, мягко говоря, громоздко.


 
Плохиш ©   (2007-10-27 16:57) [7]


> Alex8   (27.10.07 16:32) [6]

приведи pFrm к требуемому типу.

> Можно, конечно, писать в лоб.
> Form1.ab,   Form2.ab ......,
> но это, мягко говоря, громоздко.

Это, немягко говоря, тупо и путь идиота в пропасть...

PS. Пора бы уже ознакомиться с основами ООП.


 
Anatoly Podgoretsky ©   (2007-10-27 17:02) [8]

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


 
Alex8   (2007-10-27 17:04) [9]

>приведи pFrm к требуемому типу.

Как? Подскажи тупому, необразованному.
Самый примитивный пример.


 
Alex8   (2007-10-27 17:10) [10]

> Непонятно зачем выводить в отдельную процедуру.......

Конечно, это не строка, а нормальная процедура.
Я просто привел выжимку, чтобы легче было общаться.
Кто станет разбираться в тонкостях моих процедур.


 
Anatoly Podgoretsky ©   (2007-10-27 17:12) [11]

> Alex8  (27.10.2007 17:10:10)  [10]

Никто, но никто и не будет давать рекомендаций по несуществующему коду.
По существующему коду - эту процедуру надо ликвидировать.


 
Alex8   (2007-10-27 17:34) [12]

> Anatoly Podgoretsky ©   (27.10.07 17:12) [11]
Без комментариев.


 
Leonid Troyanovsky ©   (2007-10-27 19:10) [13]


> Alex8   (27.10.07 17:34) [12]

> Без комментариев.

Ес-но, откуда им быть.

--
Regards, LVT.


 
Alex8   (2007-10-27 19:24) [14]

> Regards, LVT.
 Если это ответ на мой вопрос, то
тут желателен комментарий.


 
Leonid Troyanovsky ©   (2007-10-27 20:07) [15]


> Alex8   (27.10.07 19:24) [14]

>  Если это ответ на мой вопрос, то

Будет вопрос - будет и ответ, надеюсь.
RTFM http://ln.com.ua/~openxs/articles/smart-questions-ru.html

--
Regards, LVT.


 
Alex8   (2007-10-27 21:59) [16]

За полезную ссылку спасибо.
Но что означает "Regards, LVT".
Подпись, ругательство, намек на что-то, какой-то термин ?
Просветите, пожалуйста .


 
vpbar ©   (2007-10-27 22:09) [17]

>>Alex8   (27.10.07 21:59) [16]
С анклицким не дружим? Ну хотя бы словарем пользоваться научись.
>>Как? Подскажи тупому, необразованному.
>>Самый примитивный пример.
Зачем. Вдруг ты программу напишешь а я ей попользьваться решу.
Самый примитивный - TForm1(pForm).ab


 
Сергей М. ©   (2007-10-27 22:35) [18]


> Чтонужно сделать


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


 
Alex8   (2007-10-27 23:02) [19]

> vpbar ©   (27.10.07 22:09) [17]

> Зачем. Вдруг ты программу напишешь а я ей попользьваться
> решу.

Хорошая идея. Я продам ее тебе за бешенные деньги.


 
vpbar ©   (2007-10-27 23:13) [20]

>>Alex8   (27.10.07 23:02) [19]
Ага. Твоя и за так не нужна.


 
Alex8   (2007-10-28 00:12) [21]

> Ага. Твоя и за так не нужна.

Скучно!


 
Anatoly Podgoretsky ©   (2007-10-28 00:49) [22]

> vpbar  (27.10.2007 23:13:20)  [20]

Ну разве что, если он заплатит.



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2007.11.18;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.5 MB
Время: 0.058 c
1-1188216598
временный Чайник
2007-08-27 16:09
2007.11.18
Как в Viste удалить файл в Program Files


2-1193379623
Layner
2007-10-26 10:20
2007.11.18
Узнать, над каким элементом вызвали PopupMenu


15-1192261056
Kostafey
2007-10-13 11:37
2007.11.18
Культурная установка BDE на пользовательском PC


15-1192188781
Василий К.
2007-10-12 15:33
2007.11.18
rxlib для Delphi 2007


15-1192400493
Dmk
2007-10-15 02:21
2007.11.18
Не хватает памяти при копировании в Vista





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский