Вывести слово со сдвигом вправо

[StudentMarat]

Дано слово в отдельном окне (edit1), например, "студент". Как можно сделать так, чтобы при нажатии на кнопку в отдельном окне (edit2) выводилось ответное слово со сдвигом вправо на 3 пункта. Т.е. в итоге получилось бы такое слово "дентсту"

[Sciv]

edit2.text:=Copy(Edit1.Text,4,length(Edit1.Text)-3)+Copy(Edit1.Text,1,3);

[Mad_Cat]

s:=edit1.text;
k:=3;
s:=s+copy(s,1,k);
delete(s,1,k);
edit2.text:=s;

[Serge_Bliznykov]

Mad_Cat, а чем Ваш код лучше предложенного выше Sciv варианта ?!
из недостатков вашего кода это:
во-первых, используется Delete (достаточно медленная и ресурсоёмкая операция), во-вторых, дополнительная переменная...
преимуществ я не увидел...
Или просто решили показать альтернативый вариант решения проблемы?

[Mad_Cat]

Mad_Cat, а чем Ваш код лучше предложенного выше Sciv варианта ?!

Я не собираюсь ничем и ни с кем меряться
пост писался
1) Альтернатива
2) универсальность
и Выбирать все-таки ТС-у
тот который понравится тот и возьмет
Ну а про ресурсоемкость на компах с 2 ядрами и 2ГБ оперативы минимум я бы уже вообще не упоминал!