
January 30th, 2013, 01:33 AM
|
|
Registered User
|
|
Join Date: Jan 2013
Posts: 1
Time spent in forums: 16 m 6 sec
Reputation Power: 0
|
|
|
(Need Help) Codegear Rad Studio C++ Extern Problem ( Unresolved extarnal symbol )
Hi,
My Problem : If no value is symbol error does not. But I change value is symbol Error found
Error:
Code:
[ILINK32 Error] Error: Unresolved external '_Symbol1' referenced from D:\Test1Project\DEBUG\UNIT1.OBJ
[ILINK32 Error] Error: Unresolved external '_Ex' referenced from D:\Test1Project\DEBUG\UNIT1.OBJ
PublicSymbols.h
Code:
DWORD Symbol1 = 0;
struct mStruct1
{
int Lvc;
int cSnum;
String Pfq;
DWORD cID;
}Ex[25];
Unit1.cpp
Code:
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
#include <tchar.h>
#include <windows.h>
#include <math.h>
#include <iostream>
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
extern Symbol1;
extern struct mStruct1
{
int Lvc;
int cSnum;
String Pfq;
DWORD cID;
}Ex[25];
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
void __fastcall TForm1::FormShow(TObject *Sender)
{
Symbol1 = 300000;
Ex[0].Lvc = 1;
Ex[0].cSnum = 15;
Ex[0].Pfq = "Test";
Ex[0].cID = Ex[0].cSnum * Symbol1;
}
//---------------------------------------------------------------------------
Unit2.cpp
Code:
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit2.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm2 *Form2;
extern Symbol1;
extern struct mStruct1
{
int Lvc;
int cSnum;
String Pfq;
DWORD cID;
}Ex[25];
//---------------------------------------------------------------------------
__fastcall TForm2::TForm2(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm2::Button1Click(TObject *Sender)
{
Symbol1 = 600000;
Ex[1].Lvc = 4;
Ex[1].cSnum = 5;
Ex[1].Pfq = "Test5";
Ex[1].cID = Ex[1].cSnum * Symbol1;
}
//---------------------------------------------------------------------------
void __fastcall TForm2::Button2Click(TObject *Sender)
{
ShowMessage((String)Ex[0].Lvc + "\n" + (String)Ex[0].cSnum + "\n" + Ex[0].Pfq + "\n" + (String)Ex[0].cID);
}
//---------------------------------------------------------------------------
Thanks to all messages, Please Help me
|