Banalne pytanie o klasy. - THX TrOuBLE

6!
Na Formie mam Buttona i oprogramowane do niego zdarzenie OnClick oraz mam wlasna klase TVodek:

DEKLARACJA KLASY:

class TVodek
{
public:
void __fastcall Procedurka();
private:
};

KODZIK:
void __fastcall TForm1::Button2Click(TObject *Sender)
{
TVodek::Procedurka;
}
//---------------------------------------------------------------------------
void __fastcall TVodek::Procedurka()
{
ShowMessage("W");
}

I jak naciskam Buttona to zamiast wywolac funkcje Procedurka a co za tym idzie wiadomsoc o tresci "W" to po kliknieciu na buttona nic sie nie dzieje. Dlaczego?

sproobuj tak :
class TVodek
{
public:
<font color="green">static</span> void __fastcall Procedurka();
private:
};

aha , i tutaj :
TVodek::Procedurka<font color="green">()</span>;
nawiasów brakowało .

spróbuj tak w onclick:

TVodek Klasa;

Klasa.Procedurka();