net send

[danku]

hi. mir ist schon klar das der windows nachrichtendienst net send nach folgenden prinzip funktioniert:
net send Computername Nachricht
oder
net send IP-Adresse Nachricht

in delphi habe ich es über die shellexecute probiert:

Delphi-Quellcode:

for i:= 0 to memo1.lines.count do
ShellExecute(Application.Handle,'open',PChar('/C NET SEND ' + edit7.text + ' ' + memo1.Lines.strings[i]),nil,SW_HIDE);

Nun meckert der compiler bei integer und PAnsichar herum.
warum?

[KrasserChecker]

Indices unter Pascal sind null-basierend, daher statt

Delphi-Quellcode:

for i:= 0 to memo1.lines.count do

einfach mal

Delphi-Quellcode:

for i:= 0 to memo1.lines.count - 1 do

ausprobieren :wall:

[Muetze1]

Vor allem: Wieso über die Kommandozeile? Warum nicht einfach die Funktion der WinAPI direkt nutzen? Beispielprojekt