Разбираемся с проблемами записи в свойства записей в Delphi: почему возникает ошибка "Left side cannot be assigned to"

Delphi , Синтаксис , Записи и Множества

В статье разберемся, почему при попытке присвоения значений членам свойств записей в Delphi возникает ошибка "Left side cannot be assigned to". Для примера возьмем следующий код:

TRec = record
  A : integer;
  B : string;
end;

TForm1 = class(TForm)
private
  FRec : TRec;
public
  procedure DoSomething(ARec: TRec);
  property Rec : TRec read FRec write FRec;
end;

При попытке присвоения значения члену свойства Rec, например, в методе DoSomething, возникает ошибка:

procedure TForm1.DoSomething(ARec: TRec);
begin
  Rec.A := ARec.A; // Ошибка "Left side cannot be assigned to"
end;

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

Однако, если присвоить значение непосредственно полю FRec, то ошибка не возникает:

procedure TForm1.DoSomething(ARec: TRec);
begin
  FRec.A := ARec.A; // Присвоение проходит успешно
end;

Для решения этой проблемы можно использовать несколько подходов. Один из них — разделить поля записи на отдельные свойства класса:

property RecFieldA: Integer read FRec.A write FRec.A;
property RecFieldB: string read FRec.B write FRec.B;

Также можно использовать конструкцию with:

procedure TForm1.DoSomething(ARec: TRec);
begin
  with Rec do
    A := ARec.A; // Присвоение проходит успешно
end;

Или же преобразовать запись в объект, что позволит работать с указателями:

type
  PRec = ^TRec;

property Rec : PRec read FRec; // write часть не нужна, если не планируется изменять сам указатель

constructor TForm1.Create;
begin
  inherited;
  FRec := AllocMem(sizeof(TRec));
end;

destructor TForm1.Destroy;
begin
  FreeMem(FRec);
  inherited;
end;

В этом случае присвоение значений полям записи будет выполнено без ошибок:

Form1.Rec.A := 1234; // Присвоение проходит успешно

Важно отметить, что при использовании свойств с записями следует помнить о том, что они возвращают копию данных, и если требуется изменять значения в записи, лучше использовать другие подходы, например, отдельные методы для работы со значением записи.

Эта статья предназначена для программистов, работающих с Delphi и Object Pascal, и призвана помочь им избежать типичных ошибок при работе со свойствами записей.

Создано по материалам из источника по ссылке.

В статье рассматривается проблема присвоения значений членам свойств записей в Delphi из-за того, что свойство создаёт временную копию, доступную только для чтения.

Комментарии и вопросы

Получайте свежие новости и обновления по Object Pascal, Delphi и Lazarus прямо в свой смартфон. Подпишитесь на наш Telegram-канал delphi_kansoftware и будьте в курсе последних тенденций в разработке под Linux, Windows, Android и iOS

:: Главная :: Записи и Множества ::