Как получить доступ к первому символу строки

@New_Neznayka · Регистрация: 29.10.2009

Студворк — интернет-сервис помощи студентам

дано: Edit1.Text
хочу первый сивол заменить на другой делаю так:

Delphi

1	Edit1.Text[1]:='g';

в чём ошибка ?

@Littlelol · 11.01.2010, 21:43

дельфи щас под рукой нету, могу предположить что нужно через строковую переменную менять

Delphi

1
2
3

s:=edit1.text;
s[1]:='g';
edit1.text:=s;

@Ztrel · 11.01.2010, 21:48

s:=copy(form1.edit1.text,<номер символа с которого копируем>,<номер До какого копируем>);

Предлагаю скопировать первый символ, потом все остальные. Первый изменить, а потом уже всю строчку писать...

Ну например:

Delphi

s:=copy(form1.edit1.text,1,2);
s1:=copy(form1.edit1.text,2,18);
s:= 'g';
Form1.Edit1.Text:= s + s1;

@New_Neznayka · 11.01.2010, 22:26 **[ТС]**

Спасибо

@Somebody · 12.01.2010, 00:10

Если разобраться, в TControl:

Delphi

1	property Text: TCaption read GetText write SetText;

То есть Edit1.Text[1] - это как бы получается (не считая того, что GetText - private) Edit1.GetText()[1], поэтому и ошибка.

@New_Neznayka 57 / 20 / 3 Регистрация: 29.10.2009 Сообщений: 198
	11.01.2010, 22:26 [ТС]	4
	Спасибо 0

Опции темы