[Skeptic]

гуглил очень долго прежде чем спросить,но мозг уже понемножку закипает, поетому приходится спрашивать. итак
допустим есть Memo1 и там есть такой текст :

ferrari : megosupercar
zaporozhets : polnui_otstoi

так вот! как скопировать только часть текста megosupercar??? чтобы не зацепляло следущую строку ??

я так понимаю будет что-то вида

Код:

procedure TForm1.Button3Click(Sender: TObject); 
 var 
 copyresult : string; 

 begin 
 copyresult:=Copy(Memo1.Lines.Text, Pos(':',Memo1.Lines.Text),ВОТ_ЗДЕСЬ _ВОТ_НУЖНО_НАПИСАТЬ_ЧТО-ТО_ЧТОБЫ_СЧИТЫВАЛО_ТОЛЬКО_ДО_КОНЦА_ СТРОКИ); 
 end; 

буду оч. благодарен за совет )