Linker error unresolved external fastcall tform1

#include
#include
#include
#include

TIBDatabase *IBDatabase1;
TIBTransaction *IBTransaction1;
TIBQuery *IBQuery1;

#pragma argsused
int WINAPI DllEntryPoint(HINSTANCE hinst, unsigned long reason, void* lpReserved)
<
return 1;
>
//—————————————————————————
extern "C" __declspec(dllexport) void OpenBase(char *name)
<
IBDatabase1 = new TIBDatabase(Owner);
IBTransaction1 = new TIBTransaction(Owner);
IBQuery1 = new TIBQuery(Owner);
>

в том, что link не находит двоичного кода реализации
что-то ты недоцепил.

другой вариант — пользовался библиотеками, снёс их, но ссылка на них включается в *.bpr. такое бывает. суть та же. вытирается руками.

я намекаю на то, что ты б хоть привёл всю строку ошибки, чтоли.

Ошибки вот такие:

[Linker Error] Unresolved external ‘Ibdatabase::TIBDatabase::’ referenced from E:BASEUNIT1.OBJ

[Linker Error] Unresolved external ‘__fastcall Ibdatabase::TIBDatabase::TIBDatabase(Classes::TComponent *)’ referenced from E:BASEUNIT1.OBJ

[Linker Error] Unresolved external ‘Ibdatabase::TIBTransaction::’ referenced from E:BASEUNIT1.OBJ

[Linker Error] Unresolved external ‘__fastcall Ibdatabase::TIBTransaction::TIBTransaction(Classes::TComponent *)’ referenced from E:BASEUNIT1.OBJ

[Linker Error] Unresolved external ‘Ibquery::TIBQuery::’ referenced from E:BASEUNIT1.OBJ

[Linker Error] Unresolved external ‘__fastcall Ibquery::TIBQuery::TIBQuery(Classes::TComponent *)’ referenced from E:BASEUNIT1.OBJ

[Linker Error] Unresolved external ‘__fastcall Ibdatabase::TIBDatabase::SetDefaultTransaction(Ibdatabase::TIBTransaction *)’ referenced from E:BASEUNIT1.OBJ

[Linker Error] Unresolved external ‘__fastcall Ibdatabase::TIBDatabase::SetDatabaseName(const System::AnsiString)’ referenced from E:BASEUNIT1.OBJ

[Linker Error] Unresolved external ‘__fastcall Ibdatabase::TIBTransaction::SetDefaultDatabase(Ibdatabase::TIBDatabase *)’ referenced from E:BASEUNIT1.OBJ

[Linker Error] Unresolved external ‘__fastcall Ibdatabase::TIBTransaction::SetActive(bool)’ referenced from E:BASEUNIT1.OBJ

[Linker Error] Unresolved external ‘__fastcall Ibcustomdataset::TIBCustomDataSet::SetDatabase(Ibdatabase::TIBDatabase *)’ referenced from E:BASEUNIT1.OBJ

[Linker Error] Unresolved external ‘__fastcall Ibcustomdataset::TIBCustomDataSet::SetTransaction(Ibdatabase::TIBTransaction *)’ referenced from E:BASEUNIT1.OBJ

[Linker Error] Unresolved external ‘__fastcall Db::TDataSet::Next()’ referenced from E:BASEUNIT1.OBJ

[Linker Error] Unresolved external ‘__fastcall Db::TDataSet::Prior()’ referenced from E:BASEUNIT1.OBJ

[Linker Error] Unresolved external ‘__fastcall Db::TDataSet::FieldByName(const System::AnsiString)’ referenced from E:BASEUNIT1.OBJ

[Linker Error] Unresolved external ‘__fastcall Ibdatabase::TIBTransaction::Commit()’ referenced from E:BASEUNIT1.OBJ

[Linker Error] Unresolved external ‘__fastcall Ibdatabase::TIBDatabase::

TIBDatabase()’ referenced from E:BASEUNIT1.OBJ

[Linker Error] Unresolved external ‘__fastcall Db::TCustomConnection::

TCustomConnection()’ referenced from E:BASEUNIT1.OBJ

[Linker Error] Unresolved external ‘__fastcall Ibdatabase::TIBTransaction::

TIBTransaction()’ referenced from E:BASEUNIT1.OBJ

[Linker Error] Unresolved external ‘__fastcall Ibquery::TIBQuery::

TIBQuery()’ referenced from E:BASEUNIT1.OBJ

[Linker Error] Unresolved external ‘__fastcall Ibcustomdataset::TIBCustomDataSet::

TIBCustomDataSet()’ referenced from E:BASEUNIT1.OBJ

[Linker Error] Unresolved external ‘__fastcall Db::TDataSet::

[ILINK32 Error] Error: Unresolved external ‘TForm1::’ referenced from D:PROGRAMSKURSDEBUGPROJECT1.OBJ
[ILINK32 Error] Error: Unable to perform link

Впервые сталкиваюсь с подобным. Можете объяснить, отчего это?

Код TForm1:
#include
#include
#pragma hdrstop

struct Notes
<
char Name[60]; // фамилия имя отчество
char Phone[16]; // телефон
int Age; // возраст
>;

//—————————————————————————
void __fastcall TForm1::Memo1Change(TObject *Sender)
<
// Если файл NoteBook.dat не существует, в Меmo1 посылается сообщение
if(!FileExists("NoteBook.dat"))
<
Memo1->Text="NoteBook.dat file does not exist";
Button1->Enabled=false;
>
>
//—————————————————————————
void __fastcall TForm1::Button1Click(TObject *Sender)
<
Notes Note1;
// Получение значений из полей ввода
if((Edit1->Text!="")&&(Edit2->Text!="")&&(Edit3->Text!=""))
temp=Edit1->Text;
strcpy(Note1.Name, temp.c_str());
temp=Edit3->Text;
strcpy(Note1.Phone, temp.c_str());
Note1.Age=Edit2->Text.ToInt();

// открытие файла для чтения
fstream file("NoteBook.dat", ios::binary | ios::in | ios::out);
char str[80];
file.seekg(0); //указатель на первую запись

Окончательно запутался. Я так понял, TForm1 потерялся и попутался.

Добавляю:
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
<
// Если файл NoteBook.dat не существует, в Меmo1 посылается сообщение
if(!FileExists("NoteBook.dat"))
<
Memo1->Text="Файл NoteBook.dat не существует";
Button1->Enabled=false;
>
>

Он мне выдает: [BCC32 Error] Unit1.cpp(27): E2136 Constructor cannot have a return type specification выделяя : TForm(Owner)

When I use IntToBin function in my program, this error occurs

[Linker Error] Unresolved external

‘__fastcall Idglobal::IntToBin(unsigned int)’

referenced from C:PROGRAM FILESBORLANDCBUILDER6PROJECTSUNIT1.OBJ

What should be done to avoid this error?

#pragma resource "*.dfm"

__fastcall TForm1::TForm1(TComponent* Owner)

class TForm1 : public TForm

__published: // IDE-managed Components

private: // User declarations

public: // User declarations

__fastcall TForm1(TComponent* Owner);

extern PACKAGE TForm1 *Form1;

Where is my fault?

2 Answers

Either the IntToBin function is misspelled, or misnamed, or you haven’t included any reference to the library where that name is defined. Could it be Int2Bin?

  • Login to reply the answers Post

You forgot to let us know what blunders you’re starting to be to be. additionally, you’re lacking a #contain of ‘cstdlib’. the main important situation is that your code is inconsistent approximately what the 0.33 parameter to ‘selectionSort’ is. Is it an ‘int’ or a ‘vectorfa7153f7ed1cb6c0fcf2ffb2fac21748’?


[an error occurred while processing the directive]
Карта сайта