White Wolf,

да, такая проблема есть.
спасаются многократным нажатием на ESC
В Code Insight отключите верхние две галочки.


Posted via ActualForum NNTP Server 1.3

White Wolf,
>и почему этот проект начали писать не на дельфи?

чтобы не заморачивать мозги на мало перспективный язык.


Posted via ActualForum NNTP Server 1.3

_avz,

>Ладно, я не сторонник религиозных споров по этому поводу, не буду
превозносить дельфи в ветке по >C++ (где я к тому же совсем редкий гость)...

скажу тебе по секрету, что билдер специально сделали тормозным(ну типа
вставили в компилятор флажек).
это сделали специально, чтобы студенты не падали на С++ сразу а научились
вначале программировать.

Ну а если тормоз билдера убрать то индустрия Дельфи обрушиться, поэтому
сделали так:
Кто научился писать - переползает на билдер,
кто не дорос доучиваются на дельфи.
Ну а когда умееш писать, то почти с первого разу пишеш, идеш куриш,
приходиш и проект готов.
Скажу так - на билдере нада уметь собирать проекты а не писать их.

Чтобы убедиться что билдер может быстрее компилировать, попробуй поставь
патч
http://andy.jgknet.de/cpp/




Posted via ActualForum NNTP Server 1.3

"_avz"
>А как ты создашь в билдере объект класса через метакласс?

TForm *a_Form = NULL;
Application->CreateForm(FindClass("Имя метакласса"), &a_Form);


Posted via ActualForum NNTP Server 1.3

_avz,
>А как такое перевести?

Борланд приложила все усилия для того чтобы простые вещи было легко писать
на Дельфи, но трудно на Билдере, думаю прямого решения создания класса из
метакласса в VCL для С++ просто не существует. Однако благодаря природной
гибкости С++ думаю это всетаки можно это реализовать.
А стандартная библиотека доступна из Билдера, чего нельзя сказать про
Дельфи.

#include <alloc.h>
class TMyBaseClass : public TObject
{
public:
void __fastcall ShowClassName(){ShowMessage(ClassName());};
};
class TMyDerivedClass1 : public TMyBaseClass
{
};
class TMyDerivedClassN : public TMyBaseClass
{
};
//--------------------------------------------------------------------------
----
const TClass ClassTable[2] = {__classid(TMyDerivedClass1),
__classid(TMyDerivedClassN)};
//--------------------------------------------------------------------------
----
TObject * __fastcall CreateInstance(TClass p_Class)
{
TObject *a_Obj = TObject::InitInstance(p_Class,
malloc(sizeof(p_Class->InstanceSize())));
}
//--------------------------------------------------------------------------
----
TMyBaseClass * __fastcall CreateMyClass(int p_ClassNumber)
{
TMyBaseClass *a_MyBaseObj = dynamic_cast<TMyBaseClass *>(
CreateInstance(ClassTable[p_ClassNumber]));
if(!a_MyBaseObj) throw Exception("Instance creation error!");
return a_MyBaseObj;
}
//--------------------------------------------------------------------------
----

Используем:
TMyBaseClass *a_Inst = CreateMyClass(0);
a_Inst->ShowClassName();

Пусть коллеги поправят меня где я не прав.


Posted via ActualForum NNTP Server 1.3