Hi ich hab hier ein net send Schleifen - Programm geschrieben
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var a, b: integer;
c, d : string;
begin
b:= strtoint (edit1.text);
a := 0 ;
c:= edit2.text ;
d := edit3.text;
repeat a := a + 1 ;
begin
windows.WinExec(pchar('net send ' + (d) + (c)),1);
end;
until a = b;
end;
variable a ist für die Schleife
b ist die Begrenzung der Schleife
c der Text, der mit net send gesendet wird
und d SOLLTE die
IP Eingabe sein - das funktioniert aber nicht so wie ich wollte....ShellExec geht bei mir nicht (Delphi 6) also bitte nich sowas anbieten....
Kann mir Jemand helfen????
Schnelle Antwort wäre gut...
Danke