Memo1.SetFocus;

Memo1.SelStart  := 0;

Memo1.SelLength :=Length(AnsiString(Memo1.Lines.Strings[0]+Memo1.Lines.Strings[1]+Memo1.Lines.Strings[2]));