![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
net send [D5]
A.Perez © (2002-11-11 22:03:00)как сделатьь так чтоб команда "net send" работала из дельфовского приложения, короче можно ли досовские команды прикрутить к форме
MadSliMX (2002-12-03 15:49:00) [1]На
var
s: string;{кому}
a: string;{текст}
begin
a:=edit1.text;
s:=edit2.text;
winexec(pchar("net send"+s+a),sw_restore);
end;
PS:у меня работает...
Геннадий (2002-11-13 21:30:00) [2]А нельзя WinExec("net send ...") ?
teufel (2002-11-13 12:36:00) [3]Можно и даже не очень сложно...................
если интересует как пиши
perez (2002-11-13 11:40:00) [4]ну вы меня поняли
Malder (2002-11-12 21:16:00) [5]короче можно ли досовские команды прикрутить к форме
Нда-а-а-а-а...
этот перл достоин упоминания и уважения
Ketmar (2002-11-12 10:27:00) [6]а с каких это пор "net" стала досовской?! CreateProcess.
Satanas Nobiscum! 12-Nov-XXXVII A.S.