Доступ к Published свойствам

newstep

Срипт:

{
mySignal = new TSignal(NULL);
mySignal->Length = 4096;
}

На второй строчке ошибка компиляции "';' expected"

Класс TSignal определен как:

class PASCALIMPLEMENTATION TSignal : public TAnalysis
{
typedef TAnalysis inherited;
...
__published:
...
__property int Length = {read=FLength, write=setLength, default=128};
...
};