
31.01.2013, 23:45
|
 |
.
|
|
Регистрация: 18.05.2011
Адрес: Омск
Сообщения: 3,970
Версия Delphi: 3,5,7,10,12,XE2
Репутация: выкл
|
|
Это не сдвиг, а перестановка символов.
Код:
Edit2.Text := Copy(Edit1.Text, 4, Length(Edit1.Text) + Copy(Edit1.Text, 1, 3;
__________________
Je venus de nulle part
55.026263 с.ш., 73.397636 в.д.
|