Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 19.07.2009, 02:23   #1
Polotenchik
Форумчанин
 
Аватар для Polotenchik
 
Регистрация: 04.12.2008
Сообщений: 260
По умолчанию Общая переменная и процедура для двух форм?

Есть 2 формы. Form1 и Form2. на первой форме есть некая процедура

Код:
  private
    procedure myproc;
и переменная n

Код:
var
  Form1: TForm1;
  n: integer;

implementation
Процедуру на первой форме я так везде и вызываю: Form1.myproc;

Два вопроса:
1. Как вызвать эту процедуру на второй форме в unit-е 2 ? Form1.myproc почему-то не прокатывает.

2. Бросаю на форму 1 кнопку и в обработчики онклик прописываю n:=1
Та же проблема: как мне теперь обратиться к этой переменной n на второй форме?

Заранее спасибо!
Я бы изменил мир, но Бог не дает исходники...
Polotenchik вне форума Ответить с цитированием
Старый 19.07.2009, 02:41   #2
Evgeniy26
Форумчанин
 
Аватар для Evgeniy26
 
Регистрация: 29.05.2009
Сообщений: 384
По умолчанию

Открой вторую форму, нажми Alt + F11 (File->Use Unit) и добавь Unit1. И процедуру из privat перенеси.
unit1:
Код:
public
     n: Integer;
     procedure myproc;
unit2:
Код:
....
var
  Form2: TForm2;

implementation

uses Unit1;
...
Если так:
Код:
var
  Form1: TForm1;
  n: integer;

implementation
То из Unit2 обращайся:
Код:
n := 1;

Последний раз редактировалось Evgeniy26; 19.07.2009 в 02:55.
Evgeniy26 вне форума Ответить с цитированием
Старый 19.07.2009, 12:20   #3
Polotenchik
Форумчанин
 
Аватар для Polotenchik
 
Регистрация: 04.12.2008
Сообщений: 260
По умолчанию

Спасибо! работает!
Я бы изменил мир, но Бог не дает исходники...
Polotenchik вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Общая переменная Артэс Общие вопросы C/C++ 4 18.06.2009 16:24
Общая переменная для нескольких экземпляров программы. Fabio Общие вопросы Delphi 9 24.02.2009 09:25
Общая переменная для различных обработчиков событий Mike_new Общие вопросы .NET 3 29.12.2008 16:43
Подскажите пожалуста! есть ли переменная для обозначения дисковода? Medyankin Помощь студентам 4 27.07.2008 15:58
Общая переменная А.Брей Помощь студентам 2 20.05.2007 18:13