![]() |
|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Пользователь
Регистрация: 14.03.2010
Сообщений: 11
|
![]()
//---------------------------------------------------------------------------
#include <vcl.h> #pragma hdrstop #include "Unit1.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TForm1 *Form1; TGroupBox *MainGB; TPageControl *p; TTabSheet *ts; int c=1; struct list { TTabSheet *t; list *next; list *prev; }*first,*curent; //--------------------------------------------------------------------------- __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- void __fastcall TForm1::N2Click(TObject *Sender) { if(!MainGB) { MainGB=new TGroupBox(this); MainGB->Left=10; MainGB->Top=10; MainGB->Width=1004; MainGB->Height=750; MainGB->Caption="Caeac ?1";//+ Form1->InsertControl(MainGB); } } //--------------------------------------------------------------------------- void __fastcall TForm1::N10Click(TObject *Sender) { if(MainGB) { if(!p) { p=new TPageControl(this); p->Top=30; p->Left=20; p->Width=984; p->Height=718; Form1->InsertControl(p); ts=new TTabSheet(this); ts->PageControl=p; ts->Caption="Eiiieaeo ?"+IntToStr(c); c++; first->t=ts; ![]() ![]() ![]() curent=first; } } } //--------------------------------------------------------------------------- Почему??? |
![]() |
![]() |
![]() |
#2 |
Пользователь
Регистрация: 06.11.2009
Сообщений: 68
|
![]()
Ооочень информативно....
Используй тег CODE |
![]() |
![]() |
![]() |
#3 |
Заблокирован
Регистрация: 02.05.2010
Сообщений: 38
|
![]()
Попробуйте дважды присвоить, может интерпретатор подзабыл?
|
![]() |
![]() |
![]() |
#4 |
Заблокирован
Регистрация: 02.05.2010
Сообщений: 24
|
![]()
у тебя ошибка в коде
|
![]() |
![]() |