Здравствуйте господа пограммеры. Помогите плиз разораться в след деле. Создаю компонент (см. ниже) но компилятор ругается на
строчку
//l_name->Parent=this; В чем дело?
//---------------------------------------------------------------------------
#include
#pragma hdrstop
#include "ResARINCLabel.h"
#pragma package(smart_init)
//---------------------------------------------------------------------------
// ValidCtrCheck is used to assure that the components created do not have
// any pure virtual functions.
//
static inline void ValidCtrCheck(TResARINCLabel *)
{
new TResARINCLabel(NULL);
}
//---------------------------------------------------------------------------
__fastcall TResARINCLabel::TResARINCLabel(TComponent* Owner)
: TControl(Owner)
{
l_name = new TLabel(this);
//l_name->Parent=this; // на эту строчку идет ругань
l_name->WordWrap = true;
l_name->Font->Size = 8;
l_name->Font->Color = clMaroon;
l_name->Caption = "название переменной";
}
//---------------------------------------------------------------------------
namespace Resarinclabel
{
void __fastcall PACKAGE Register()
{
TComponentClass classes[1] = {__classid(TResARINCLabel)};
RegisterComponents("ARINC", classes, 0);
}
}
//---------------------------------------------------------------------------
#define ResARINCLabelH
//---------------------------------------------------------------------------
#include
#include
#include
//---------------------------------------------------------------------------
class PACKAGE TResARINCLabel : public TControl
{
private:
TLabel *l_name;
TLabel *l_number;
TLabel *l_dimension;
protected:
public:
__fastcall TResARINCLabel(TComponent* Owner);
__published:
};
//---------------------------------------------------------------------------
#endif