Partir Memo en diferentes strings y enviarlas en un TIdIRC

[__cadetill]

Hola Darkie

Si forzosamente has de enviar linea a linea, si te fijas, el componente TMemo, tiene la propiedad Lines la cual es un TStrings

Al ser un TStrings puedes, o bien recuperar todo su contenido mediante la propiedad Text (que seguramente ya te valdría -> Memo1.Lines.Text) o bien con un bucle ir recuperando linea a linea

Código Delphi [-]
for i := 0 to Memo1.Lines.Count - 1 do
  IdIRC1.Say(Canal, Memo1.Lines[i]);

Espero que te sirva