... if CheckBox1.Checked then Edit1.Text:= s[1] else Edit1.Text:= s[3]; ...
Я не понял Вашего вопроса, но всё же Вам на него отвечу!