Команден ред в Делфи
В този кратък урок ние сега ще разгледаме в командния ред в Делфи.
Пряко предаване на команди в командния ред на операционната система Windows в Делфи помага да реализира процедурата WinExec. Като цяло, WinExec позволява достъп до всички изпълними файлове с възможност да ги прехвърли на всички параметри. Стартирането на Windows калкулатор може да се даде най-примитивен пример за използване на тази процедура:
[Cc Lang = »Delphi»] WinExec (PAnsiChar ( "calc.exe"), SW_SHOWNORMAL); [/ см]
Помислете за опциите, които искате да прехвърлите WinExec:
- Заповедта да бъде изпълнена. Т.е. тук можем да уточни, например, всеки файл, който искате да изпълните. Видът на този параметър - PAnsiChar и редове, съответно, могат да бъдат прехвърлени само до тях водещ PAnsiChar тип.
- Параметър, характеризиращ метода за показване на отварящи се прозорци. Ако посочите SW_SHOWNORMAL. тя се отваря прозорец, ще се показва по подразбиране, но ако посоча SW_HIDE. прозорецът е скрит, той е удобен за използване при достъп до командния ред, както показва, че за част от секундата няма смисъл.
Сега ние се научите как да получите достъп до командния ред при използване на процедурата WinExec. Помислете за един прост пример:
[Cc Lang = »Delphi»] WinExec (PAnsiChar ( "CMD / в р е: \ т), SW_HIDE); [/ см]
Както можете да видите, сме обособили SW_HIDE, така че да не се покаже прозорец на конзолата. Да се обърне внимание на формирането на екипа.
- На първо място, посочено от нас «CMD», което подсказва, че ще стартирате команден ред.
- После уточни «/ C», за да може, след изпълнение на командата, нашият команден ред е затворен.
- Е, и тогава там е самата операция за команден ред - «MD е: \ т». Тази команда създава папка «т» диск «F: \» в.
За да изпълните няколко команди в последователност, можете да използвате символа "# 038", в която можем да споделим няколко различни команди изпълняват последователно.
[Cc Lang = »Delphi»] WinExec (PAnsiChar ( "CMD / в р е: \ т # 038; р е: \ t1), SW_HIDE); [/ см]
Малък пример DPR Delphi компилира изходния файл чрез командния ред:
[Cc Lang = »Delphi»] процедура CompileDelphiCode (име: низ);
Var
C: ansistring;
започвам
в: = "CMD / в dcc32 -b -q -Н--W-« '+ име +' » ';
WinExec (PAnsiChar (в), SW_Hide);
приключи;
процедура TForm2.Button1Click (Sender: TObject);
започвам
CompileDelphiCode ( "F: \ t.dpr ');
край [/ см]
Тази процедура е необходимо да се премине един единствен параметър - абсолютен или относителен път към първоначалната DPR файла. В резултат на това, компилаторът ще стартира Delphi «dcc32», който ще компилира сорс код в папката с определения DPR файла. Ако имате проблем с факта, че в командния ред не знае какво dcc32, след това въведете dcc32 вместо самият път на компилатора, който е в папката с вашия Delphi среда в папката бин нарича «dcc32.exe».