Net Send

← →
Ardor (2002-11-28 17:42) [0]

Интересует вопрос, как вызвать Net Send из приложения Delphi? Может кто сталкивался с этим ?

← →
Pa$cal (2002-11-28 18:45) [1]

Я делаю так
procedure TForm1.Button2Click(Sender: TObject); var str : string; begin str:="send "+ Edit1.Text + " " + Edit2.Text; ShellExecute(handle, nil, "net", PChar(str), nil, SW_HIDE); end;
где в edit1 - кому, в edit2 - что.
Можно ещё через WinExec или CreateProcess.
Кстати, встречный вопрос. Как ловить консольный вывод этого нетсенда? Он не всегда может послать. Хорошо бы это проанализировать.

← →
Eugen Honeker (2002-11-28 19:01) [2]

смотри help по NetMessageBufferSend

← →
Ardor (2002-11-28 19:23) [3]

Понимаешь, я этим нетсендом ни разу не пользовался. Вот решил поэкспериментировать :) Что еще прописать надо, чтобы ошибки не было : Undeclared identifier: "ShellExecute" ?

← →
asmith (2002-11-28 19:34) [4]

uses
ShellAPi;
однако

← →
Ardor (2002-11-28 20:04) [5]

Спасибо всем огромное, работает !!!

Net Send Найти похожие ветки