Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.01.05;
Скачать: CL | DM;

Вниз

winexec( net use LPT1: las oki ,SW_hide );   Найти похожие ветки 

 
denis24   (2003-12-18 13:05) [0]

Пока это отработает данные уже будут посланы на лпт,который локальный.
Как притормозить все прогу да окончания сабжа?


 
serge   (2003-12-18 13:07) [1]

WinExec - > CreateProcess(....)


 
denis24   (2003-12-18 13:16) [2]

Да неплохо...
Но в createprocess стока параметров.
А можно пример вызова.


 
serge   (2003-12-18 13:18) [3]

Вот функция которую использовал я как-то,
может мастера посоветуют что-то лучшее


Function ExecutaSiAsteapta(LinieDeComanda: String; Vizibilitate: Integer): LongInt;
Var
zAppName: Array[0..512] Of Char;
zCurDir: Array[0..255] Of Char;
WorkDir: String;
StartupInfo: TStartupInfo;
ProcessInfo: TProcessInformation;
Begin
StrPCopy(zAppName, LinieDeComanda);
GetDir(0, WorkDir);
StrPCopy(zCurDir, WorkDir);
FillChar(StartupInfo, Sizeof(StartupInfo), #0);
StartupInfo.cb := Sizeof(StartupInfo);
StartupInfo.dwFlags := STARTF_USESHOWWINDOW;
StartupInfo.wShowWindow := Vizibilitate;
If Not CreateProcess(Nil, zAppName, Nil, Nil, false, CREATE_NEW_CONSOLE Or NORMAL_PRIORITY_CLASS,
Nil, Nil, StartupInfo, ProcessInfo) Then
Result := -1
Else
Begin
WaitforSingleObject(ProcessInfo.hProcess, INFINITE);
GetExitCodeProcess(ProcessInfo.hProcess, DWORD(Result));
CloseHandle(ProcessInfo.hProcess);
CloseHandle(ProcessInfo.hThread);
End;
End;


 
REA ©   (2003-12-18 13:19) [4]

Мне почему-то кажется, что есть аналог Net Use в API.



Страницы: 1 вся ветка

Текущий архив: 2004.01.05;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.027 c
3-11825
DiFar
2003-12-08 13:38
2004.01.05
Изменение типа поля


1-11872
ruslan_as
2003-12-15 11:51
2004.01.05
Помогите посчитать часы


1-11995
SASH2
2003-12-17 14:33
2004.01.05
VCLZip!!!


14-12046
Думкин
2003-12-11 04:42
2004.01.05
С днем рождения! 11 декабря.


14-12113
SergP
2003-12-14 18:39
2004.01.05
Срочно нужно. Помогите. Вопрос по MySQL и PHP....