Ошибка Call to undefined function 'FirstPicture'

@Levch · Регистрация: 06.12.2012

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

Здравствуйте.
Вываливается вот такая ошибка,
[C++ Error] Unit8.cpp(24): E2268 Call to undefined function 'FirstPicture'
подскажите что не так.
Заранее благодарен.

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
//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 #include<FileCtrl.hpp>
 #include<jpeg.hpp>
 AnsiString aPath;
 TSearchRec aSearchRec;
#include "Unit8.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::FormCreate(TObject *Sender)
{
 aPath="";
 FirstPicture();
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
if(SelectDirectory("Âûáåðèòå êàòàëîã,â êîòîðîì íàõîäèòñÿ èëëþñòðàöèè","",aPath)!=0)
{
aPath=aPath+"\\";
FirstPicture();
}
}
void TForm1::FirstPicture()
{
Image1->Visible=false;
Button2->Enabled=false;
Label1->Caption="";
if(FindFirst(aPath+"*.jpg",faAnyFile,aSearchREc)==0)
{
Image1->Picture->LoadFromFile(aPath+aSearchRec.Name);
Image1->Visible=true;
Labeel1->Caption=aSearchRec.Name;
if(FindNext(aSearchRec)==0)
{
Button2->Enabled=true;
}
}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
Image1->Picture->LoadFromFile(aPath+aSearchRec.Name);
Label1->Caption=aSearchRec.Name;
if(FindNext(aSearchRec)!=0)
{
Button2->Enabled=false;
}
}

@Matrix · 19.12.2012, 19:57

Осмелюсь предположить, что Вы не прописали в классе формы (Unit8.h) прототип этой функции.

@Levch · 19.12.2012, 20:11 **[ТС]**

Да уж,это помогло но теперь он выдает другую ошибку:
[C++ Error] Unit8.cpp(37): E2316 'TForm1::FirstPicture()' is not a member of 'TForm1'
[C++ Error] Unit8.cpp(41): E2451 Undefined symbol 'aSearchREc'
а точнее даже две(((уверен вторая возникает изза первой.

@Sasha · 19.12.2012, 20:36

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
void __fastcall TForm1::FirstPicture()
{
Image1->Visible=false;
Button2->Enabled=false;
Label1->Caption="";
if(FindFirst(aPath+"*.jpg",faAnyFile,aSearchREc)==0)
{
Image1->Picture->LoadFromFile(aPath+aSearchRec.Name);
Image1->Visible=true;
Labeel1->Caption=aSearchRec.Name;
if(FindNext(aSearchRec)==0)
{
Button2->Enabled=true;
}
}
}

Добавлено через 1 минуту
Вот это

C++
1
2
AnsiString aPath;
 TSearchRec aSearchRec;

лучше объявлять после вот этого

C++
1
TForm1 *Form1;

@Levch · 19.12.2012, 20:49 **[ТС]**

Что-то все равно ошибки те же.

Вот так должно выглядеть описание в классе формы (Unit8.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
//---------------------------------------------------------------------------
 
#ifndef Unit8H
#define Unit8H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ExtCtrls.hpp>
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published:    // IDE-managed Components
        TImage *Image1;
        TLabel *Label1;
        TButton *Button1;
        TButton *Button2;
        void __fastcall Label1Click(TObject *Sender);
        void __fastcall FormCreate(TObject *Sender);
        void __fastcall Button1Click(TObject *Sender);
        void __fastcall Button2Click(TObject *Sender);
 
private:   FirstPicture();  // User declarations
public:         // User declarations
        __fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif

@Sasha · 19.12.2012, 23:07

Желательно так

C++
1
2
3
4
private:     // User declarations
public:         // User declarations
        __fastcall TForm1(TComponent* Owner);
           void __fastcall FirstPicture();

@Levch · 19.12.2012, 23:10 **[ТС]**

Огромное спасибо.
Заработало без ошибок)

Новые блоги и статьи Все статьи Все блоги /
Идея фильтра интернета (сервер = слой+фильтр). Hrethgir 31.03.2026 Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .	Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда anaschu 31.03.2026 В прикрепленном документе раздумья о том, как можно поменять модель в будущем	10 пpимет, которые всегда сбываются Maks 31.03.2026 1. Чтобы, наконец, пришла маршрутка, надо закурить. Если сигарета последняя, маршрутка придет еще до второй затяжки даже вопреки расписанию. 2. Нaдоели зима и снег? Не надо переезжать. Достаточно. . .	Перемещение выделенных строк ТЧ из одного документа в другой Maks 31.03.2026 Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .
Functional First Web Framework Suave DevAlt 30.03.2026 Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .	Автоматическое создание документа при проведении другого документа Maks 29.03.2026 Реализация из решения ниже выполнена на нетиповых документах, разработанных в конфигурации КА2. Есть нетиповой документ "ЗаявкаНаРемонтСпецтехники" и нетиповой документ "ПланированиеСпецтехники". В. . .	Настройка движения справочника по регистру сведений Maks 29.03.2026 Решение ниже реализовано на примере нетипового справочника "ТарифыМобильнойСвязи" разработанного в конфигурации КА2, с целью учета корпоративной мобильной связи в коммерческом предприятии. . . .	Автозаполнение реквизита при выборе элемента справочника Maks 27.03.2026 Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .

@Matrix Now I Matrix 137 / 134 / 28 Регистрация: 01.03.2010 Сообщений: 223
	19.12.2012, 19:57
	Осмелюсь предположить, что Вы не прописали в классе формы (Unit8.h) прототип этой функции. 1

@Levch 7 / 0 / 0 Регистрация: 06.12.2012 Сообщений: 26
	19.12.2012, 20:11 [ТС]
	Да уж,это помогло но теперь он выдает другую ошибку: [C++ Error] Unit8.cpp(37): E2316 'TForm1::FirstPicture()' is not a member of 'TForm1' [C++ Error] Unit8.cpp(41): E2451 Undefined symbol 'aSearchREc' а точнее даже две(((уверен вторая возникает изза первой. 0

@Levch 7 / 0 / 0 Регистрация: 06.12.2012 Сообщений: 26
	19.12.2012, 23:10 [ТС]
	Огромное спасибо. Заработало без ошибок) 0