Проблема с заданием и обращением к функции

[Dark_anamnesis]

Прблема в следующем, я задаю функцию:

Код: Выделить всё

void Vopr()
{
switch(vopros)
{
case 1:
Form1->Label1->Caption = "Вы питаете особенную слабость к..";
Form1->Button2->Caption = "A - Шоколаду";
Form1->Button3->Caption = "B - Йогурту";
Form1->Button4->Caption = "C - Салатам";
break;
... и т.д.
}

Объявляю ее в "public:", и мне нужно вызывать эту функцию по нажатию кнопки:

Код: Выделить всё

void __fastcall TForm1::Button4Click(TObject *Sender)
{
vopros++;
Vopr();
}

но проблема в том, что при компиляции выдает ошибку:

[Linker Error] Unresolved external 'TForm1::Vopros()' referenced from H:\ПРОГРАММИРОВАНИЕ\ЛАБА 2\UNIT1.OBJ

Помогите, что это и как с этим бороться? Может я неправильно в public объявляю?? Пробовал так:

Код: Выделить всё

public: void Vopr();

и так:

Код: Выделить всё

public: Vopr();

Переменная vopros - глобальная.

[BulldozerBSG]

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

Код: Выделить всё

void TForm1::Vopr()

а это в класс TForm1

Код: Выделить всё

public: void Vopr();

[Dark_anamnesis]

О спасибо большое!!! Все заработало!