Здравствуйте, wallaby, Вы писали:
W>Здравствуйте, zloy_babay, Вы писали:
_>>Согласен с Вашим замечанием. Но это не устраняет самой проблемы.
W>OK, смотрим дальше. Метод DefineProperties определяется не в TMyComp, а в TTestProp
W>Поскольку не пишу на Билдере, скажу как делал бы на Delphi:
W>W>procedure TTestProp.DefineProperties(Filer: TFiler);
W>begin
W> Filer.DefineProperty('strA', ReadStrA, WriteStrA, True);
W> Filer.DefineProperty('strB', ReadStrB, WriteStrB, True);
W>end;
W>procedure TTestProp.ReadStrA(Reader: TReader);
W>begin
W> FstrA:= Reader.ReadString;
W>end;
W>
W>и т.д.
W>Кстати если строки ровно две, то и собственный редактор свойства не нужен, как и ..ListBegin и ..ListEnd
Спасибо. Именно то, что нужно.
А про строки... На самом деле в реальном случае там не две строки, а массив записей. Это я просто тестовый пример сделал, чтобы не переусложнять.
