Uh. Bitte zu jeder Frage einen eigenen Thread aufmachen!
Deshalb beantworte ich auch nur die erste
Delphi-Quellcode:
procedure TForm1.btnClick(Sender: TObject);
begin
if memSend.Text = '' then
exit; // raussrpingen wenn memo leer...
// hier Dein code
end;