|
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
TEdit *p[15][40];
int left[15]={57,186,269,320,375,430,485,539,583,627,671,715,759,803,847};
int Wid[15]={129,83,51,55,55,55,54,44,44,44,44,44,44,44,44};
for (int i = 0; i < 15; i++)
{
for(int j=0; j<40;j++)
{
p[i][j] = new TEdit(Owner);
p[i][j]->Parent = Form1;
p[i][j]->Top =81+j*21;
p[i][j]->Left = left[i];
p[i][j]->Width =Wid[i];
p[i][j]->Height = 21;
p[i][j]->Tag = (i+1) + j*15;
}
}
}
1번폼 소스는 은 위와 같고
2번폼 소스는 다음과 같습니다.
TForm2 *Form2;
//---------------------------------------------------------------------------
__fastcall TForm2::TForm2(TComponent* Owner)
: TForm(Owner)
{
TEdit *p[15][40];
int left[15]={57,186,269,320,375,430,485,539,583,627,671,715,759,803,847};
int Wid[15]={129,83,51,55,55,55,54,44,44,44,44,44,44,44,44};
for (int i = 0; i < 15; i++)
{
for(int j=0; j<40;j++)
{
p[i][j] = new TEdit(Owner);
p[i][j]->Parent = Form2;
p[i][j]->Top =81+j*21;
p[i][j]->Left = left[i];
p[i][j]->Width =Wid[i];
p[i][j]->Height = 21;
p[i][j]->Tag = (i+1) + j*15;
}
}
}
에러도 없고 이상없는거 같은데 1번폼에서는 에디트 박스가 생성되는데 2번폼은 빈폼만 나오고 에디트 박스들이 생성이 안되네요.
너무 초보라 왜 그런지 도저히 이해를 못하겠습니다.
좀 도와주세요.
|