Ошибка при вызове функции из другого модуля

@Nasferatu · Регистрация: 24.07.2013

Студворк — интернет-сервис помощи студентам

Ситуация до боли забитая, но не могу найти ошибку...

Мне нужно из формы FFlat вызвать функцию определенную в дрогой форме FVipHomeDay.

h формы FFlat

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
class TFFlat : public TForm
{
__published:    // IDE-managed Components
        TPageControl *PageControl1;
        TTabSheet *TabSheet1;
        TTabSheet *TabSheet2;
        TTabSheet *TabSheet3;
        TTabSheet *TabSheet4;
        TGroupBox *GroupBox1;
        TGroupBox *GroupBox2;
        TDateTimePicker *DateTimePicker1;
        TLabel *Label1;
        TEdit *Edit1;
        TLabel *Label2;
        TLabel *Label3;
        TEdit *Edit2;
        TLabel *Label4;
        TEdit *Edit3;
        TLabel *Label5;
        TRichEdit *RichEdit1;
        TComboBox *ComboBox1;
        TLabel *Label6;
        TLabel *Label7;
        TButton *Button1;
        TButton *Button2;
        TEdit *Edit4;
        TLabel *Label8;
        TEdit *Edit5;
        TLabel *Label9;
        TLabel *Label10;
        TEdit *Edit6;
        TListView *ListView1;
        TListView *ListView2;
        TButton *Button3;
        TButton *Button4;
        TButton *Button5;
        TButton *Button6;
        TGroupBox *GroupBox3;
        TCheckBox *CheckBox4;
        TCheckBox *CheckBox5;
        TCheckBox *CheckBox6;
        TCheckBox *CheckBox7;
        TPopupMenu *PopupMenu1;
        TMenuItem *N1;
        TMenuItem *N2;
        TMenuItem *N3;
        TButton *Button7;
        TADOTable *TClient;
        TWideStringField *TClientFIO;
        TRadioButton *RadioButton1;
        TRadioButton *RadioButton2;
        TBitBtn *BitBtn1;
        void __fastcall FormShow(TObject *Sender);
        void __fastcall RadioButton1Click(TObject *Sender);
        void __fastcall RadioButton2Click(TObject *Sender);
        void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
        void __fastcall Button1Click(TObject *Sender);
private:    // User declarations
public:     // User declarations
        __fastcall TFFlat(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TFFlat *FFlat;

cpp формы FFlat

C++
1
2
3
4
5
6
7
void __fastcall TFFlat::Button1Click(TObject *Sender)
{
 
 
   FVipHomeDay->fDraf(); //вызов функции
 
}

h формы FVipHomeDay

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
class TFVipHomeDay : public TForm
{
__published:    // IDE-managed Components
        TStringGrid *StringGrid1;
        TStatusBar *StatusBar1;
        TDateTimePicker *DateTimePicker1;
        TADOTable *TRooms;
        TWideStringField *TRoomsAdresRoom;
        TButton *Button1;
        void __fastcall DBGrid1DblClick(TObject *Sender);
        void __fastcall FormCreate(TObject *Sender);
        void __fastcall StringGrid1DrawCell(TObject *Sender, int ACol,
          int ARow, TRect &Rect, TGridDrawState State);
        void __fastcall StringGrid1DblClick(TObject *Sender);
private:    // User declarations
public:     // User declarations
        __fastcall TFVipHomeDay(TComponent* Owner);
        __fastcall fDraf(void); //Определил функцию
};
//---------------------------------------------------------------------------
extern PACKAGE TFVipHomeDay *FVipHomeDay;
extern AnsiString Data;
extern int Left1,Top1;
//---------------------------------------------------------------------------
#endif

сpp FVipHomeDay

C++
1
2
3
4
5
6
7
8
//описание функции
 
 __fastcall TFVipHomeDay::fDraf(void)
{
 
 StringGrid1->Cells[2][1]  = "Text";
 
}

Вызов происходит без проблем , но вылетает ошибка

@D1973 · 08.10.2014, 19:08

А не правильней ли объявить функцию так:

C++
1
void __fastcall fDraf();

?

@BRcr · 08.10.2014, 19:11

Форма TFVipHomeDay в списке автосоздаваемых?
Указатель FVipHomeDay нигде не перебивается? Не дублируется его объявление?

Добавлено через 1 минуту
D1973, правильней, конечно, но к ошибкам отношения это не имеет - максимум варнинг получится.

@D1973 · 08.10.2014, 19:22

Глупый вопрос, но... FVipHomeDay где-то в инклюдах присутствует?

Добавлено через 3 минуты
Хотя, скорее всего да, если компилируется...

@Dr.Xank · 08.10.2014, 19:42

А может вся проблема здесь?

C++
1
2
3
4
5
6
 __fastcall TFVipHomeDay::fDraf(void)
{
// Может запись в таблицу не идет/читает?
 StringGrid1->Cells[2][1]  = "Text";
 
}

@BRcr · 08.10.2014, 19:47

Dr.Xank, если бы даже такой ячейки не было, av не вывалился бы. А так как объявление в секции __published, можно считать, что грид создается. Скорее всего указатель на форму невалидный...

@Nasferatu · 08.10.2014, 20:41 **[ТС]**

Ребята спасибо огромное!! Проблема была в том, что я в срр FFlat продублировал объявление
TFVipHomeDay *FVipHomeDay;

Новые блоги и статьи Все статьи Все блоги /
Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .	Архитектура слоя интернета для сервера-слоя. Hrethgir 11.04.2026 В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .	Подстановка значения реквизита справочника в табличную часть документа Maks 10.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .	Очистка реквизитов документа при копировании Maks 09.04.2026 Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .
модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий anaschu 08.04.2026 https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI	Блокировка документа от изменений, если он открыт у другого пользователя Maks 08.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .	Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка. Hrethgir 08.04.2026 Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .	Модель ЗдрввоСохранения 7: больше работников, больше ресурсов. anaschu 08.04.2026 работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ

@BRcr 4043 / 2333 / 292 Регистрация: 03.02.2011 Сообщений: 5,066 Записей в блоге: 10
	08.10.2014, 19:11
	Форма TFVipHomeDay в списке автосоздаваемых? Указатель FVipHomeDay нигде не перебивается? Не дублируется его объявление? Добавлено через 1 минуту D1973, правильней, конечно, но к ошибкам отношения это не имеет - максимум варнинг получится. 1

@D1973 Модератор 9929 / 6467 / 2457 Регистрация: 21.01.2014 Сообщений: 27,423 Записей в блоге: 3
	08.10.2014, 19:22
	Глупый вопрос, но... FVipHomeDay где-то в инклюдах присутствует? Добавлено через 3 минуты Хотя, скорее всего да, если компилируется... 0

@BRcr 4043 / 2333 / 292 Регистрация: 03.02.2011 Сообщений: 5,066 Записей в блоге: 10
	08.10.2014, 19:47
	Dr.Xank, если бы даже такой ячейки не было, av не вывалился бы. А так как объявление в секции __published, можно считать, что грид создается. Скорее всего указатель на форму невалидный... 1

@Nasferatu 0 / 0 / 0 Регистрация: 24.07.2013 Сообщений: 7
	08.10.2014, 20:41 [ТС]
	Ребята спасибо огромное!! Проблема была в том, что я в срр FFlat продублировал объявление TFVipHomeDay *FVipHomeDay; 0