Здравствуйте, zloy_babay, Вы писали:

_>Согласен с Вашим замечанием. Но это не устраняет самой проблемы.

OK, смотрим дальше. Метод DefineProperties определяется не в TMyComp, а в TTestProp
Поскольку не пишу на Билдере, скажу как делал бы на Delphi:

procedure TTestProp.DefineProperties(Filer: TFiler);
begin
  Filer.DefineProperty('strA', ReadStrA, WriteStrA, True);
  Filer.DefineProperty('strB', ReadStrB, WriteStrB, True);
end;

procedure TTestProp.ReadStrA(Reader: TReader);
begin
  FstrA:= Reader.ReadString;
end;

и т.д.

Кстати если строки ровно две, то и собственный редактор свойства не нужен, как и ..ListBegin и ..ListEnd