EmailAddressen aus Datenbank auslesen und Outlook öffnen

[Matzespens]

Hallo Leute,

ich habe eine Mybase Kunden-Datenbank geschrieben in der ich auch die EmailAddressen verwalte. Nun habe ich einen Button über den ich an alle ausgwählten Kunden eine Email senden kann.
Bei Multiselect funktioniert das auch da ich beim String eine ' ; ' dazu gefügt habe, aber wenn ich nur an einen eine Email senden möchte bekomme ich von Outlook die Fehlermeldung Email Addresse des Absenders nicht akzeptiert. So sieht mein Quelltext aus:

Delphi-Quellcode:

procedure Tgould.btnemailClick(Sender: TObject);
var
i: Integer;
  s: string;
begin
 Listbox1.Clear;

  if kundengrid.SelectedRows.Count > 0 then begin

    with kundengrid.DataSource.DataSet do begin

      for i:=0 to kundengrid.SelectedRows.Count-1 do begin

        GotoBookmark(pointer(kundengrid.SelectedRows.Items[i]));

        Listbox1.Items.Add(Fieldbyname('EMail').AsString);

        S := S + Fieldbyname('EMail').AsString + ';' ;

      end;

    end;

   if S <> '' then   ShellExecute(GetDesktopWindow(), 'open', PChar('mailto:' + S), nil, nil, SW_SHOWNA);

end;
end;

Ach so wie mache ich das eigentlich wenn einer kein Outlook hat sondern zB die T-Online Software?? - Gibt es da eine spezielle Anweisung oder muss ich dann einfach die exe von der T-Online aufrufen.

Schon mal Danke für Eure Hilfe!!!

Gruß

Matze