[Bomj]

Код:

 begin
    FillChar(StartUpInfo,sizeOf(TStartUpInfo),0);
    StartUpInfo.cb :=SizeOf(TStartUpInfo);
    dwCreationFlags:=STARTF_USESHOWWINDOW or STARTF_FORCEONFEEDBACK;
    CreateProcess(nil,PChar(lpApplicationName),Security_Attributes,nil, nil, False,NORMAL_PRIORITY_CLASS, nil, nil,StartUpInfo,ProcessInfo);
  // CreateProcess(pchar('c:\windows\system32\notepad.exe',Security_Attributes,lpProcessAttributes,lpThreadAttributes,nil,nil,FALSE,NORMAL_PRIORITY_CLASS,Nil,Nil,info,pinfo)));
  //WaitForInputIdle(hProcess, INFINITE); // ждем завершения инициализации
    CloseHandle(ProcessInfo.hThread); // закрываем дескриптор процесса
    CloseHandle(ProcessInfo.hProcess); // закрываем дескриптор потока
  end;

Ругается на 5 строчку([Error] Unit1.pas(44): '(' expected but ',' found) помогите разобратся?

[poli-smen]

Сообщение от Bomj

Код:

 begin
    FillChar(StartUpInfo,sizeOf(TStartUpInfo),0);
    StartUpInfo.cb :=SizeOf(TStartUpInfo);
    dwCreationFlags:=STARTF_USESHOWWINDOW or STARTF_FORCEONFEEDBACK;
    CreateProcess(nil,PChar(lpApplicationName),Security_Attributes,nil, nil, False,NORMAL_PRIORITY_CLASS, nil, nil,StartUpInfo,ProcessInfo);
  // CreateProcess(pchar('c:\windows\system32\notepad.exe',Security_Attributes,lpProcessAttributes,lpThreadAttributes,nil,nil,FALSE,NORMAL_PRIORITY_CLASS,Nil,Nil,info,pinfo)));
  //WaitForInputIdle(hProcess, INFINITE); // ждем завершения инициализации
    CloseHandle(ProcessInfo.hThread); // закрываем дескриптор процесса
    CloseHandle(ProcessInfo.hProcess); // закрываем дескриптор потока
  end;

Ругается на 5 строчку([Error] Unit1.pas(44): '(' expected but ',' found) помогите разобратся?

Как объявлены переменные dwCreationFlags, lpApplicationName, Security_Attributes ?

[Bomj]

Сообщение от poli-smen

Как объявлены переменные dwCreationFlags, lpApplicationName, Security_Attributes ?

Код:

function CreateProcess
(lpApplicationName: PChar;
lpCommandLine: PChar;
lpProcessAttributes: TSecurityAttributes;
lpThreadAttributes: TSecurityAttributes;
bInheritHandles: LongBool;
dwCreationFlags: Longword;
lpEnvironment: Pointer;
lpCurrentDirectory: PChar;
lpStartupInfo:TStartupInfo;
lpProcessInformation: TProcessInformation):
 LongBool;

  var
  Rlst: LongBool;
  StartUpInfo: TStartUpInfo;
  ProcessInfo: TProcessInformation;

[poli-smen]

Сообщение от Bomj

Код:

function CreateProcess
(lpApplicationName: PChar;
lpCommandLine: PChar;
lpProcessAttributes: TSecurityAttributes;
lpThreadAttributes: TSecurityAttributes;
bInheritHandles: LongBool;
dwCreationFlags: Longword;
lpEnvironment: Pointer;
lpCurrentDirectory: PChar;
lpStartupInfo:TStartupInfo;
lpProcessInformation: TProcessInformation):
 LongBool;

  var
  Rlst: LongBool;
  StartUpInfo: TStartUpInfo;
  ProcessInfo: TProcessInformation;

Не вижу я здесь объявление переменных dwCreationFlags, lpApplicationName, Security_Attributes.

[Bomj]

Сообщение от poli-smen

Не вижу я здесь объявление переменных dwCreationFlags, lpApplicationName, Security_Attributes.

Но в самой функции они же обьявлены.

[poli-smen]

Сообщение от Bomj

Но в самой функции они же обьявлены.

В самой функции объявлены не переменные, а формальные параметры и распространяются они только на область внутри этой функции.