Einzelnen Beitrag anzeigen

Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#3
  Alt 27. Mär 2003, 07:58
Entweder mit Shellexecute oder richtig mit NetMessageBufferSend.
Mit Shellexecute sollte es so gehe:
Delphi-Quellcode:
var
  sReceiver, sMessage, s : String;
begin
  sReceiver := Edit1.Text;
  sMessage := Edit2.Text;
  s := 'send'+sReceiver+' '+sMessage;
  Shellexecute(Form1.Handle, 'open', 'net', pointer(s), nil, SW_HIDE);
Ungetestet, der Forum eigene Debugger geht mal wieder nicht. DANIIIIEEEEELLLLLL!!!!
Ich würde aber NetMessageBufferSend vorziehen, da du dann eine bessere Kontrolle hast, wenn Fehler auftreten. Ankucken kannst du dir das in meinem Programm NetSend zu finden auf meiner Seite - ist mit Soße.
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat