also bei mir geht das so auch
Delphi-Quellcode:
procedure TForm1.Senden;
var Send: string;
begin
Send := 'send ' + User.Text + ' ' + Nachricht.Text;
ShellExecute(GetDesktopWindow, 'open', 'net.exe', PChar(Send), nil, SW_HIDE);
end;
Wo bei "User" ein Edit ist, in dem der Empfänger steht (angemeldeter User oder Computername)
und "Nachricht" ein Memo ist, in dem die nachricht steht