Ошибка Constant object cannot be passed as var parameter

[nusik]

Здравствуйте.
Выскакивает ошибка Constant object cannot be passed as var parameter.
Необходимо создать переменную и через неё работать.
Есть ли другой вариант?
Спасибо.

[Utkin]

Приведите фрагмент кода на которую ругается Делфи. Чем Вам не нравится дополнительная промежуточная переменная?

[nusik]

Вот фрагмент:

Delete(RichEdit1.Hint,1,1);

[Kotofff]

Hint хоть и имеет тип string, но не поддается прямому редактированию.

[nusik]

например когда я в своей процедуре в качестве параметра пишу

var s:string

; тогда тоже может возникунуть ошибка, а если ,без вар то всё хорошо.

[Stilet]

например когда я в своей процедуре в качестве параметра пишу

Код в студию.
А с методами и свойствами так поступать негоже, ибо Hint это фактически процедура а не простая переменка.

[Terran]

Чтобы не было ошибки сделайте так:

Procedure TForm1.Button1Click(Sender: TObject);
Var
S: String;
Begin
S:=RichEdit1.Hint;
Delete(S,1,1);
RichEdit1.Hint:=S;
End;

А прямое изменение не прокатит. И не только с RichEdit.

[Utkin]

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