PHP DM Gate v0.9 » Не компилируется проект MCK <span class="vd">[Delphi, Windows]</span>

Владимир Мефисто (26.11.12 22:47) [0]

Проблема в следующем:
Имеется проект KOL-MCK, который до определенного времени компилировался как надо, но теперь автоматически при билде портится самое начало .pas файла.
Что было:
{ KOL MCK }// Do not remove this line!
{$DEFINE KOL_MCK}
unit uMain;

interface

{$IFDEF KOL_MCK}
uses Windows, Messages, KOL{$IF Defined(KOL_MCK)}{$ELSE}, mirror, Classes,
Controls, mckCtrls, mckObjs, Graphics{$IFEND (place your units here->)},
uCompression, dglOpenGL, pngImage;
{$ELSE}
{$I uses.inc}
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
{$ENDIF}

type
{$IF Defined(KOL_MCK)}
{$I MCKfakeClasses.inc}
{$IFDEF KOLCLASSES}{$I TForm1class.inc}{$ELSE OBJECTS}PForm1 = ^TForm1;
{$ENDIF CLASSES/OBJECTS}
{$IFDEF KOLCLASSES}{$I TForm1.inc}{$ELSE}TForm1 = object(TObj){$ENDIF}
Form: PControl;
{$ELSE not_KOL_MCK}
TForm1 = class(TForm)
{$IFEND KOL_MCK}
KOLproj1: TKOLProject;

Что стало:
{ KOL MCK }// Do not remove this line!
{$DEFINE KOL_MCK}
unit uMain;

interface

{$IFDEF KOL_MCK}
uses Windows, Messages, KOL{$IF Defined(KOL_MCK)}{$ELSE}, mirror, Classes,
Controls, mckCtrls, mckObjs, Graphics{$IFEND (place your units here->)},
uCompression, dglOpenGL, pngImage;
{$ELSE}
{$I uses.inc}
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
{$ENDIF}

type
{$IF Defined(KOL_MCK)}
{$I MCKfakeClasses.inc}
{$IFDEF KOLCLASSES} {$I TForm1class.inc} {$ELSE OBJECTS} PForm1 = ^TForm1; {$ENDIF CLASSES/OBJECTS}
{$IFDEF KOLCLASSES}{$I TForm1.inc}{$ELSE} TForm1 = object(TObj) {$ENDIF}
{$IFDEF KOLCLASSES}{$I TForm1.inc}{$ELSE}TForm1 = object(TObj){$ENDIF}
Form: PControl;
TForm1 = class(TForm)
{$IFEND KOL_MCK}
TForm1 = class(TForm)
{$IFEND KOL_MCK}
KOLproj1: TKOLProject;

Такое у меня и раньше было, но как-то потом исчезало, а сейчас не знаю что и делать.

<Цитата>
RusSun © (27.11.12 03:25) [1]

то есть строка
{$IFDEF KOLCLASSES}{$I TForm1.inc}{$ELSE} TForm1 = object(TObj) {$ENDIF}

во втором случае дублируется?

<Цитата>
Владимир Мефисто (27.11.12 11:45) [2]

Да, но не совсем. Там еще и меняется немного вроде.

<Цитата>
Владимир Мефисто (30.11.12 23:37) [3]

И что, на этом все? Неужели эта проблема неисправляемая?

<Цитата>
RusSun © (01.12.12 07:47) [4]

Нет, конечно:

- Нужен сам проект или его часть что даёт ошибку. ("Чтобы выявить ошибку")
- Какая Delphi 5,6,7,10 ...?
- Надо проверить проект на другой машине с delphi (KOL MCK).
- Снести все и поставить (установить) заново.
И снова проверить.

Вот тогда и будет все.

<Цитата>
QAZ9 (04.12.12 18:10) [5]

это бывает после обновления KOL , меняются дефины на новый вариант
надо просто старые поправить вручную и все будет норм, у меня факала мозг связка {$IF Defined(KOL_MCK)} и {$IFDEF KOL_MCK}, по факту одно и тоже, но по КОЛу неочень

<Цитата>
Владимир Мефисто (10.12.12 20:53) [6]

ДА, благодарствую!) Это действительно помогло!

<Цитата>