VPF::Не могу достать переменную из другой формы

Mpak

Дата 4.12.2006, 20:50 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 445
Регистрация: 12.11.2006

Репутация: 4
Всего: 7

Partizan, спасибо, буду должен ;)

--------------------

В любой откомпилированной программе есть, по крайней мере, одна ошибка...
P.S. А у меня их минимум две...

_int64

Дата 19.3.2007, 18:56 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 36
Регистрация: 30.1.2007

Репутация: нет
Всего: нет

Unit1.cpp

Код


#pragma hdrstop

#include "Unit1.h"
#include "Unit2.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
bool s;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)
{
   s=1;
   Form2->Show();
}
//---------------------------------------------------------------------------

Unit2.cpp

Код


//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Unit2.h"
#include "Unit1.cpp"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm2 *Form2;
extern bool s;
//---------------------------------------------------------------------------
__fastcall TForm2::TForm2(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm2::FormClick(TObject *Sender)
{
      if(s) ShowMessage("!!!");
}
//---------------------------------------------------------------------------

Сообщение при клике на вторую форму не выводится....

при компилировании пишет

Цитата

[Linker Warning] Public symbol '_s' defined in both module D:\PROGRAM FILES\BORLAND\CBUILDER6\PROJECTS\UNIT1.OBJ and D:\PROGRAM FILES\BORLAND\CBUILDER6\PROJECTS\UNIT2.OBJ

[/quote]
[/quote]

_hunter

Дата 19.3.2007, 19:22 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 8564
Регистрация: 24.6.2003
Где: Europe::Ukraine:: Kiev

Репутация: 24
Всего: 98

а не проще ли (в таком случае) сделать s членом класса (что TForm1 что TForm2)?
и в .cpp extern писать не нужно (мог бы и на обявление/реализацию TForm1 глянуть)

--------------------

Tempora mutantur, et nos mutamur in illis...

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| C++ Builder \| Следующая тема »