edit1.Text:= memo1.lines[0]; edit2.Text:= memo1.lines[1]; edit3.Text:= memo1.lines[2]; edit4.Text:= memo1.lines[3];