Передача указателя типа TObject в качестве параметра
Подскажите пожалуйста как правильно передать указатель в качестве параметра на объект типа TObject. Пример:
class TMyClass
{
...
void GetSender (TObject *Sender);
...
};
void GetSender (TObject *Sender)
{
if (Sender->ClassNameIs ("TfrmMain")==true)
ShowMessage ("Sender if TfrmMain");
}
...
TfrmMain *frmMain;
//---------------------------------
void __fastcall TfrmMain::Button1Click(TObject *Sender)
{
TMyClass * MyClass = new TMyClass ();
MyClass->GetSender (Sender);
}
//---------------------------------
Вылетает ошибка Linker Error: Unresolved External ... referenced from ...
Как забороть?
Цитата:
Originally posted by McSim
Привет!
Подскажите пожалуйста как правильно передать указатель в качестве параметра на объект типа TObject. Пример:
class TMyClass
{
...
void GetSender (TObject *Sender);
...
};
void GetSender (TObject *Sender)
{
if (Sender->ClassNameIs ("TfrmMain")==true)
ShowMessage ("Sender if TfrmMain");
}
...
TfrmMain *frmMain;
//---------------------------------
void __fastcall TfrmMain::Button1Click(TObject *Sender)
{
TMyClass * MyClass = new TMyClass ();
MyClass->GetSender (Sender);
}
//---------------------------------
Вылетает ошибка Linker Error: Unresolved External ... referenced from ...
Как забороть?
Привет!
Подскажите пожалуйста как правильно передать указатель в качестве параметра на объект типа TObject. Пример:
class TMyClass
{
...
void GetSender (TObject *Sender);
...
};
void GetSender (TObject *Sender)
{
if (Sender->ClassNameIs ("TfrmMain")==true)
ShowMessage ("Sender if TfrmMain");
}
...
TfrmMain *frmMain;
//---------------------------------
void __fastcall TfrmMain::Button1Click(TObject *Sender)
{
TMyClass * MyClass = new TMyClass ();
MyClass->GetSender (Sender);
}
//---------------------------------
Вылетает ошибка Linker Error: Unresolved External ... referenced from ...
Как забороть?
TObject тут ни при чем
там где ты описываешь тело фунцкции GetSender, не указано что она принадлежит классу TMyClass, поэтому когда ты пытаешься вызвать ее как член класса, естественно ее нет.
Надо написать
void TMyClass::GetSender (TObject *Sender)
{
.....
}
Цитата:
Originally posted by _kolyan
TObject тут ни при чем
там где ты описываешь тело фунцкции GetSender, не указано что она принадлежит классу TMyClass, поэтому когда ты пытаешься вызвать ее как член класса, естественно ее нет.
Надо написать
void TMyClass::GetSender (TObject *Sender)
{
.....
}
TObject тут ни при чем
там где ты описываешь тело фунцкции GetSender, не указано что она принадлежит классу TMyClass, поэтому когда ты пытаешься вызвать ее как член класса, естественно ее нет.
Надо написать
void TMyClass::GetSender (TObject *Sender)
{
.....
}
Во блин! Точно! Ослеп с утра. :-)
Единственная функция где не прописал к какому классу она относится.
_kolyan - Спасибо. :-)