[Zimir]

Поставил 2 Edit-a
Button1 в Onclick закинул : Edit1.Text := Copy(Edit2.Text,1,3);

вот что происходит :
с 1 Edit-a исчезает текст а 2 Edit так и остается пустой (