Вызов объектов формы в классе

@DiMoN2002 · Регистрация: 28.04.2009

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

Может слегка не корректно описал вопрос.
В общем есть программа и нужно в функциях класса использовать элементы формы.

Unit1.cpp

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
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
 
#pragma package(smart_init)
#pragma resource "*.dfm"
 
TForm1 *Form1;
chess shahm;
hod xod;
visual vizz;
 
void chess :: Initialize ( )
{
    ThisX = 0;
    ThisY = 0;
    SelComplete = 0; 
    Flag = 0;
    NewX = NewY =0;
    ThisFigure = [COLOR="Red"]BEPesh;[/COLOR]
  
    for ( int i=0; i<8; i++ )
    {
        Doska[0][i] = -i-9; 
        Doska[1][i] = -i-1; 
        Doska[6][i] =  i+1; 
        Doska[7][i] =  i+9; 
        for ( int j=2; j<6; j++)
            Doska[j][i] = 0;
    }
}

Unit1.h

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
64
65
66
67
68
69
70
71
72
73
74
75
76
#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ExtCtrls.hpp>
#include <Graphics.hpp>
#include <ScktComp.hpp>
#include <Menus.hpp>
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published:    // IDE-managed Components
    TImage *Board;
    TImage *WLTura;
    TImage *WRTura;
    TImage *WLHors;
    TImage *WRHors;
    TImage *WLSlon;
    TImage *WRSlon;
    TImage *WLKing;
    TImage *WRQuen;
    TImage *BLTura;
    TImage *BLHors;
    TImage *BLSlon;
    TImage *BRTura;
    TImage *BRHors;
    TImage *BRSlon;
    TImage *BRQuen;
    TImage *BLKing;
    TImage *WAPesh;
    TImage *WBPesh;
    TImage *WCPesh;
    TImage *WDPesh;
    TImage *WEPesh;
    TImage *WFPesh;
    TImage *WGPesh;
    TImage *WHPesh;
    TImage *BAPesh;
    TImage *BBPesh;
    TImage *BCPesh;
    TImage *BDPesh;
    TImage *BEPesh;
    TImage *BFPesh;
    TImage *BGPesh;
    TImage *BHPesh;
    TMemo *Memo1;
    TLabel *Label1;
    TImage *Null_Image;
    TMainMenu *MainMenu1;
    TMenuItem *Main1;
    TMenuItem *N4;
    void __fastcall BoardMouseUp(TObject *Sender, TMouseButton Button,
          TShiftState Shift, int X, int Y);
     void __fastcall Main1Click(TObject *Sender);
    void __fastcall N4Click(TObject *Sender);
        void __fastcall FormCreate(TObject *Sender);
private:    // User declarations
public:     // User declarations
};
//---------------------------------------------------------------------------
class chess
{
public:
short Doska[8][8];
void Initialize ( );
__int8 ThisX, ThisY, NewX, NewY;
bool Flag;
TImage *ThisFigure;
short SelComplete;
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
#endif

Там где красным выделено компилятор ругается "Undefined symbol BEPesh".
Помогите пожалуйста. Очень надо. Как правильно использовать элементы формы?
Заранее благодарен всем кто подскажет.

@Lord_Voodoo · 13.05.2009, 10:29

DiMoN2002, BEPesh - к чему относиться, билдер не знает, вот и ругается? в классе chess его нет... надо указать к какому классу относиться или объявить в классе, чего вам абсолютно не надо...
что-то вроде такого нужно:
ThisFigure = Form1->BEPesh;

Новые блоги и статьи Все статьи Все блоги /
Программная установка даты и запрет ее изменения Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: при создании документов установить период списания автоматически. . .	Вывод данных через динамический список в справочнике Maks 01.04.2026 Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .	Функция заполнения текстового поля в реквизите формы документа Maks 01.04.2026 Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .	К слову об оптимизации kumehtar 01.04.2026 Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .
Идея фильтра интернета (сервер = слой+фильтр). Hrethgir 31.03.2026 Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .	Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда anaschu 31.03.2026 В прикрепленном документе раздумья о том, как можно поменять модель в будущем	10 пpимет, которые всегда сбываются Maks 31.03.2026 1. Чтобы, наконец, пришла маршрутка, надо закурить. Если сигарета последняя, маршрутка придет еще до второй затяжки даже вопреки расписанию. 2. Нaдоели зима и снег? Не надо переезжать. Достаточно. . .	Перемещение выделенных строк ТЧ из одного документа в другой Maks 31.03.2026 Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .

@Lord_Voodoo Почетный модератор 8785 / 2538 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	13.05.2009, 10:29
	DiMoN2002, BEPesh - к чему относиться, билдер не знает, вот и ругается? в классе chess его нет... надо указать к какому классу относиться или объявить в классе, чего вам абсолютно не надо... что-то вроде такого нужно: ThisFigure = Form1->BEPesh; 1