Initial
Исходный код версии 2.0
This commit is contained in:
50
docs/3rdpartytechnologies.html
Normal file
50
docs/3rdpartytechnologies.html
Normal file
@@ -0,0 +1,50 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<html>
|
||||||
|
<head>
|
||||||
|
<meta http-equiv="content-type" content="text/html; charset=UTF-8" />
|
||||||
|
<title>Используемые технологии проектом CD Ejecter</title>
|
||||||
|
</head>
|
||||||
|
<body>
|
||||||
|
<h1 align="center">CD Ejecter</h1>
|
||||||
|
<br>
|
||||||
|
<h1 align="center">Проект использует следующие технологии:</h1>
|
||||||
|
<br>
|
||||||
|
<h2>Icons Sets:</h2>
|
||||||
|
<p><strong>Fugue Icons, Diagona Icons</strong></p>
|
||||||
|
<p>от <strong>Yusuke Kamiyamane</strong>.</p>
|
||||||
|
<p>Лицензия: <strong>Creative Commons Attribution 3.0</strong>.</p>
|
||||||
|
<p>Все права защащены.</p>
|
||||||
|
<p>Web-страница: <a href="http://p.yusukekamiyamane.com/">http://p.yusukekamiyamane.com/</a></p>
|
||||||
|
<br>
|
||||||
|
<p><strong>Silk Icons</strong></p>
|
||||||
|
<p>от <strong>Mark James</strong>.</p>
|
||||||
|
<p>Лицензия: <strong>Creative Commons Attribution 2.5.</strong>.</p>
|
||||||
|
<p>Все права защащены.</p>
|
||||||
|
<p>Web-страница: <a href="http://www.famfamfam.com/lab/icons/silk/">http://www.famfamfam.com/lab/icons/silk/</a></p>
|
||||||
|
<br>
|
||||||
|
<p><strong>glyFX Image Library</strong></p>
|
||||||
|
<p>от <strong>PerthWeb Pty Ltd</strong>.</p>
|
||||||
|
<p>Лицензия: <strong>free for non-commercial use</strong>.</p>
|
||||||
|
<p>Все права защащены.</p>
|
||||||
|
<p>Web-страница: <a href="http://www.glyfx.com/">http://www.glyfx.com/</a></p>
|
||||||
|
<br>
|
||||||
|
<p><strong>GNOME icon theme</strong></p>
|
||||||
|
<p>от <strong>Ulisse Perusin, Riccardo Buzzotta, Josef Vybíral, Hylke Bons, Ricardo González, Lapo Calamandrei, Rodney Dawes, Luca Ferretti, Tuomas Kuosmanen, Andreas Nilsson, Jakub Steiner</strong>.</p>
|
||||||
|
<p>Лицензия: <strong>GNU LGPL v.3 or Creative Commons BY-SA 3.0 license</strong>.</p>
|
||||||
|
<p>Все права защащены.</p>
|
||||||
|
<p>Web-страница: <a href="http://ftp.gnome.org/pub/GNOME/sources/gnome-icon-theme/3.6/">http://ftp.gnome.org/pub/GNOME/sources/gnome-icon-theme/3.6/</a></p>
|
||||||
|
<br>
|
||||||
|
<p><strong>TANGO icon theme</strong></p>
|
||||||
|
<p>от <strong>Ulisse Perusin, Steven Garrity, Lapo Calamandrei, Ryan Collier, Rodney Dawes, Andreas Nilsson, Tuomas Kuosmanen, Garrett LeSage, Jakub Steiner</strong>.</p>
|
||||||
|
<p>Лицензия: <strong>Public Domain</strong>.</p>
|
||||||
|
<p>Все права защащены.</p>
|
||||||
|
<p>Web-страница: <a href="http://tango.freedesktop.org/Tango_Icon_Library">http://tango.freedesktop.org/Tango_Icon_Library</a></p>
|
||||||
|
<br />
|
||||||
|
<p><strong>Free FatCow-Farm Fresh Icons</strong></p>
|
||||||
|
<p>от <strong>FatCow Web Hosting</strong>.</p>
|
||||||
|
<p>Лицензия: <strong>Creative Commons Attribution 3.0 License</strong>.</p>
|
||||||
|
<p>Все права защащены.</p>
|
||||||
|
<p>Web-страница: <a href="http://www.fatcow.com/free-icons">http://www.fatcow.com/free-icons</a></p>
|
||||||
|
<br>
|
||||||
|
</body>
|
||||||
|
</html>
|
||||||
BIN
docs/Manuals.dotx
Normal file
BIN
docs/Manuals.dotx
Normal file
Binary file not shown.
BIN
docs/english_usa.docx
Normal file
BIN
docs/english_usa.docx
Normal file
Binary file not shown.
41
docs/license.html
Normal file
41
docs/license.html
Normal file
@@ -0,0 +1,41 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
|
||||||
|
<html xmlns="http://www.w3.org/1999/xhtml">
|
||||||
|
<head>
|
||||||
|
<meta http-equiv="content-type" content="text/html; charset=UTF-8" />
|
||||||
|
<title>Лицензионное соглашение на CD Ejecter</title>
|
||||||
|
<meta name="generator" content="Amaya, see http://www.w3.org/Amaya/" />
|
||||||
|
</head>
|
||||||
|
<body>
|
||||||
|
<h1 style="text-align:center;margin-left:auto;margin-right:auto;">ЛИЦЕНЗИОННОЕСОГЛАШЕНИЕ С КОНЕЧНЫМ ПОЛЬЗОВАТЕЛЕМ (EULA) НА CD EJECTER.</h1>
|
||||||
|
<p style="text-align:center;margin-left:auto;margin-right:auto;"><em>(Версия 2.0)</em></p>
|
||||||
|
<br>
|
||||||
|
<h2><strong>ОПРЕДЕЛЕНИЯ</strong></h2>
|
||||||
|
<p><em>CD Ejecter</em> (далее "продукт") - программа и/или компонент программы и/или другое (игра, изображение, фильм и т.п.), на которое распространяется данное соглашение.</p>
|
||||||
|
<p><em>Конечный пользователь</em> (далее "<em>вы</em>" или "<em>пользователь</em>") - лицо и/или организация, которое(-ая) использует продукт, предоставляемый под этой лицензией.</p>
|
||||||
|
<p><em>Александр Бабаев</em> (далее "<em>Производитель</em>") - лицо и/или организация, которое(-ая) произвело продукт.</p>
|
||||||
|
<br>
|
||||||
|
<h2><strong>ОГРАНИЧЕНИЯ</strong></h2>
|
||||||
|
<p>В некоторых государствах (районах, областях, штатах) не позволяется ограничение или исключение ответственности за непредвиденный ущерб. Если ваша страна (район, область, штат) не подразумевает ограничение или исключение ответственности за непредвиденный ущерб, то данное соглашение не может применяться к вам. В этом случае откажитесь от использования продукта.</p>
|
||||||
|
<p>В некоторых государствах (районах, областях, штатах) не позволяется исключение подразумеваемых гарантий. Если ваша страна (район, область, штат) не подразумевает исключение подразумеваемых гарантий, то данное соглашение не может применяться к вам. В этом случае откажитесь от использования продукта.</p>
|
||||||
|
<br>
|
||||||
|
<h2><strong>ПРЕДМЕТ СОГЛАШЕНИЯ</strong></h2>
|
||||||
|
<p>Данное соглашение заключается между Производителем продукта и Пользователем продукта. Данное соглашение определяет отношения между Производителем и Пользователем, возникающие при использовании продукта.</p>
|
||||||
|
<br>
|
||||||
|
<h2><strong>ЛИЦЕНЗИЯ</strong></h2>
|
||||||
|
<p>Продукт распространяется по принципу "<em>AS-IS</em>" ("<em>КАК ЕСТЬ</em>"). Автор не несет <strong>НИКАКОЙ ОТВЕТСТВЕННОСТИ</strong> в случае нанесения данной программой физического, материального или любого другого вреда вам и вашему компьютеру. Вы на свой страх и риск устанавливаете продукт. Производитель и/или Распространитель не несет(-ут)никакой ответственности за ошибки, неисправности (и т.п.), нанесенные продуктом вашему компьютеру.</p>
|
||||||
|
<p>Вы можете использовать данную программу на свое усмотрение, а также копировать и распространять со ссылкой на автора и сайт "<a href="http://babaev-an.ru/">http://babaev-an.ru/</a>". Вам запрещается копировать, распространять продукт без ссылки на автора и указанный ранее сайт. Вам запрещается копирование и использование продукта, если устанавливаемая вами копия продукта не имеет ссылки на автора и указанный ранее сайт. Вам запрещается изменять содержимое продукта, разбирать, дизассемблировать и изменять продукт, использовать её компоненты в других программах без письменного соглашения Производителя, удалять или исправлять в продукте любые знаки о праве собственности и/или авторском праве на продукт.</p>
|
||||||
|
<p><em>ЕСЛИ ВЫ ЗАГРУЖАЕТЕ, КОПИРУЕТЕ ПРОДУКТ ИЛИ ИСПОЛЬЗУЕТЕ ЕГО КАКИМ-ЛИБО ДРУГИМ СПОСОБОМ, ЭТИМ ВЫ ПОДТВЕРЖДАЕТЕ СВОЕ СОГЛАСИЕ СОБЛЮДАТЬ УСЛОВИЯ ДАННОГО ЛИЦЕНЗИОННОГО СОГЛАШЕНИЯ С КОНЕЧНЫМ ПОЛЬЗОВАТЕЛЕМ. ЕСЛИ ВЫ НЕ СОГЛАСНЫ, НЕ УСТАНАВЛИВАЙТЕ, НЕ КОПИРУЙТЕ И НЕ ИСПОЛЬЗУЙТЕ ПРОДУКТ.</em></p>
|
||||||
|
<br>
|
||||||
|
<h2><strong>АВТОРСКОЕ ПРАВО</strong></h2>
|
||||||
|
<p>Авторское право на все копии продукта принадлежат Производителю и защищено законодательством РФ и ряда других стран.</p>
|
||||||
|
<br>
|
||||||
|
<h2><strong>ОГРАНИЧЕННАЯ ГАРАНТИЯ И ПРАВОВАЯ ОГОВОРКА</strong></h2>
|
||||||
|
<p>Вам не дается никаких гарантий. Все ваши возможные требования, притязания и претензии (в том числе и по качеству) будут <strong>НЕПРИЗНАННЫ</strong>.</p>
|
||||||
|
<br>
|
||||||
|
<h2><strong>ОГРАНИЧЕНИЕ ОТВЕТСТВЕННОСТИ</strong></h2>
|
||||||
|
<p>Вам не дается никаких обязательств. Все ваши возможные требования будут <strong>НЕПРИЗНАННЫ</strong>.</p>
|
||||||
|
<br>
|
||||||
|
<h1><strong>СПАСИБО, ЧТО ИСПОЛЬЗУЕТЕ "CD EJECTER"!</strong></h1>
|
||||||
|
</body>
|
||||||
|
</html>
|
||||||
BIN
docs/russian.docx
Normal file
BIN
docs/russian.docx
Normal file
Binary file not shown.
60
docs/versionhistory.html
Normal file
60
docs/versionhistory.html
Normal file
@@ -0,0 +1,60 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<html>
|
||||||
|
<head>
|
||||||
|
<meta http-equiv="content-type" content="text/html; charset=UTF-8" />
|
||||||
|
<title>История версий CD Ejecter (CDE)</title>
|
||||||
|
</head>
|
||||||
|
|
||||||
|
<body>
|
||||||
|
<hr>
|
||||||
|
<h1 align="center">CD EJECTER</h1>
|
||||||
|
<h2 align="center">ИСТОРИЯ ВЕРСИЙ</h2>
|
||||||
|
<h3 align="center"><em>© 2011 - 2017, Александр Бабаев.</em></h3>
|
||||||
|
<hr>
|
||||||
|
<h2>ЛЕГЕНДА</h2>
|
||||||
|
<p>[+] - добавлено</p>
|
||||||
|
<p>[-] - убрано</p>
|
||||||
|
<p>[M] - изменено</p>
|
||||||
|
<br>
|
||||||
|
<br>
|
||||||
|
<p><strong>#2.0.2.21 (02.08.2017)</strong> - стабильная версия CDE.</p>
|
||||||
|
<p>1. [M] Обновлена документация, пересобраны пакеты.</p>
|
||||||
|
<p><strong>[cdejecter.exe]</strong></p>
|
||||||
|
<p>1. [M] Версия обновлена до 2.0.80.201.</p>
|
||||||
|
<p>2. [+] Добавлен параметр "link" (с субпараметром "linkname", задающим имя) для создания ярлыка на рабочем столе.</p>
|
||||||
|
<p><strong>[cdejecter_gui.exe]</strong></p>
|
||||||
|
<p>1. [M] Версия обновлена до 2.0.100.201.</p>
|
||||||
|
|
||||||
|
<br>
|
||||||
|
<p><strong>#2.0.1.20 (09.07.2017)</strong> - RC-версия CDE.</p>
|
||||||
|
<p><strong>[cdejecter.dll]</strong></p>
|
||||||
|
<p>1. [M] Версия обновлена до 1.0.1.100.</p>
|
||||||
|
<p>2. [M] Изменена функция EjectCD.</p>
|
||||||
|
<p>3. [+] Добавлен тип TDiscState = (dsNormal{Диск в дисководе, читать можно}, dsEmpty{Диск пуст}, dsUnFormatted{Диск неотформатирован}, dsNIL{Диска нет}).</p>
|
||||||
|
<p>4. [+] Добавлена функция получения статуса диска function GetDiscState (const ADisc: WideChar): TDiscState.</p>
|
||||||
|
<p>5. [+] Добавлена функция закрытия лотка диска function CloseCD (const ADisc: WideChar): Boolean.</p>
|
||||||
|
<p>6. [M] Исправлена ошибка, при которой успешное извлечение считалось ошибкой.</p>
|
||||||
|
<p>7. [M] Добалено определение размера диска и свободного места на нём.</p>
|
||||||
|
<p>8. [+] Добалена фильтрация дисков (без фильтрации; только из белого списка; все, кроме чёрного списка).</p>
|
||||||
|
<p><strong>[cdejecter.exe]</strong></p>
|
||||||
|
<p>1. [M] Версия обновлена до 2.0.80.200.</p>
|
||||||
|
<p>2. [-] Убран параметр "silent" как устаревший.</p>
|
||||||
|
<p>3. [M] Исправлена ошибка, при которой, если в опциях "/eject" и "/info" не указана буква, выскакивает ошибка доступа.</p>
|
||||||
|
<p>4. [+] Добавлена опция "/stateall" для показа состояния всех дисководов.</p>
|
||||||
|
<p>5. [+] Добавлена опция "/state" для показа состояния дисковода, указанного в параметре.</p>
|
||||||
|
<p>6. [+] Добавлена опция "/close" для закрытия лотка дисковода (не поддерживается в некоторых системах).</p>
|
||||||
|
<p>7. [+] В информацию о диске добавлены сокращения: $discsize$ (размер диска форматированный), $discsizebyte$ (размер диска в байтах), $discbusy$ (размер занятого места на диске форматированный), $discbusybyte$ (размер занятого места на диске в байтах), $discbusypercent$ (размер занятого места на диске в процентах), $discfree$ (размер свободного места на диске форматированный), $discfreebyte$ (размер свободного места на диске в байтах), $discfreepercent$ (размер свободного места на диске в процентах).</p>
|
||||||
|
<p><strong>[cdejecter_gui.exe]</strong></p>
|
||||||
|
<p>1. [M] Версия обновлена до 2.0.100.200.</p>
|
||||||
|
<p>2. [+] Длбавлена функция закрытия лотка.</p>
|
||||||
|
<p>3. [M] Обновлён пользовательский интерфейс.</p>
|
||||||
|
<p>4. [+] Добавлено отображения размера диска.</p>
|
||||||
|
<p>5. [+] Добавлены настройки фильтрации.</p>
|
||||||
|
<p>6. [+] Меню "Диски" теперь можно отключить.</p>
|
||||||
|
<p>7. [+] Добавлена технология "Drive Watcher" (требует оперативной памяти).</p>
|
||||||
|
<br>
|
||||||
|
<p><strong>#2.0.0.0 (01.07.2017)</strong> - первая бета-версия CDE 2. Старый интерфейс был полностью переработан. Старый код почти не используется.</p>
|
||||||
|
<br>
|
||||||
|
<p><strong>#1.7.65.120 (12.01.2015)</strong> - последняя стабильная версия первой ветки CDE (история версий не велась).</p>
|
||||||
|
</body>
|
||||||
|
</html>
|
||||||
BIN
images/MainLogo.pdn
Normal file
BIN
images/MainLogo.pdn
Normal file
Binary file not shown.
83
sources/cde_dwa/__history/cde_dwa.lpi;1
Normal file
83
sources/cde_dwa/__history/cde_dwa.lpi;1
Normal file
@@ -0,0 +1,83 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="Daemon application"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
</General>
|
||||||
|
<VersionInfo>
|
||||||
|
<StringTable ProductVersion=""/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="1">
|
||||||
|
<Item1 Name="Default" Default="True"/>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="3">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LazDaemon"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<PackageName Value="FCL"/>
|
||||||
|
</Item3>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="3">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cde_dwa.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="DaemonMapperUnit1.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
<ComponentName Value="DaemonMapper1"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="DaemonUnit1.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
<ComponentName Value="Daemon1"/>
|
||||||
|
<ResourceBaseClass Value="DataModule"/>
|
||||||
|
</Unit2>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="cde_dwa"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/>
|
||||||
|
</SearchPaths>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
92
sources/cde_dwa/__history/cde_dwa.lpi;2
Normal file
92
sources/cde_dwa/__history/cde_dwa.lpi;2
Normal file
@@ -0,0 +1,92 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter DriveWatcher Agent"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<UseXPManifest Value="True"/>
|
||||||
|
<XPManifest>
|
||||||
|
<DpiAware Value="True"/>
|
||||||
|
<TextName Value="AlexanderBabaev.CDEjecter.DWAgent"/>
|
||||||
|
<TextDesc Value="CD Ejecter DriveWatcher Agent"/>
|
||||||
|
</XPManifest>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<StringTable CompanyName="Alexander Babaev" FileDescription="CD Ejecter DriveWatcher Agent" InternalName="cde_dwa" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="cde_dwa" ProductName="CD Ejecter" ProductVersion="2.1"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="1">
|
||||||
|
<Item1 Name="Default" Default="True"/>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="3">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LazDaemon"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<PackageName Value="FCL"/>
|
||||||
|
</Item3>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="3">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cde_dwa.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="data\cde_dwa_mapper.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
<ComponentName Value="DaemonMapper1"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="data\cde_dwa_unit.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
<ComponentName Value="Daemon1"/>
|
||||||
|
<ResourceBaseClass Value="DataModule"/>
|
||||||
|
</Unit2>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="cde_dwa"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="data"/>
|
||||||
|
<UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/>
|
||||||
|
</SearchPaths>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
92
sources/cde_dwa/__history/cde_dwa.lpi;3
Normal file
92
sources/cde_dwa/__history/cde_dwa.lpi;3
Normal file
@@ -0,0 +1,92 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter DriveWatcher Agent"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<UseXPManifest Value="True"/>
|
||||||
|
<XPManifest>
|
||||||
|
<DpiAware Value="True"/>
|
||||||
|
<TextName Value="AlexanderBabaev.CDEjecter.DWAgent"/>
|
||||||
|
<TextDesc Value="CD Ejecter DriveWatcher Agent"/>
|
||||||
|
</XPManifest>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<StringTable CompanyName="Alexander Babaev" FileDescription="CD Ejecter DriveWatcher Agent" InternalName="cde_dwa" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="cde_dwa" ProductName="CD Ejecter" ProductVersion="2.1"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="1">
|
||||||
|
<Item1 Name="Default" Default="True"/>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="3">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LazDaemon"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<PackageName Value="FCL"/>
|
||||||
|
</Item3>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="3">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cde_dwa.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="data\cde_dwa_mapper.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
<ComponentName Value="DaemonMapper1"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="data\cde_dwa_unit.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
<ComponentName Value="dwa_daemon"/>
|
||||||
|
<ResourceBaseClass Value="DataModule"/>
|
||||||
|
</Unit2>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="cde_dwa"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="data"/>
|
||||||
|
<UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/>
|
||||||
|
</SearchPaths>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
92
sources/cde_dwa/__history/cde_dwa.lpi;4
Normal file
92
sources/cde_dwa/__history/cde_dwa.lpi;4
Normal file
@@ -0,0 +1,92 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter DriveWatcher Agent"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<UseXPManifest Value="True"/>
|
||||||
|
<XPManifest>
|
||||||
|
<DpiAware Value="True"/>
|
||||||
|
<TextName Value="AlexanderBabaev.CDEjecter.DWAgent"/>
|
||||||
|
<TextDesc Value="CD Ejecter DriveWatcher Agent"/>
|
||||||
|
</XPManifest>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<StringTable CompanyName="Alexander Babaev" FileDescription="CD Ejecter DriveWatcher Agent" InternalName="cde_dwa" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="cde_dwa" ProductName="CD Ejecter" ProductVersion="2.1"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="1">
|
||||||
|
<Item1 Name="Default" Default="True"/>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="3">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LazDaemon"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<PackageName Value="FCL"/>
|
||||||
|
</Item3>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="3">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cde_dwa.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="data\cde_dwa_mapper.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
<ComponentName Value="DaemonMapper1"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="data\cde_dwa_unit.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
<ComponentName Value="dwa_daemon"/>
|
||||||
|
<ResourceBaseClass Value="DataModule"/>
|
||||||
|
</Unit2>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="cde_dwa"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="data"/>
|
||||||
|
<UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/>
|
||||||
|
</SearchPaths>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
93
sources/cde_dwa/__history/cde_dwa.lpi;5
Normal file
93
sources/cde_dwa/__history/cde_dwa.lpi;5
Normal file
@@ -0,0 +1,93 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter DriveWatcher Agent"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<UseXPManifest Value="True"/>
|
||||||
|
<XPManifest>
|
||||||
|
<DpiAware Value="True"/>
|
||||||
|
<TextName Value="AlexanderBabaev.CDEjecter.DWAgent"/>
|
||||||
|
<TextDesc Value="CD Ejecter DriveWatcher Agent"/>
|
||||||
|
</XPManifest>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<MinorVersionNr Value="1"/>
|
||||||
|
<StringTable CompanyName="Alexander Babaev" FileDescription="CD Ejecter DriveWatcher Agent" InternalName="cde_dwa" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="cde_dwa" ProductName="CD Ejecter" ProductVersion="2.1"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="1">
|
||||||
|
<Item1 Name="Default" Default="True"/>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="3">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LazDaemon"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<PackageName Value="FCL"/>
|
||||||
|
</Item3>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="3">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cde_dwa.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="data\cde_dwa_mapper.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
<ComponentName Value="DaemonMapper1"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="data\cde_dwa_unit.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
<ComponentName Value="dwa_daemon"/>
|
||||||
|
<ResourceBaseClass Value="DataModule"/>
|
||||||
|
</Unit2>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="cde_dwa"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="data"/>
|
||||||
|
<UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/>
|
||||||
|
</SearchPaths>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
149
sources/cde_dwa/__history/cde_dwa.lpi;6
Normal file
149
sources/cde_dwa/__history/cde_dwa.lpi;6
Normal file
@@ -0,0 +1,149 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter DriveWatcher Agent"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<UseXPManifest Value="True"/>
|
||||||
|
<XPManifest>
|
||||||
|
<DpiAware Value="True"/>
|
||||||
|
<TextName Value="AlexanderBabaev.CDEjecter.DWAgent"/>
|
||||||
|
<TextDesc Value="CD Ejecter DriveWatcher Agent"/>
|
||||||
|
</XPManifest>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<MinorVersionNr Value="1"/>
|
||||||
|
<StringTable CompanyName="Alexander Babaev" FileDescription="CD Ejecter DriveWatcher Agent" InternalName="cde_dwa" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="cde_dwa" ProductName="CD Ejecter" ProductVersion="2.1"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="2">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cde_dwa"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="data"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="3">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LazDaemon"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<PackageName Value="FCL"/>
|
||||||
|
</Item3>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="3">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cde_dwa.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="data\cde_dwa_mapper.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
<ComponentName Value="DaemonMapper1"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="data\cde_dwa_unit.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
<ComponentName Value="dwa_daemon"/>
|
||||||
|
<ResourceBaseClass Value="DataModule"/>
|
||||||
|
</Unit2>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cde_dwa"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="data"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
40
sources/cde_dwa/__history/cde_dwa.lps;1
Normal file
40
sources/cde_dwa/__history/cde_dwa.lps;1
Normal file
@@ -0,0 +1,40 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectSession>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<BuildModes Active="Default"/>
|
||||||
|
<Units Count="3">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cde_dwa.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
<IsVisibleTab Value="True"/>
|
||||||
|
<EditorIndex Value="2"/>
|
||||||
|
<CursorPos X="5" Y="8"/>
|
||||||
|
<UsageCount Value="20"/>
|
||||||
|
<Loaded Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="DaemonMapperUnit1.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
<ComponentName Value="DaemonMapper1"/>
|
||||||
|
<CursorPos X="5" Y="20"/>
|
||||||
|
<UsageCount Value="20"/>
|
||||||
|
<Loaded Value="True"/>
|
||||||
|
<LoadedDesigner Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="DaemonUnit1.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
<ComponentName Value="Daemon1"/>
|
||||||
|
<ResourceBaseClass Value="DataModule"/>
|
||||||
|
<EditorIndex Value="1"/>
|
||||||
|
<CursorPos X="17" Y="3"/>
|
||||||
|
<UsageCount Value="20"/>
|
||||||
|
<Loaded Value="True"/>
|
||||||
|
<LoadedDesigner Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
</Units>
|
||||||
|
<JumpHistory HistoryIndex="-1"/>
|
||||||
|
</ProjectSession>
|
||||||
|
</CONFIG>
|
||||||
40
sources/cde_dwa/__history/cde_dwa.lps;2
Normal file
40
sources/cde_dwa/__history/cde_dwa.lps;2
Normal file
@@ -0,0 +1,40 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectSession>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<BuildModes Active="Default"/>
|
||||||
|
<Units Count="3">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cde_dwa.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
<IsVisibleTab Value="True"/>
|
||||||
|
<EditorIndex Value="2"/>
|
||||||
|
<CursorPos X="19" Y="3"/>
|
||||||
|
<UsageCount Value="20"/>
|
||||||
|
<Loaded Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="data\cde_dwa_mapper.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
<ComponentName Value="DaemonMapper1"/>
|
||||||
|
<CursorPos X="39" Y="7"/>
|
||||||
|
<UsageCount Value="20"/>
|
||||||
|
<Loaded Value="True"/>
|
||||||
|
<LoadedDesigner Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="data\cde_dwa_unit.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
<ComponentName Value="Daemon1"/>
|
||||||
|
<ResourceBaseClass Value="DataModule"/>
|
||||||
|
<EditorIndex Value="1"/>
|
||||||
|
<CursorPos X="17" Y="3"/>
|
||||||
|
<UsageCount Value="20"/>
|
||||||
|
<Loaded Value="True"/>
|
||||||
|
<LoadedDesigner Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
</Units>
|
||||||
|
<JumpHistory HistoryIndex="-1"/>
|
||||||
|
</ProjectSession>
|
||||||
|
</CONFIG>
|
||||||
40
sources/cde_dwa/__history/cde_dwa.lps;3
Normal file
40
sources/cde_dwa/__history/cde_dwa.lps;3
Normal file
@@ -0,0 +1,40 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectSession>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<BuildModes Active="Default"/>
|
||||||
|
<Units Count="3">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cde_dwa.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
<EditorIndex Value="2"/>
|
||||||
|
<CursorPos X="19" Y="3"/>
|
||||||
|
<UsageCount Value="20"/>
|
||||||
|
<Loaded Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="data\cde_dwa_mapper.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
<ComponentName Value="DaemonMapper1"/>
|
||||||
|
<CursorPos Y="15"/>
|
||||||
|
<UsageCount Value="20"/>
|
||||||
|
<Loaded Value="True"/>
|
||||||
|
<LoadedDesigner Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="data\cde_dwa_unit.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
<ComponentName Value="dwa_daemon"/>
|
||||||
|
<ResourceBaseClass Value="DataModule"/>
|
||||||
|
<IsVisibleTab Value="True"/>
|
||||||
|
<EditorIndex Value="1"/>
|
||||||
|
<CursorPos Y="19"/>
|
||||||
|
<UsageCount Value="20"/>
|
||||||
|
<Loaded Value="True"/>
|
||||||
|
<LoadedDesigner Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
</Units>
|
||||||
|
<JumpHistory HistoryIndex="-1"/>
|
||||||
|
</ProjectSession>
|
||||||
|
</CONFIG>
|
||||||
40
sources/cde_dwa/__history/cde_dwa.lps;4
Normal file
40
sources/cde_dwa/__history/cde_dwa.lps;4
Normal file
@@ -0,0 +1,40 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectSession>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<BuildModes Active="Default"/>
|
||||||
|
<Units Count="3">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cde_dwa.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
<EditorIndex Value="2"/>
|
||||||
|
<CursorPos Y="6"/>
|
||||||
|
<UsageCount Value="20"/>
|
||||||
|
<Loaded Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="data\cde_dwa_mapper.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
<ComponentName Value="DaemonMapper1"/>
|
||||||
|
<IsVisibleTab Value="True"/>
|
||||||
|
<CursorPos Y="15"/>
|
||||||
|
<UsageCount Value="20"/>
|
||||||
|
<Loaded Value="True"/>
|
||||||
|
<LoadedDesigner Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="data\cde_dwa_unit.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
<ComponentName Value="dwa_daemon"/>
|
||||||
|
<ResourceBaseClass Value="DataModule"/>
|
||||||
|
<EditorIndex Value="1"/>
|
||||||
|
<CursorPos Y="19"/>
|
||||||
|
<UsageCount Value="20"/>
|
||||||
|
<Loaded Value="True"/>
|
||||||
|
<LoadedDesigner Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
</Units>
|
||||||
|
<JumpHistory HistoryIndex="-1"/>
|
||||||
|
</ProjectSession>
|
||||||
|
</CONFIG>
|
||||||
40
sources/cde_dwa/__history/cde_dwa.lps;5
Normal file
40
sources/cde_dwa/__history/cde_dwa.lps;5
Normal file
@@ -0,0 +1,40 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectSession>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<BuildModes Active="Default"/>
|
||||||
|
<Units Count="3">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cde_dwa.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
<EditorIndex Value="2"/>
|
||||||
|
<CursorPos Y="6"/>
|
||||||
|
<UsageCount Value="20"/>
|
||||||
|
<Loaded Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="data\cde_dwa_mapper.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
<ComponentName Value="DaemonMapper1"/>
|
||||||
|
<IsVisibleTab Value="True"/>
|
||||||
|
<CursorPos Y="15"/>
|
||||||
|
<UsageCount Value="20"/>
|
||||||
|
<Loaded Value="True"/>
|
||||||
|
<LoadedDesigner Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="data\cde_dwa_unit.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
<ComponentName Value="dwa_daemon"/>
|
||||||
|
<ResourceBaseClass Value="DataModule"/>
|
||||||
|
<EditorIndex Value="1"/>
|
||||||
|
<CursorPos Y="19"/>
|
||||||
|
<UsageCount Value="20"/>
|
||||||
|
<Loaded Value="True"/>
|
||||||
|
<LoadedDesigner Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
</Units>
|
||||||
|
<JumpHistory HistoryIndex="-1"/>
|
||||||
|
</ProjectSession>
|
||||||
|
</CONFIG>
|
||||||
43
sources/cde_dwa/__history/cde_dwa.lps;6
Normal file
43
sources/cde_dwa/__history/cde_dwa.lps;6
Normal file
@@ -0,0 +1,43 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectSession>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<BuildModes Active="Win64"/>
|
||||||
|
<Units Count="3">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cde_dwa.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
<EditorIndex Value="2"/>
|
||||||
|
<CursorPos Y="6"/>
|
||||||
|
<UsageCount Value="20"/>
|
||||||
|
<Loaded Value="True"/>
|
||||||
|
<DefaultSyntaxHighlighter Value="Delphi"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="data\cde_dwa_mapper.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
<ComponentName Value="DaemonMapper1"/>
|
||||||
|
<IsVisibleTab Value="True"/>
|
||||||
|
<CursorPos Y="15"/>
|
||||||
|
<UsageCount Value="20"/>
|
||||||
|
<Loaded Value="True"/>
|
||||||
|
<LoadedDesigner Value="True"/>
|
||||||
|
<DefaultSyntaxHighlighter Value="Delphi"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="data\cde_dwa_unit.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
<ComponentName Value="dwa_daemon"/>
|
||||||
|
<ResourceBaseClass Value="DataModule"/>
|
||||||
|
<EditorIndex Value="1"/>
|
||||||
|
<CursorPos Y="19"/>
|
||||||
|
<UsageCount Value="20"/>
|
||||||
|
<Loaded Value="True"/>
|
||||||
|
<LoadedDesigner Value="True"/>
|
||||||
|
<DefaultSyntaxHighlighter Value="Delphi"/>
|
||||||
|
</Unit2>
|
||||||
|
</Units>
|
||||||
|
<JumpHistory HistoryIndex="-1"/>
|
||||||
|
</ProjectSession>
|
||||||
|
</CONFIG>
|
||||||
8
sources/cde_dwa/__history/cde_dwa.pas;1
Normal file
8
sources/cde_dwa/__history/cde_dwa.pas;1
Normal file
@@ -0,0 +1,8 @@
|
|||||||
|
Program cde_dwa;
|
||||||
|
{$mode delphi}
|
||||||
|
{$codepage UTF8}
|
||||||
|
uses DaemonApp, lazdaemonapp, DaemonMapperUnit1, DaemonUnit1;
|
||||||
|
begin
|
||||||
|
Application.Initialize;
|
||||||
|
Application.Run;
|
||||||
|
end.
|
||||||
8
sources/cde_dwa/__history/cde_dwa.pas;2
Normal file
8
sources/cde_dwa/__history/cde_dwa.pas;2
Normal file
@@ -0,0 +1,8 @@
|
|||||||
|
Program cde_dwa;
|
||||||
|
{$mode delphi}
|
||||||
|
{$codepage UTF8}
|
||||||
|
uses DaemonApp, lazdaemonapp, cde_dwa_mapper, cde_dwa_unit;
|
||||||
|
begin
|
||||||
|
Application.Initialize;
|
||||||
|
Application.Run;
|
||||||
|
end.
|
||||||
12
sources/cde_dwa/__history/cde_dwa.pas;3
Normal file
12
sources/cde_dwa/__history/cde_dwa.pas;3
Normal file
@@ -0,0 +1,12 @@
|
|||||||
|
Program cde_dwa;
|
||||||
|
{$mode delphi}
|
||||||
|
{$codepage UTF8}
|
||||||
|
uses DaemonApp, lazdaemonapp, cde_dwa_mapper, cde_dwa_unit;
|
||||||
|
|
||||||
|
{$R *.res}
|
||||||
|
|
||||||
|
begin
|
||||||
|
Application.Title:='CD Ejecter DriveWatcher Agent';
|
||||||
|
Application.Initialize;
|
||||||
|
Application.Run;
|
||||||
|
end.
|
||||||
12
sources/cde_dwa/__history/cde_dwa.pas;4
Normal file
12
sources/cde_dwa/__history/cde_dwa.pas;4
Normal file
@@ -0,0 +1,12 @@
|
|||||||
|
Program cde_dwa;
|
||||||
|
{$mode delphi}
|
||||||
|
{$codepage UTF8}
|
||||||
|
uses DaemonApp, lazdaemonapp, cde_dwa_mapper, cde_dwa_unit;
|
||||||
|
|
||||||
|
{$R *.res}
|
||||||
|
|
||||||
|
begin
|
||||||
|
Application.Title:='CD Ejecter DriveWatcher Agent';
|
||||||
|
Application.Initialize;
|
||||||
|
Application.Run;
|
||||||
|
end.
|
||||||
BIN
sources/cde_dwa/cde_dwa.ico
Normal file
BIN
sources/cde_dwa/cde_dwa.ico
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 4.2 KiB |
149
sources/cde_dwa/cde_dwa.lpi
Normal file
149
sources/cde_dwa/cde_dwa.lpi
Normal file
@@ -0,0 +1,149 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter DriveWatcher Agent"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<UseXPManifest Value="True"/>
|
||||||
|
<XPManifest>
|
||||||
|
<DpiAware Value="True"/>
|
||||||
|
<TextName Value="AlexanderBabaev.CDEjecter.DWAgent"/>
|
||||||
|
<TextDesc Value="CD Ejecter DriveWatcher Agent"/>
|
||||||
|
</XPManifest>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<MinorVersionNr Value="1"/>
|
||||||
|
<StringTable CompanyName="Alexander Babaev" FileDescription="CD Ejecter DriveWatcher Agent" InternalName="cde_dwa" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="cde_dwa" ProductName="CD Ejecter" ProductVersion="2.1"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="2">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cde_dwa"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="data"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="3">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LazDaemon"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<PackageName Value="FCL"/>
|
||||||
|
</Item3>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="3">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cde_dwa.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="data\cde_dwa_mapper.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
<ComponentName Value="DaemonMapper1"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="data\cde_dwa_unit.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
<ComponentName Value="dwa_daemon"/>
|
||||||
|
<ResourceBaseClass Value="DataModule"/>
|
||||||
|
</Unit2>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cde_dwa"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="data"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
10
sources/cde_dwa/cde_dwa.pas
Normal file
10
sources/cde_dwa/cde_dwa.pas
Normal file
@@ -0,0 +1,10 @@
|
|||||||
|
Program cde_dwa;
|
||||||
|
{$mode delphi}
|
||||||
|
{$codepage UTF8}
|
||||||
|
uses DaemonApp, lazdaemonapp, cde_dwa_mapper, cde_dwa_unit;
|
||||||
|
{$R *.res}
|
||||||
|
begin
|
||||||
|
Application.Title:= 'CD Ejecter DriveWatcher Agent';
|
||||||
|
Application.Initialize;
|
||||||
|
Application.Run;
|
||||||
|
end.
|
||||||
5
sources/cde_dwa/data/__history/cde_dwa_mapper.lfm;1
Normal file
5
sources/cde_dwa/data/__history/cde_dwa_mapper.lfm;1
Normal file
@@ -0,0 +1,5 @@
|
|||||||
|
object DaemonMapper1: TDaemonMapper1
|
||||||
|
DaemonDefs = <>
|
||||||
|
left = 477
|
||||||
|
top = 130
|
||||||
|
end
|
||||||
5
sources/cde_dwa/data/__history/cde_dwa_mapper.lfm;2
Normal file
5
sources/cde_dwa/data/__history/cde_dwa_mapper.lfm;2
Normal file
@@ -0,0 +1,5 @@
|
|||||||
|
object DaemonMapper1: TDaemonMapper1
|
||||||
|
DaemonDefs = <>
|
||||||
|
left = 477
|
||||||
|
top = 130
|
||||||
|
end
|
||||||
5
sources/cde_dwa/data/__history/cde_dwa_mapper.lfm;3
Normal file
5
sources/cde_dwa/data/__history/cde_dwa_mapper.lfm;3
Normal file
@@ -0,0 +1,5 @@
|
|||||||
|
object DaemonMapper1: TDaemonMapper1
|
||||||
|
DaemonDefs = <>
|
||||||
|
left = 477
|
||||||
|
top = 130
|
||||||
|
end
|
||||||
5
sources/cde_dwa/data/__history/cde_dwa_mapper.lfm;4
Normal file
5
sources/cde_dwa/data/__history/cde_dwa_mapper.lfm;4
Normal file
@@ -0,0 +1,5 @@
|
|||||||
|
object DaemonMapper1: TDaemonMapper1
|
||||||
|
DaemonDefs = <>
|
||||||
|
left = 477
|
||||||
|
top = 130
|
||||||
|
end
|
||||||
20
sources/cde_dwa/data/__history/cde_dwa_mapper.pas;1
Normal file
20
sources/cde_dwa/data/__history/cde_dwa_mapper.pas;1
Normal file
@@ -0,0 +1,20 @@
|
|||||||
|
unit cde_dwa_mapper;
|
||||||
|
{$mode delphi}
|
||||||
|
{$codepage UTF8}
|
||||||
|
interface
|
||||||
|
uses Classes, SysUtils, FileUtil, DaemonApp;
|
||||||
|
type
|
||||||
|
TDaemonMapper1 = class(TDaemonMapper)
|
||||||
|
private
|
||||||
|
public
|
||||||
|
end;
|
||||||
|
var DaemonMapper1: TDaemonMapper1;
|
||||||
|
implementation
|
||||||
|
Procedure RegisterMapper;
|
||||||
|
begin
|
||||||
|
RegisterDaemonMapper(TDaemonMapper1)
|
||||||
|
end;
|
||||||
|
{$R *.lfm}
|
||||||
|
initialization
|
||||||
|
RegisterMapper;
|
||||||
|
end.
|
||||||
20
sources/cde_dwa/data/__history/cde_dwa_mapper.pas;2
Normal file
20
sources/cde_dwa/data/__history/cde_dwa_mapper.pas;2
Normal file
@@ -0,0 +1,20 @@
|
|||||||
|
unit cde_dwa_mapper;
|
||||||
|
{$mode delphi}
|
||||||
|
{$codepage UTF8}
|
||||||
|
interface
|
||||||
|
uses Classes, SysUtils, FileUtil, DaemonApp;
|
||||||
|
type
|
||||||
|
Tdwa_mapper = class(TDaemonMapper)
|
||||||
|
private
|
||||||
|
public
|
||||||
|
end;
|
||||||
|
var dwa_mapper: TDaemonMapper1;
|
||||||
|
implementation
|
||||||
|
Procedure RegisterMapper;
|
||||||
|
begin
|
||||||
|
RegisterDaemonMapper(Tdwa_mapper)
|
||||||
|
end;
|
||||||
|
{$R *.lfm}
|
||||||
|
initialization
|
||||||
|
RegisterMapper;
|
||||||
|
end.
|
||||||
20
sources/cde_dwa/data/__history/cde_dwa_mapper.pas;3
Normal file
20
sources/cde_dwa/data/__history/cde_dwa_mapper.pas;3
Normal file
@@ -0,0 +1,20 @@
|
|||||||
|
unit cde_dwa_mapper;
|
||||||
|
{$mode delphi}
|
||||||
|
{$codepage UTF8}
|
||||||
|
interface
|
||||||
|
uses Classes, SysUtils, FileUtil, DaemonApp;
|
||||||
|
type
|
||||||
|
Tdwa_mapper = class(TDaemonMapper)
|
||||||
|
private
|
||||||
|
public
|
||||||
|
end;
|
||||||
|
var dwa_mapper: TDaemonMapper1;
|
||||||
|
implementation
|
||||||
|
Procedure RegisterMapper;
|
||||||
|
begin
|
||||||
|
RegisterDaemonMapper(Tdwa_mapper)
|
||||||
|
end;
|
||||||
|
{$R *.lfm}
|
||||||
|
initialization
|
||||||
|
RegisterMapper;
|
||||||
|
end.
|
||||||
8
sources/cde_dwa/data/__history/cde_dwa_unit.lfm;1
Normal file
8
sources/cde_dwa/data/__history/cde_dwa_unit.lfm;1
Normal file
@@ -0,0 +1,8 @@
|
|||||||
|
object Daemon1: TDaemon1
|
||||||
|
OldCreateOrder = False
|
||||||
|
Height = 150
|
||||||
|
HorizontalOffset = 477
|
||||||
|
VerticalOffset = 130
|
||||||
|
Width = 150
|
||||||
|
PPI = 96
|
||||||
|
end
|
||||||
22
sources/cde_dwa/data/__history/cde_dwa_unit.pas;1
Normal file
22
sources/cde_dwa/data/__history/cde_dwa_unit.pas;1
Normal file
@@ -0,0 +1,22 @@
|
|||||||
|
unit cde_dwa_unit;
|
||||||
|
{$mode delphi}
|
||||||
|
{$codepage UTF8}
|
||||||
|
interface
|
||||||
|
uses Classes, SysUtils, FileUtil, DaemonApp;
|
||||||
|
type
|
||||||
|
TDaemon1 = class(TDaemon)
|
||||||
|
private
|
||||||
|
public
|
||||||
|
end;
|
||||||
|
var
|
||||||
|
Daemon1: TDaemon1;
|
||||||
|
implementation
|
||||||
|
Procedure RegisterDaemon;
|
||||||
|
begin
|
||||||
|
RegisterDaemonClass(TDaemon1)
|
||||||
|
end;
|
||||||
|
{$R *.lfm}
|
||||||
|
|
||||||
|
initialization
|
||||||
|
RegisterDaemon;
|
||||||
|
end.
|
||||||
5
sources/cde_dwa/data/cde_dwa_mapper.lfm
Normal file
5
sources/cde_dwa/data/cde_dwa_mapper.lfm
Normal file
@@ -0,0 +1,5 @@
|
|||||||
|
object DaemonMapper1: TDaemonMapper1
|
||||||
|
DaemonDefs = <>
|
||||||
|
left = 477
|
||||||
|
top = 130
|
||||||
|
end
|
||||||
20
sources/cde_dwa/data/cde_dwa_mapper.pas
Normal file
20
sources/cde_dwa/data/cde_dwa_mapper.pas
Normal file
@@ -0,0 +1,20 @@
|
|||||||
|
unit cde_dwa_mapper;
|
||||||
|
{$mode delphi}
|
||||||
|
{$codepage UTF8}
|
||||||
|
interface
|
||||||
|
uses Classes, SysUtils, FileUtil, DaemonApp;
|
||||||
|
type
|
||||||
|
Tdwa_mapper = class(TDaemonMapper)
|
||||||
|
private
|
||||||
|
public
|
||||||
|
end;
|
||||||
|
var dwa_mapper: Tdwa_mapper;
|
||||||
|
implementation
|
||||||
|
Procedure RegisterMapper;
|
||||||
|
begin
|
||||||
|
RegisterDaemonMapper(Tdwa_mapper)
|
||||||
|
end;
|
||||||
|
{$R *.lfm}
|
||||||
|
initialization
|
||||||
|
RegisterMapper;
|
||||||
|
end.
|
||||||
8
sources/cde_dwa/data/cde_dwa_unit.lfm
Normal file
8
sources/cde_dwa/data/cde_dwa_unit.lfm
Normal file
@@ -0,0 +1,8 @@
|
|||||||
|
object dwa_daemon: Tdwa_daemon
|
||||||
|
OldCreateOrder = False
|
||||||
|
Height = 150
|
||||||
|
HorizontalOffset = 477
|
||||||
|
VerticalOffset = 130
|
||||||
|
Width = 150
|
||||||
|
PPI = 96
|
||||||
|
end
|
||||||
21
sources/cde_dwa/data/cde_dwa_unit.pas
Normal file
21
sources/cde_dwa/data/cde_dwa_unit.pas
Normal file
@@ -0,0 +1,21 @@
|
|||||||
|
unit cde_dwa_unit;
|
||||||
|
{$mode delphi}
|
||||||
|
{$codepage UTF8}
|
||||||
|
interface
|
||||||
|
uses Classes, SysUtils, FileUtil, DaemonApp;
|
||||||
|
type
|
||||||
|
Tdwa_daemon = class(TDaemon)
|
||||||
|
private
|
||||||
|
public
|
||||||
|
end;
|
||||||
|
var
|
||||||
|
dwa_daemon: Tdwa_daemon;
|
||||||
|
implementation
|
||||||
|
Procedure RegisterDaemon;
|
||||||
|
begin
|
||||||
|
RegisterDaemonClass(Tdwa_daemon)
|
||||||
|
end;
|
||||||
|
{$R *.lfm}
|
||||||
|
initialization
|
||||||
|
RegisterDaemon;
|
||||||
|
end.
|
||||||
125
sources/cdejecter/__history/cdejecter.lpi;1
Normal file
125
sources/cdejecter/__history/cdejecter.lpi;1
Normal file
@@ -0,0 +1,125 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<AutoIncrementBuild Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="65"/>
|
||||||
|
<BuildNr Value="125"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 beta 1"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="2">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<Units Count="1">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
148
sources/cdejecter/__history/cdejecter.lpi;10
Normal file
148
sources/cdejecter/__history/cdejecter.lpi;10
Normal file
@@ -0,0 +1,148 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<AutoIncrementBuild Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="65"/>
|
||||||
|
<BuildNr Value="127"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 beta 1"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="2">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="4">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
148
sources/cdejecter/__history/cdejecter.lpi;11
Normal file
148
sources/cdejecter/__history/cdejecter.lpi;11
Normal file
@@ -0,0 +1,148 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<AutoIncrementBuild Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="65"/>
|
||||||
|
<BuildNr Value="128"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 beta 1"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="2">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="4">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
148
sources/cdejecter/__history/cdejecter.lpi;12
Normal file
148
sources/cdejecter/__history/cdejecter.lpi;12
Normal file
@@ -0,0 +1,148 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<AutoIncrementBuild Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="65"/>
|
||||||
|
<BuildNr Value="128"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 beta 1"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="2">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="4">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
168
sources/cdejecter/__history/cdejecter.lpi;13
Normal file
168
sources/cdejecter/__history/cdejecter.lpi;13
Normal file
@@ -0,0 +1,168 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<AutoIncrementBuild Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="65"/>
|
||||||
|
<BuildNr Value="128"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 beta 1"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="3">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
<Item3 Name="Lin64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Lin64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Lin64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="linux"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item3>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="1">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
187
sources/cdejecter/__history/cdejecter.lpi;14
Normal file
187
sources/cdejecter/__history/cdejecter.lpi;14
Normal file
@@ -0,0 +1,187 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<AutoIncrementBuild Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="65"/>
|
||||||
|
<BuildNr Value="128"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 beta 1"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="3">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
<Item3 Name="Lin64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Lin64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Lin64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="linux"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item3>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="5">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
<Unit4>
|
||||||
|
<Filename Value="..\shared_units\cde_skins.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit4>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
187
sources/cdejecter/__history/cdejecter.lpi;15
Normal file
187
sources/cdejecter/__history/cdejecter.lpi;15
Normal file
@@ -0,0 +1,187 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<AutoIncrementBuild Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="65"/>
|
||||||
|
<BuildNr Value="128"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 beta 1"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="3">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
<Item3 Name="Lin64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Lin64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Lin64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="linux"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item3>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="5">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
<Unit4>
|
||||||
|
<Filename Value="..\shared_units\cde_kernel.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit4>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
187
sources/cdejecter/__history/cdejecter.lpi;16
Normal file
187
sources/cdejecter/__history/cdejecter.lpi;16
Normal file
@@ -0,0 +1,187 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<AutoIncrementBuild Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="65"/>
|
||||||
|
<BuildNr Value="128"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 beta 1"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="3">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
<Item3 Name="Lin64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Lin64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Lin64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="linux"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item3>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="5">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
<Unit4>
|
||||||
|
<Filename Value="..\shared_units\cde_kernel.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit4>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
187
sources/cdejecter/__history/cdejecter.lpi;17
Normal file
187
sources/cdejecter/__history/cdejecter.lpi;17
Normal file
@@ -0,0 +1,187 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<AutoIncrementBuild Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="65"/>
|
||||||
|
<BuildNr Value="128"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 beta 1"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="3">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
<Item3 Name="Lin64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Lin64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Lin64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="linux"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item3>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="5">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
<Unit4>
|
||||||
|
<Filename Value="..\shared_units\cde_kernel.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit4>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
187
sources/cdejecter/__history/cdejecter.lpi;18
Normal file
187
sources/cdejecter/__history/cdejecter.lpi;18
Normal file
@@ -0,0 +1,187 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<AutoIncrementBuild Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="65"/>
|
||||||
|
<BuildNr Value="128"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 beta 1"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="3">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
<Item3 Name="Lin64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Lin64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Lin64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="linux"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item3>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="5">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
<Unit4>
|
||||||
|
<Filename Value="..\shared_units\cde_kernel.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit4>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
187
sources/cdejecter/__history/cdejecter.lpi;19
Normal file
187
sources/cdejecter/__history/cdejecter.lpi;19
Normal file
@@ -0,0 +1,187 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<AutoIncrementBuild Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="65"/>
|
||||||
|
<BuildNr Value="128"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 beta 1"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="3">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
<Item3 Name="Lin64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Lin64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Lin64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="linux"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item3>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="5">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
<Unit4>
|
||||||
|
<Filename Value="..\shared_units\cde_kernel.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit4>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
126
sources/cdejecter/__history/cdejecter.lpi;2
Normal file
126
sources/cdejecter/__history/cdejecter.lpi;2
Normal file
@@ -0,0 +1,126 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<AutoIncrementBuild Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="65"/>
|
||||||
|
<BuildNr Value="125"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 beta 1"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="2">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<Units Count="1">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
187
sources/cdejecter/__history/cdejecter.lpi;20
Normal file
187
sources/cdejecter/__history/cdejecter.lpi;20
Normal file
@@ -0,0 +1,187 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<AutoIncrementBuild Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="65"/>
|
||||||
|
<BuildNr Value="128"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 beta 1"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="3">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
<Item3 Name="Lin64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Lin64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Lin64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="linux"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item3>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="5">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
<Unit4>
|
||||||
|
<Filename Value="..\shared_units\cde_kernel.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit4>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
187
sources/cdejecter/__history/cdejecter.lpi;21
Normal file
187
sources/cdejecter/__history/cdejecter.lpi;21
Normal file
@@ -0,0 +1,187 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<AutoIncrementBuild Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="65"/>
|
||||||
|
<BuildNr Value="128"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 beta 1"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="3">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
<Item3 Name="Lin64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Lin64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Lin64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="linux"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item3>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="5">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
<Unit4>
|
||||||
|
<Filename Value="..\shared_units\cde_kernel.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit4>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
187
sources/cdejecter/__history/cdejecter.lpi;22
Normal file
187
sources/cdejecter/__history/cdejecter.lpi;22
Normal file
@@ -0,0 +1,187 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<AutoIncrementBuild Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="65"/>
|
||||||
|
<BuildNr Value="128"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 beta 1"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="3">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
<Item3 Name="Lin64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Lin64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Lin64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="linux"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item3>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="5">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
<Unit4>
|
||||||
|
<Filename Value="..\shared_units\cde_kernel.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit4>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
187
sources/cdejecter/__history/cdejecter.lpi;23
Normal file
187
sources/cdejecter/__history/cdejecter.lpi;23
Normal file
@@ -0,0 +1,187 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<AutoIncrementBuild Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="65"/>
|
||||||
|
<BuildNr Value="128"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 beta 1"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="3">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
<Item3 Name="Lin64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Lin64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Lin64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="linux"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item3>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="5">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
<Unit4>
|
||||||
|
<Filename Value="..\shared_units\cde_kernel.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit4>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
187
sources/cdejecter/__history/cdejecter.lpi;24
Normal file
187
sources/cdejecter/__history/cdejecter.lpi;24
Normal file
@@ -0,0 +1,187 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<AutoIncrementBuild Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="65"/>
|
||||||
|
<BuildNr Value="129"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 beta 1"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="3">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
<Item3 Name="Lin64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Lin64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Lin64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="linux"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item3>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="5">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
<Unit4>
|
||||||
|
<Filename Value="..\shared_units\cde_kernel.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit4>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
187
sources/cdejecter/__history/cdejecter.lpi;25
Normal file
187
sources/cdejecter/__history/cdejecter.lpi;25
Normal file
@@ -0,0 +1,187 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<AutoIncrementBuild Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="65"/>
|
||||||
|
<BuildNr Value="129"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 beta 1"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="3">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
<Item3 Name="Lin64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Lin64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Lin64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="linux"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item3>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="5">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
<Unit4>
|
||||||
|
<Filename Value="..\shared_units\cde_kernel.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit4>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
192
sources/cdejecter/__history/cdejecter.lpi;26
Normal file
192
sources/cdejecter/__history/cdejecter.lpi;26
Normal file
@@ -0,0 +1,192 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<AutoIncrementBuild Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="65"/>
|
||||||
|
<BuildNr Value="129"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 beta 1"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="3">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
<Item3 Name="Lin64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Lin64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Lin64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="linux"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
<Other>
|
||||||
|
<ConfigFile>
|
||||||
|
<StopAfterErrCount Value="2"/>
|
||||||
|
</ConfigFile>
|
||||||
|
</Other>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item3>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="5">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
<Unit4>
|
||||||
|
<Filename Value="..\shared_units\cde_kernel.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit4>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
152
sources/cdejecter/__history/cdejecter.lpi;27
Normal file
152
sources/cdejecter/__history/cdejecter.lpi;27
Normal file
@@ -0,0 +1,152 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<AutoIncrementBuild Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="65"/>
|
||||||
|
<BuildNr Value="129"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 beta 1"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="2">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="5">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
<Unit4>
|
||||||
|
<Filename Value="..\shared_units\cde_kernel.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit4>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
151
sources/cdejecter/__history/cdejecter.lpi;28
Normal file
151
sources/cdejecter/__history/cdejecter.lpi;28
Normal file
@@ -0,0 +1,151 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="80"/>
|
||||||
|
<BuildNr Value="200"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 RC"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="2">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="5">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
<Unit4>
|
||||||
|
<Filename Value="..\shared_units\cde_kernel.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit4>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
152
sources/cdejecter/__history/cdejecter.lpi;29
Normal file
152
sources/cdejecter/__history/cdejecter.lpi;29
Normal file
@@ -0,0 +1,152 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="80"/>
|
||||||
|
<BuildNr Value="200"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 RC"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="2">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
<CommandLineParams Value="/eject"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="5">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
<Unit4>
|
||||||
|
<Filename Value="..\shared_units\cde_kernel.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit4>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
127
sources/cdejecter/__history/cdejecter.lpi;3
Normal file
127
sources/cdejecter/__history/cdejecter.lpi;3
Normal file
@@ -0,0 +1,127 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<AutoIncrementBuild Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="65"/>
|
||||||
|
<BuildNr Value="125"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 beta 1"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="2">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
<CommandLineParams Value="-h"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<Units Count="1">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
152
sources/cdejecter/__history/cdejecter.lpi;30
Normal file
152
sources/cdejecter/__history/cdejecter.lpi;30
Normal file
@@ -0,0 +1,152 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="80"/>
|
||||||
|
<BuildNr Value="200"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 RC"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="2">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
<CommandLineParams Value="/close"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="5">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
<Unit4>
|
||||||
|
<Filename Value="..\shared_units\cde_kernel.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit4>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
152
sources/cdejecter/__history/cdejecter.lpi;31
Normal file
152
sources/cdejecter/__history/cdejecter.lpi;31
Normal file
@@ -0,0 +1,152 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="80"/>
|
||||||
|
<BuildNr Value="200"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 RC"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="2">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
<CommandLineParams Value="/close"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="5">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
<Unit4>
|
||||||
|
<Filename Value="..\shared_units\cde_kernel.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit4>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
152
sources/cdejecter/__history/cdejecter.lpi;32
Normal file
152
sources/cdejecter/__history/cdejecter.lpi;32
Normal file
@@ -0,0 +1,152 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="80"/>
|
||||||
|
<BuildNr Value="200"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 RC"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="2">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
<CommandLineParams Value="/close"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="5">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
<Unit4>
|
||||||
|
<Filename Value="..\shared_units\cde_kernel.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit4>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
152
sources/cdejecter/__history/cdejecter.lpi;33
Normal file
152
sources/cdejecter/__history/cdejecter.lpi;33
Normal file
@@ -0,0 +1,152 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="80"/>
|
||||||
|
<BuildNr Value="200"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 RC"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="2">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
<CommandLineParams Value="/close"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="5">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
<Unit4>
|
||||||
|
<Filename Value="..\shared_units\cde_kernel.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit4>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
152
sources/cdejecter/__history/cdejecter.lpi;34
Normal file
152
sources/cdejecter/__history/cdejecter.lpi;34
Normal file
@@ -0,0 +1,152 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="80"/>
|
||||||
|
<BuildNr Value="200"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 RC"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="2">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
<CommandLineParams Value="/close"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="5">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
<Unit4>
|
||||||
|
<Filename Value="..\shared_units\cde_kernel.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit4>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
152
sources/cdejecter/__history/cdejecter.lpi;35
Normal file
152
sources/cdejecter/__history/cdejecter.lpi;35
Normal file
@@ -0,0 +1,152 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="80"/>
|
||||||
|
<BuildNr Value="200"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 RC"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="2">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
<CommandLineParams Value="/close"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="5">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
<Unit4>
|
||||||
|
<Filename Value="..\shared_units\cde_kernel.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit4>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
152
sources/cdejecter/__history/cdejecter.lpi;36
Normal file
152
sources/cdejecter/__history/cdejecter.lpi;36
Normal file
@@ -0,0 +1,152 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="80"/>
|
||||||
|
<BuildNr Value="200"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 RC"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="2">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
<CommandLineParams Value="/close"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="5">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
<Unit4>
|
||||||
|
<Filename Value="..\shared_units\cde_kernel.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit4>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
152
sources/cdejecter/__history/cdejecter.lpi;37
Normal file
152
sources/cdejecter/__history/cdejecter.lpi;37
Normal file
@@ -0,0 +1,152 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="80"/>
|
||||||
|
<BuildNr Value="200"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 RC"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="2">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
<CommandLineParams Value="/close"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="5">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
<Unit4>
|
||||||
|
<Filename Value="..\shared_units\cde_kernel.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit4>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
152
sources/cdejecter/__history/cdejecter.lpi;38
Normal file
152
sources/cdejecter/__history/cdejecter.lpi;38
Normal file
@@ -0,0 +1,152 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="80"/>
|
||||||
|
<BuildNr Value="200"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 RC"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="2">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
<CommandLineParams Value="/close"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="5">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
<Unit4>
|
||||||
|
<Filename Value="..\shared_units\cde_kernel.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit4>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
152
sources/cdejecter/__history/cdejecter.lpi;39
Normal file
152
sources/cdejecter/__history/cdejecter.lpi;39
Normal file
@@ -0,0 +1,152 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="80"/>
|
||||||
|
<BuildNr Value="200"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 RC"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="2">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
<CommandLineParams Value="/close"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="5">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
<Unit4>
|
||||||
|
<Filename Value="..\shared_units\cde_kernel.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit4>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
127
sources/cdejecter/__history/cdejecter.lpi;4
Normal file
127
sources/cdejecter/__history/cdejecter.lpi;4
Normal file
@@ -0,0 +1,127 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<AutoIncrementBuild Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="65"/>
|
||||||
|
<BuildNr Value="125"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 beta 1"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="2">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
<CommandLineParams Value="-h"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<Units Count="1">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
152
sources/cdejecter/__history/cdejecter.lpi;40
Normal file
152
sources/cdejecter/__history/cdejecter.lpi;40
Normal file
@@ -0,0 +1,152 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="80"/>
|
||||||
|
<BuildNr Value="200"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 RC"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="2">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
<CommandLineParams Value="/close"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="5">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
<Unit4>
|
||||||
|
<Filename Value="..\shared_units\cde_kernel.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit4>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
152
sources/cdejecter/__history/cdejecter.lpi;41
Normal file
152
sources/cdejecter/__history/cdejecter.lpi;41
Normal file
@@ -0,0 +1,152 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="80"/>
|
||||||
|
<BuildNr Value="200"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 RC"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="2">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
<CommandLineParams Value="/close"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="5">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
<Unit4>
|
||||||
|
<Filename Value="..\shared_units\cde_kernel.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit4>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
152
sources/cdejecter/__history/cdejecter.lpi;42
Normal file
152
sources/cdejecter/__history/cdejecter.lpi;42
Normal file
@@ -0,0 +1,152 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="80"/>
|
||||||
|
<BuildNr Value="200"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 RC"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="2">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
<CommandLineParams Value="/close"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="5">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
<Unit4>
|
||||||
|
<Filename Value="..\shared_units\cde_kernel.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit4>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
152
sources/cdejecter/__history/cdejecter.lpi;43
Normal file
152
sources/cdejecter/__history/cdejecter.lpi;43
Normal file
@@ -0,0 +1,152 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="80"/>
|
||||||
|
<BuildNr Value="200"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 RC"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="2">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
<CommandLineParams Value="/close"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="5">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
<Unit4>
|
||||||
|
<Filename Value="..\shared_units\cde_kernel.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit4>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
152
sources/cdejecter/__history/cdejecter.lpi;44
Normal file
152
sources/cdejecter/__history/cdejecter.lpi;44
Normal file
@@ -0,0 +1,152 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="80"/>
|
||||||
|
<BuildNr Value="200"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 RC"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="2">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
<CommandLineParams Value="/close"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="5">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
<Unit4>
|
||||||
|
<Filename Value="..\shared_units\cde_kernel.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit4>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
152
sources/cdejecter/__history/cdejecter.lpi;45
Normal file
152
sources/cdejecter/__history/cdejecter.lpi;45
Normal file
@@ -0,0 +1,152 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="80"/>
|
||||||
|
<BuildNr Value="200"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 RC"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="2">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
<CommandLineParams Value="/close"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="5">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
<Unit4>
|
||||||
|
<Filename Value="..\shared_units\cde_kernel.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit4>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
146
sources/cdejecter/__history/cdejecter.lpi;5
Normal file
146
sources/cdejecter/__history/cdejecter.lpi;5
Normal file
@@ -0,0 +1,146 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<AutoIncrementBuild Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="65"/>
|
||||||
|
<BuildNr Value="125"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 beta 1"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="2">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
<CommandLineParams Value="-h"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="1">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item1>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="4">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
149
sources/cdejecter/__history/cdejecter.lpi;6
Normal file
149
sources/cdejecter/__history/cdejecter.lpi;6
Normal file
@@ -0,0 +1,149 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<AutoIncrementBuild Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="65"/>
|
||||||
|
<BuildNr Value="125"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 beta 1"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="2">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
<CommandLineParams Value="-h"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="4">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
149
sources/cdejecter/__history/cdejecter.lpi;7
Normal file
149
sources/cdejecter/__history/cdejecter.lpi;7
Normal file
@@ -0,0 +1,149 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<AutoIncrementBuild Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="65"/>
|
||||||
|
<BuildNr Value="125"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 beta 1"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="2">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
<CommandLineParams Value="-h"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="4">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
148
sources/cdejecter/__history/cdejecter.lpi;8
Normal file
148
sources/cdejecter/__history/cdejecter.lpi;8
Normal file
@@ -0,0 +1,148 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<AutoIncrementBuild Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="65"/>
|
||||||
|
<BuildNr Value="125"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 beta 1"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="2">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="4">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
148
sources/cdejecter/__history/cdejecter.lpi;9
Normal file
148
sources/cdejecter/__history/cdejecter.lpi;9
Normal file
@@ -0,0 +1,148 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
|
<CONFIG>
|
||||||
|
<ProjectOptions>
|
||||||
|
<Version Value="10"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<General>
|
||||||
|
<Flags>
|
||||||
|
<MainUnitHasCreateFormStatements Value="False"/>
|
||||||
|
</Flags>
|
||||||
|
<SessionStorage Value="InProjectDir"/>
|
||||||
|
<MainUnit Value="0"/>
|
||||||
|
<Title Value="CD Ejecter"/>
|
||||||
|
<UseAppBundle Value="False"/>
|
||||||
|
<ResourceType Value="res"/>
|
||||||
|
<Icon Value="0"/>
|
||||||
|
</General>
|
||||||
|
<i18n>
|
||||||
|
<EnableI18N LFM="False"/>
|
||||||
|
</i18n>
|
||||||
|
<VersionInfo>
|
||||||
|
<UseVersionInfo Value="True"/>
|
||||||
|
<AutoIncrementBuild Value="True"/>
|
||||||
|
<MajorVersionNr Value="2"/>
|
||||||
|
<RevisionNr Value="65"/>
|
||||||
|
<BuildNr Value="126"/>
|
||||||
|
<Language Value="0419"/>
|
||||||
|
<StringTable Comments="(c) 2011 - 2017 by Alexander Babaev." CompanyName="Alexander Babaev" FileDescription="CD Ejecter Command - Line Tool" InternalName="CD Ejecter" LegalCopyright="Alexander Babaev" LegalTrademarks="Alexander Babaev" OriginalFilename="CD Ejecter" ProductName="CD Ejecter" ProductVersion="2.0 beta 1"/>
|
||||||
|
</VersionInfo>
|
||||||
|
<BuildModes Count="2">
|
||||||
|
<Item1 Name="Win32" Default="True"/>
|
||||||
|
<Item2 Name="Win64">
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win64\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win64"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="x86_64"/>
|
||||||
|
<TargetOS Value="win64"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
</Item2>
|
||||||
|
</BuildModes>
|
||||||
|
<PublishOptions>
|
||||||
|
<Version Value="2"/>
|
||||||
|
</PublishOptions>
|
||||||
|
<RunParams>
|
||||||
|
<local>
|
||||||
|
<FormatVersion Value="1"/>
|
||||||
|
</local>
|
||||||
|
</RunParams>
|
||||||
|
<RequiredPackages Count="2">
|
||||||
|
<Item1>
|
||||||
|
<PackageName Value="LCL"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<PackageName Value="ANBSTCP"/>
|
||||||
|
</Item2>
|
||||||
|
</RequiredPackages>
|
||||||
|
<Units Count="4">
|
||||||
|
<Unit0>
|
||||||
|
<Filename Value="cdejecter.lpr"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit0>
|
||||||
|
<Unit1>
|
||||||
|
<Filename Value="..\shared_units\cde_lang.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit1>
|
||||||
|
<Unit2>
|
||||||
|
<Filename Value="..\shared_units\cde_dir.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit2>
|
||||||
|
<Unit3>
|
||||||
|
<Filename Value="..\shared_units\cde_types.pas"/>
|
||||||
|
<IsPartOfProject Value="True"/>
|
||||||
|
</Unit3>
|
||||||
|
</Units>
|
||||||
|
</ProjectOptions>
|
||||||
|
<CompilerOptions>
|
||||||
|
<Version Value="11"/>
|
||||||
|
<PathDelim Value="\"/>
|
||||||
|
<Target>
|
||||||
|
<Filename Value="..\..\installed\Win32\bin\cdejecter"/>
|
||||||
|
</Target>
|
||||||
|
<SearchPaths>
|
||||||
|
<IncludeFiles Value="$(ProjOutDir)"/>
|
||||||
|
<OtherUnitFiles Value="..\shared_units"/>
|
||||||
|
<UnitOutputDirectory Value="data\lib\Win32"/>
|
||||||
|
</SearchPaths>
|
||||||
|
<Parsing>
|
||||||
|
<SyntaxOptions>
|
||||||
|
<SyntaxMode Value="Delphi"/>
|
||||||
|
</SyntaxOptions>
|
||||||
|
</Parsing>
|
||||||
|
<CodeGeneration>
|
||||||
|
<SmartLinkUnit Value="True"/>
|
||||||
|
<TargetCPU Value="i386"/>
|
||||||
|
<TargetOS Value="win32"/>
|
||||||
|
<Optimizations>
|
||||||
|
<OptimizationLevel Value="4"/>
|
||||||
|
</Optimizations>
|
||||||
|
<SmallerCode Value="True"/>
|
||||||
|
</CodeGeneration>
|
||||||
|
<Linking>
|
||||||
|
<Debugging>
|
||||||
|
<StripSymbols Value="True"/>
|
||||||
|
<UseExternalDbgSyms Value="True"/>
|
||||||
|
</Debugging>
|
||||||
|
<LinkSmart Value="True"/>
|
||||||
|
</Linking>
|
||||||
|
</CompilerOptions>
|
||||||
|
<Debugging>
|
||||||
|
<Exceptions Count="3">
|
||||||
|
<Item1>
|
||||||
|
<Name Value="EAbort"/>
|
||||||
|
</Item1>
|
||||||
|
<Item2>
|
||||||
|
<Name Value="ECodetoolError"/>
|
||||||
|
</Item2>
|
||||||
|
<Item3>
|
||||||
|
<Name Value="EFOpenError"/>
|
||||||
|
</Item3>
|
||||||
|
</Exceptions>
|
||||||
|
</Debugging>
|
||||||
|
</CONFIG>
|
||||||
64
sources/cdejecter/__history/cdejecter.lpr;1
Normal file
64
sources/cdejecter/__history/cdejecter.lpr;1
Normal file
@@ -0,0 +1,64 @@
|
|||||||
|
program cdejecter;
|
||||||
|
{$mode delphi}
|
||||||
|
{$codepage UTF8}
|
||||||
|
uses {$IFDEF UNIX}{$IFDEF UseCThreads}cthreads,{$ENDIF}{$ENDIF} Classes, SysUtils, CustApp;
|
||||||
|
type
|
||||||
|
{ TCDEjecter }
|
||||||
|
TCDEjecter = class(TCustomApplication)
|
||||||
|
protected
|
||||||
|
procedure DoRun; override;
|
||||||
|
public
|
||||||
|
constructor Create(TheOwner: TComponent); override;
|
||||||
|
destructor Destroy; override;
|
||||||
|
procedure WriteHelp; virtual;
|
||||||
|
end;
|
||||||
|
{ TCDEjecter }
|
||||||
|
procedure TCDEjecter.DoRun;
|
||||||
|
var
|
||||||
|
ErrorMsg: String;
|
||||||
|
begin
|
||||||
|
// quick check parameters
|
||||||
|
ErrorMsg:= CheckOptions('h', 'help');
|
||||||
|
if ErrorMsg <>'' then begin
|
||||||
|
ShowException(Exception.Create(ErrorMsg));
|
||||||
|
Terminate;
|
||||||
|
Exit;
|
||||||
|
end;
|
||||||
|
|
||||||
|
// parse parameters
|
||||||
|
if HasOption('h', 'help') then begin
|
||||||
|
WriteHelp;
|
||||||
|
Terminate;
|
||||||
|
Exit;
|
||||||
|
end;
|
||||||
|
|
||||||
|
{ add your program here }
|
||||||
|
|
||||||
|
// stop program loop
|
||||||
|
Terminate;
|
||||||
|
end;
|
||||||
|
constructor TCDEjecter.Create(TheOwner: TComponent);
|
||||||
|
begin
|
||||||
|
inherited Create (TheOwner);
|
||||||
|
StopOnException:= True;
|
||||||
|
end;
|
||||||
|
destructor TCDEjecter.Destroy;
|
||||||
|
begin
|
||||||
|
inherited Destroy;
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.WriteHelp;
|
||||||
|
begin
|
||||||
|
WriteLn('DEMO!');
|
||||||
|
writeln('Usage: ', ExeName, ' -h');
|
||||||
|
end;
|
||||||
|
var Application: TCDEjecter;
|
||||||
|
|
||||||
|
{$R *.res}
|
||||||
|
|
||||||
|
begin
|
||||||
|
Application:= TCDEjecter.Create(Nil);
|
||||||
|
Application.Title:= 'CD Ejecter';
|
||||||
|
Application.Run;
|
||||||
|
Application.Free;
|
||||||
|
end.
|
||||||
|
|
||||||
145
sources/cdejecter/__history/cdejecter.lpr;10
Normal file
145
sources/cdejecter/__history/cdejecter.lpr;10
Normal file
@@ -0,0 +1,145 @@
|
|||||||
|
program cdejecter;
|
||||||
|
{$mode delphi}
|
||||||
|
{$codepage UTF8}
|
||||||
|
uses Interfaces, {$IFDEF UNIX}{$IFDEF UseCThreads}cthreads,{$ENDIF}{$ENDIF} Classes, SysUtils, CustApp, ANBFormatString,
|
||||||
|
cde_lang, dynlibs, cde_types;
|
||||||
|
type
|
||||||
|
{ TCDEjecter }
|
||||||
|
TCDEjecter = class(TCustomApplication)
|
||||||
|
protected
|
||||||
|
procedure DoRun; override;
|
||||||
|
public
|
||||||
|
constructor Create(TheOwner: TComponent); OVERRIDE;
|
||||||
|
destructor Destroy; OVERRIDE;
|
||||||
|
procedure WriteHelp; VIRTUAL;
|
||||||
|
procedure ListDiscs (const Extendend: Boolean);
|
||||||
|
function FormatDiscInfo (const AString: String; const AInfo: TDiscInfo): String;
|
||||||
|
procedure ShowDiscInfo (const ADisc: String);
|
||||||
|
procedure EjectDisc (const ADisc: String);
|
||||||
|
end;
|
||||||
|
{ TCDEjecter }
|
||||||
|
procedure TCDEjecter.DoRun;
|
||||||
|
var isHandled: Boolean;
|
||||||
|
begin
|
||||||
|
WriteLn('--------------------------------------------------------------------');
|
||||||
|
WriteLn('**************************** CD Ejecter ****************************');
|
||||||
|
WriteLn('*************************** Версия: 1.2 ***************************');
|
||||||
|
WriteLn('******* Авторские права (c) 2011 - 2017, Александр Бабаев **********');
|
||||||
|
WriteLn('--------------------------------------------------------------------');
|
||||||
|
|
||||||
|
|
||||||
|
{ add your program here }
|
||||||
|
|
||||||
|
// stop program loop
|
||||||
|
Terminate;
|
||||||
|
end;
|
||||||
|
constructor TCDEjecter.Create(TheOwner: TComponent);
|
||||||
|
begin
|
||||||
|
inherited Create (TheOwner);
|
||||||
|
StopOnException:= True;
|
||||||
|
end;
|
||||||
|
destructor TCDEjecter.Destroy;
|
||||||
|
begin
|
||||||
|
inherited Destroy;
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.WriteHelp;
|
||||||
|
begin
|
||||||
|
writeln(FormatStr(GetLocalizedString(cde_messages_help), ['$newline$'], [#13#10]));
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.ListDiscs (const Extendend: Boolean);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
GetCDDiscs: function: PChar;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
SL: TStringListUTF8;
|
||||||
|
Msg: String;
|
||||||
|
Indx: Integer;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
Msg:= '';
|
||||||
|
SL:= TStringListUTF8.Create;
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetCDDiscs:= GetProcAddress(DLL, 'GetCDDiscs');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
SL.Delimiter:= ';';
|
||||||
|
SL.DelimitedText:= GetCDDiscs;
|
||||||
|
if SL.Count > 0 then
|
||||||
|
for Indx:= 0 to SL.Count - 1 do
|
||||||
|
begin
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(SL[Indx][1]));
|
||||||
|
if not (Trim(Msg) = '') then
|
||||||
|
Msg:= Msg + #13#10;
|
||||||
|
Msg:= Msg + SL[Indx];
|
||||||
|
if Extendend then
|
||||||
|
if DInfo.diHasInfo then
|
||||||
|
Msg:= Msg + ' - ' + DInfo.diVolumeName
|
||||||
|
else
|
||||||
|
Msg:= Msg + ' - ' + GetLocalizedString(cde_messages_nodiscorempty);
|
||||||
|
end;
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
SL.Free;
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_discslist));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
function TCDEjecter.FormatDiscInfo (const AString: String; const AInfo: TDiscInfo): String;
|
||||||
|
begin
|
||||||
|
Result:= FormatStr(AString,
|
||||||
|
['$newline$',
|
||||||
|
'$letter$',
|
||||||
|
'$volumename$',
|
||||||
|
'$filesystem$',
|
||||||
|
'$serial$'
|
||||||
|
],
|
||||||
|
[#13#10,
|
||||||
|
AInfo.diDrive,
|
||||||
|
AInfo.diVolumeName,
|
||||||
|
AInfo.diFileSystem,
|
||||||
|
IntToStr(AInfo.diSerial)
|
||||||
|
]);
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.ShowDiscInfo (const ADisc: String);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
Msg: String;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(ADisc[1]));
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
if DInfo.diHasInfo then
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_discdesc), DInfo)
|
||||||
|
else
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_discdesconerror), DInfo);
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_discinfo));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.EjectDisc (const ADisc: String);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
EjectCD: function (const ADisc: WideChar): Boolean;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
Msg: String;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
EjectCD:= GetProcAddress(DLL, 'EjectCD');
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(ADisc[1]));
|
||||||
|
if EjectCD (WideChar(ADisc[1])) then
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_ejectsuccess), DInfo)
|
||||||
|
else
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_ejecterror), DInfo);
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
if not HasParam('silent') then
|
||||||
|
begin
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_ejecttitle));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
var Application: TCDEjecter;
|
||||||
|
{$R *.res}
|
||||||
|
begin
|
||||||
|
Application:= TCDEjecter.Create(Nil);
|
||||||
|
Application.Title:= 'CD Ejecter';
|
||||||
|
Application.Run;
|
||||||
|
Application.Free;
|
||||||
|
end.
|
||||||
164
sources/cdejecter/__history/cdejecter.lpr;11
Normal file
164
sources/cdejecter/__history/cdejecter.lpr;11
Normal file
@@ -0,0 +1,164 @@
|
|||||||
|
program cdejecter;
|
||||||
|
{$mode delphi}
|
||||||
|
{$codepage UTF8}
|
||||||
|
uses Interfaces, {$IFDEF UNIX}{$IFDEF UseCThreads}cthreads,{$ENDIF}{$ENDIF} Classes, SysUtils, CustApp, ANBFormatString,
|
||||||
|
cde_lang, dynlibs, cde_types;
|
||||||
|
type
|
||||||
|
{ TCDEjecter }
|
||||||
|
TCDEjecter = class(TCustomApplication)
|
||||||
|
protected
|
||||||
|
procedure DoRun; override;
|
||||||
|
public
|
||||||
|
constructor Create(TheOwner: TComponent); OVERRIDE;
|
||||||
|
destructor Destroy; OVERRIDE;
|
||||||
|
procedure WriteHelp; VIRTUAL;
|
||||||
|
procedure ListDiscs (const Extendend: Boolean);
|
||||||
|
function FormatDiscInfo (const AString: String; const AInfo: TDiscInfo): String;
|
||||||
|
procedure ShowDiscInfo (const ADisc: String);
|
||||||
|
procedure EjectDisc (const ADisc: String);
|
||||||
|
end;
|
||||||
|
{ TCDEjecter }
|
||||||
|
procedure TCDEjecter.DoRun;
|
||||||
|
var isHandled: Boolean;
|
||||||
|
begin
|
||||||
|
WriteLn('--------------------------------------------------------------------');
|
||||||
|
WriteLn('**************************** CD Ejecter ****************************');
|
||||||
|
WriteLn('*************************** Версия: 1.2 ***************************');
|
||||||
|
WriteLn('******* Авторские права (c) 2011 - 2017, Александр Бабаев **********');
|
||||||
|
WriteLn('--------------------------------------------------------------------');
|
||||||
|
isHandled:= False;
|
||||||
|
if HasParam('list') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ListDiscs(False);
|
||||||
|
end;
|
||||||
|
if HasParam('listex') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ListDiscs(True);
|
||||||
|
end;
|
||||||
|
if HasParam('info') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ShowDiscInfo(GetParamValue('info'));
|
||||||
|
end;
|
||||||
|
if HasParam('eject') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
EjectDisc(GetParamValue('eject'));
|
||||||
|
end;
|
||||||
|
if not isHandled then
|
||||||
|
WriteHelp;
|
||||||
|
// stop program loop
|
||||||
|
Terminate;
|
||||||
|
end;
|
||||||
|
constructor TCDEjecter.Create(TheOwner: TComponent);
|
||||||
|
begin
|
||||||
|
inherited Create (TheOwner);
|
||||||
|
StopOnException:= True;
|
||||||
|
end;
|
||||||
|
destructor TCDEjecter.Destroy;
|
||||||
|
begin
|
||||||
|
inherited Destroy;
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.WriteHelp;
|
||||||
|
begin
|
||||||
|
writeln(FormatStr(GetLocalizedString(cde_messages_help), ['$newline$'], [#13#10]));
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.ListDiscs (const Extendend: Boolean);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
GetCDDiscs: function: PChar;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
SL: TStringListUTF8;
|
||||||
|
Msg: String;
|
||||||
|
Indx: Integer;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
Msg:= '';
|
||||||
|
SL:= TStringListUTF8.Create;
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetCDDiscs:= GetProcAddress(DLL, 'GetCDDiscs');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
SL.Delimiter:= ';';
|
||||||
|
SL.DelimitedText:= GetCDDiscs;
|
||||||
|
if SL.Count > 0 then
|
||||||
|
for Indx:= 0 to SL.Count - 1 do
|
||||||
|
begin
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(SL[Indx][1]));
|
||||||
|
if not (Trim(Msg) = '') then
|
||||||
|
Msg:= Msg + #13#10;
|
||||||
|
Msg:= Msg + SL[Indx];
|
||||||
|
if Extendend then
|
||||||
|
if DInfo.diHasInfo then
|
||||||
|
Msg:= Msg + ' - ' + DInfo.diVolumeName
|
||||||
|
else
|
||||||
|
Msg:= Msg + ' - ' + GetLocalizedString(cde_messages_nodiscorempty);
|
||||||
|
end;
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
SL.Free;
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_discslist));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
function TCDEjecter.FormatDiscInfo (const AString: String; const AInfo: TDiscInfo): String;
|
||||||
|
begin
|
||||||
|
Result:= FormatStr(AString,
|
||||||
|
['$newline$',
|
||||||
|
'$letter$',
|
||||||
|
'$volumename$',
|
||||||
|
'$filesystem$',
|
||||||
|
'$serial$'
|
||||||
|
],
|
||||||
|
[#13#10,
|
||||||
|
AInfo.diDrive,
|
||||||
|
AInfo.diVolumeName,
|
||||||
|
AInfo.diFileSystem,
|
||||||
|
IntToStr(AInfo.diSerial)
|
||||||
|
]);
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.ShowDiscInfo (const ADisc: String);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
Msg: String;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(ADisc[1]));
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
if DInfo.diHasInfo then
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_discdesc), DInfo)
|
||||||
|
else
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_discdesconerror), DInfo);
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_discinfo));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.EjectDisc (const ADisc: String);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
EjectCD: function (const ADisc: WideChar): Boolean;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
Msg: String;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
EjectCD:= GetProcAddress(DLL, 'EjectCD');
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(ADisc[1]));
|
||||||
|
if EjectCD (WideChar(ADisc[1])) then
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_ejectsuccess), DInfo)
|
||||||
|
else
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_ejecterror), DInfo);
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
if not HasParam('silent') then
|
||||||
|
begin
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_ejecttitle));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
var Application: TCDEjecter;
|
||||||
|
{$R *.res}
|
||||||
|
begin
|
||||||
|
Application:= TCDEjecter.Create(Nil);
|
||||||
|
Application.Title:= 'CD Ejecter';
|
||||||
|
Application.Run;
|
||||||
|
Application.Free;
|
||||||
|
end.
|
||||||
164
sources/cdejecter/__history/cdejecter.lpr;12
Normal file
164
sources/cdejecter/__history/cdejecter.lpr;12
Normal file
@@ -0,0 +1,164 @@
|
|||||||
|
program cdejecter;
|
||||||
|
{$mode delphi}
|
||||||
|
{$codepage UTF8}
|
||||||
|
uses Interfaces, {$IFDEF UNIX}{$IFDEF UseCThreads}cthreads,{$ENDIF}{$ENDIF} Classes, SysUtils, CustApp, ANBFormatString,
|
||||||
|
cde_lang, dynlibs, cde_types, LazUTF8Classes, ParamsMngr;
|
||||||
|
type
|
||||||
|
{ TCDEjecter }
|
||||||
|
TCDEjecter = class(TCustomApplication)
|
||||||
|
protected
|
||||||
|
procedure DoRun; override;
|
||||||
|
public
|
||||||
|
constructor Create(TheOwner: TComponent); OVERRIDE;
|
||||||
|
destructor Destroy; OVERRIDE;
|
||||||
|
procedure WriteHelp; VIRTUAL;
|
||||||
|
procedure ListDiscs (const Extendend: Boolean);
|
||||||
|
function FormatDiscInfo (const AString: String; const AInfo: TDiscInfo): String;
|
||||||
|
procedure ShowDiscInfo (const ADisc: String);
|
||||||
|
procedure EjectDisc (const ADisc: String);
|
||||||
|
end;
|
||||||
|
{ TCDEjecter }
|
||||||
|
procedure TCDEjecter.DoRun;
|
||||||
|
var isHandled: Boolean;
|
||||||
|
begin
|
||||||
|
WriteLn('--------------------------------------------------------------------');
|
||||||
|
WriteLn('**************************** CD Ejecter ****************************');
|
||||||
|
WriteLn('*************************** Версия: 1.2 ***************************');
|
||||||
|
WriteLn('******* Авторские права (c) 2011 - 2017, Александр Бабаев **********');
|
||||||
|
WriteLn('--------------------------------------------------------------------');
|
||||||
|
isHandled:= False;
|
||||||
|
if HasParam('list') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ListDiscs(False);
|
||||||
|
end;
|
||||||
|
if HasParam('listex') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ListDiscs(True);
|
||||||
|
end;
|
||||||
|
if HasParam('info') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ShowDiscInfo(GetParamValue('info'));
|
||||||
|
end;
|
||||||
|
if HasParam('eject') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
EjectDisc(GetParamValue('eject'));
|
||||||
|
end;
|
||||||
|
if not isHandled then
|
||||||
|
WriteHelp;
|
||||||
|
// stop program loop
|
||||||
|
Terminate;
|
||||||
|
end;
|
||||||
|
constructor TCDEjecter.Create(TheOwner: TComponent);
|
||||||
|
begin
|
||||||
|
inherited Create (TheOwner);
|
||||||
|
StopOnException:= True;
|
||||||
|
end;
|
||||||
|
destructor TCDEjecter.Destroy;
|
||||||
|
begin
|
||||||
|
inherited Destroy;
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.WriteHelp;
|
||||||
|
begin
|
||||||
|
writeln(FormatStr(GetLocalizedString(cde_messages_help), ['$newline$'], [#13#10]));
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.ListDiscs (const Extendend: Boolean);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
GetCDDiscs: function: PChar;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
SL: TStringListUTF8;
|
||||||
|
Msg: String;
|
||||||
|
Indx: Integer;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
Msg:= '';
|
||||||
|
SL:= TStringListUTF8.Create;
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetCDDiscs:= GetProcAddress(DLL, 'GetCDDiscs');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
SL.Delimiter:= ';';
|
||||||
|
SL.DelimitedText:= GetCDDiscs;
|
||||||
|
if SL.Count > 0 then
|
||||||
|
for Indx:= 0 to SL.Count - 1 do
|
||||||
|
begin
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(SL[Indx][1]));
|
||||||
|
if not (Trim(Msg) = '') then
|
||||||
|
Msg:= Msg + #13#10;
|
||||||
|
Msg:= Msg + SL[Indx];
|
||||||
|
if Extendend then
|
||||||
|
if DInfo.diHasInfo then
|
||||||
|
Msg:= Msg + ' - ' + DInfo.diVolumeName
|
||||||
|
else
|
||||||
|
Msg:= Msg + ' - ' + GetLocalizedString(cde_messages_nodiscorempty);
|
||||||
|
end;
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
SL.Free;
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_discslist));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
function TCDEjecter.FormatDiscInfo (const AString: String; const AInfo: TDiscInfo): String;
|
||||||
|
begin
|
||||||
|
Result:= FormatStr(AString,
|
||||||
|
['$newline$',
|
||||||
|
'$letter$',
|
||||||
|
'$volumename$',
|
||||||
|
'$filesystem$',
|
||||||
|
'$serial$'
|
||||||
|
],
|
||||||
|
[#13#10,
|
||||||
|
AInfo.diDrive,
|
||||||
|
AInfo.diVolumeName,
|
||||||
|
AInfo.diFileSystem,
|
||||||
|
IntToStr(AInfo.diSerial)
|
||||||
|
]);
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.ShowDiscInfo (const ADisc: String);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
Msg: String;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(ADisc[1]));
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
if DInfo.diHasInfo then
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_discdesc), DInfo)
|
||||||
|
else
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_discdesconerror), DInfo);
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_discinfo));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.EjectDisc (const ADisc: String);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
EjectCD: function (const ADisc: WideChar): Boolean;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
Msg: String;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
EjectCD:= GetProcAddress(DLL, 'EjectCD');
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(ADisc[1]));
|
||||||
|
if EjectCD (WideChar(ADisc[1])) then
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_ejectsuccess), DInfo)
|
||||||
|
else
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_ejecterror), DInfo);
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
if not HasParam('silent') then
|
||||||
|
begin
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_ejecttitle));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
var Application: TCDEjecter;
|
||||||
|
{$R *.res}
|
||||||
|
begin
|
||||||
|
Application:= TCDEjecter.Create(Nil);
|
||||||
|
Application.Title:= 'CD Ejecter';
|
||||||
|
Application.Run;
|
||||||
|
Application.Free;
|
||||||
|
end.
|
||||||
164
sources/cdejecter/__history/cdejecter.lpr;13
Normal file
164
sources/cdejecter/__history/cdejecter.lpr;13
Normal file
@@ -0,0 +1,164 @@
|
|||||||
|
program cdejecter;
|
||||||
|
{$mode delphi}
|
||||||
|
{$codepage UTF8}
|
||||||
|
uses Interfaces, {$IFDEF UNIX}{$IFDEF UseCThreads}cthreads,{$ENDIF}{$ENDIF} Classes, SysUtils, CustApp, ANBFormatString,
|
||||||
|
cde_lang, dynlibs, cde_types, LazUTF8Classes, ParamsMngr;
|
||||||
|
type
|
||||||
|
{ TCDEjecter }
|
||||||
|
TCDEjecter = class(TCustomApplication)
|
||||||
|
protected
|
||||||
|
procedure DoRun; override;
|
||||||
|
public
|
||||||
|
constructor Create(TheOwner: TComponent); OVERRIDE;
|
||||||
|
destructor Destroy; OVERRIDE;
|
||||||
|
procedure WriteHelp; VIRTUAL;
|
||||||
|
procedure ListDiscs (const Extendend: Boolean);
|
||||||
|
function FormatDiscInfo (const AString: String; const AInfo: TDiscInfo): String;
|
||||||
|
procedure ShowDiscInfo (const ADisc: String);
|
||||||
|
procedure EjectDisc (const ADisc: String);
|
||||||
|
end;
|
||||||
|
{ TCDEjecter }
|
||||||
|
procedure TCDEjecter.DoRun;
|
||||||
|
var isHandled: Boolean;
|
||||||
|
begin
|
||||||
|
WriteLn('--------------------------------------------------------------------');
|
||||||
|
WriteLn('**************************** CD Ejecter ****************************');
|
||||||
|
WriteLn('*************************** Версия: 1.2 ***************************');
|
||||||
|
WriteLn('******* Авторские права (c) 2011 - 2017, Александр Бабаев **********');
|
||||||
|
WriteLn('--------------------------------------------------------------------');
|
||||||
|
isHandled:= False;
|
||||||
|
if HasParam('list') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ListDiscs(False);
|
||||||
|
end;
|
||||||
|
if HasParam('listex') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ListDiscs(True);
|
||||||
|
end;
|
||||||
|
if HasParam('info') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ShowDiscInfo(GetParamValue('info'));
|
||||||
|
end;
|
||||||
|
if HasParam('eject') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
EjectDisc(GetParamValue('eject'));
|
||||||
|
end;
|
||||||
|
if not isHandled then
|
||||||
|
WriteHelp;
|
||||||
|
// stop program loop
|
||||||
|
Terminate;
|
||||||
|
end;
|
||||||
|
constructor TCDEjecter.Create(TheOwner: TComponent);
|
||||||
|
begin
|
||||||
|
inherited Create (TheOwner);
|
||||||
|
StopOnException:= True;
|
||||||
|
end;
|
||||||
|
destructor TCDEjecter.Destroy;
|
||||||
|
begin
|
||||||
|
inherited Destroy;
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.WriteHelp;
|
||||||
|
begin
|
||||||
|
writeln(FormatStr(GetLocalizedString(cde_messages_help), ['$newline$'], [#13#10]));
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.ListDiscs (const Extendend: Boolean);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
GetCDDiscs: function: PChar;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
SL: TStringListUTF8;
|
||||||
|
Msg: String;
|
||||||
|
Indx: Integer;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
Msg:= '';
|
||||||
|
SL:= TStringListUTF8.Create;
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetCDDiscs:= GetProcAddress(DLL, 'GetCDDiscs');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
SL.Delimiter:= ';';
|
||||||
|
SL.DelimitedText:= GetCDDiscs;
|
||||||
|
if SL.Count > 0 then
|
||||||
|
for Indx:= 0 to SL.Count - 1 do
|
||||||
|
begin
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(SL[Indx][1]));
|
||||||
|
if not (Trim(Msg) = '') then
|
||||||
|
Msg:= Msg + #13#10;
|
||||||
|
Msg:= Msg + SL[Indx];
|
||||||
|
if Extendend then
|
||||||
|
if DInfo.diHasInfo then
|
||||||
|
Msg:= Msg + ' - ' + DInfo.diVolumeName
|
||||||
|
else
|
||||||
|
Msg:= Msg + ' - ' + GetLocalizedString(cde_messages_nodiscorempty);
|
||||||
|
end;
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
SL.Free;
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_discslist));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
function TCDEjecter.FormatDiscInfo (const AString: String; const AInfo: TDiscInfo): String;
|
||||||
|
begin
|
||||||
|
Result:= FormatStr(AString,
|
||||||
|
['$newline$',
|
||||||
|
'$letter$',
|
||||||
|
'$volumename$',
|
||||||
|
'$filesystem$',
|
||||||
|
'$serial$'
|
||||||
|
],
|
||||||
|
[#13#10,
|
||||||
|
AInfo.diDrive,
|
||||||
|
AInfo.diVolumeName,
|
||||||
|
AInfo.diFileSystem,
|
||||||
|
IntToStr(AInfo.diSerial)
|
||||||
|
]);
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.ShowDiscInfo (const ADisc: String);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
Msg: String;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(ADisc[1]));
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
if DInfo.diHasInfo then
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_discdesc), DInfo)
|
||||||
|
else
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_discdesconerror), DInfo);
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_discinfo));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.EjectDisc (const ADisc: String);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
EjectCD: function (const ADisc: WideChar): Boolean;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
Msg: String;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
EjectCD:= GetProcAddress(DLL, 'EjectCD');
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(ADisc[1]));
|
||||||
|
if not EjectCD (WideChar(ADisc[1])) then
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_ejectsuccess), DInfo)
|
||||||
|
else
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_ejecterror), DInfo);
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
if not HasParam('silent') then
|
||||||
|
begin
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_ejecttitle));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
var Application: TCDEjecter;
|
||||||
|
{$R *.res}
|
||||||
|
begin
|
||||||
|
Application:= TCDEjecter.Create(Nil);
|
||||||
|
Application.Title:= 'CD Ejecter';
|
||||||
|
Application.Run;
|
||||||
|
Application.Free;
|
||||||
|
end.
|
||||||
164
sources/cdejecter/__history/cdejecter.lpr;14
Normal file
164
sources/cdejecter/__history/cdejecter.lpr;14
Normal file
@@ -0,0 +1,164 @@
|
|||||||
|
program cdejecter;
|
||||||
|
{$mode delphi}
|
||||||
|
{$codepage UTF8}
|
||||||
|
uses Interfaces, {$IFDEF UNIX}{$IFDEF UseCThreads}cthreads,{$ENDIF}{$ENDIF} Classes, SysUtils, CustApp, ANBFormatString,
|
||||||
|
cde_lang, dynlibs, cde_types, LazUTF8Classes, ParamsMngr;
|
||||||
|
type
|
||||||
|
{ TCDEjecter }
|
||||||
|
TCDEjecter = class(TCustomApplication)
|
||||||
|
protected
|
||||||
|
procedure DoRun; override;
|
||||||
|
public
|
||||||
|
constructor Create(TheOwner: TComponent); OVERRIDE;
|
||||||
|
destructor Destroy; OVERRIDE;
|
||||||
|
procedure WriteHelp; VIRTUAL;
|
||||||
|
procedure ListDiscs (const Extendend: Boolean);
|
||||||
|
function FormatDiscInfo (const AString: String; const AInfo: TDiscInfo): String;
|
||||||
|
procedure ShowDiscInfo (const ADisc: String);
|
||||||
|
procedure EjectDisc (const ADisc: String);
|
||||||
|
end;
|
||||||
|
{ TCDEjecter }
|
||||||
|
procedure TCDEjecter.DoRun;
|
||||||
|
var isHandled: Boolean;
|
||||||
|
begin
|
||||||
|
WriteLn('--------------------------------------------------------------------');
|
||||||
|
WriteLn('**************************** CD Ejecter ****************************');
|
||||||
|
WriteLn('*************************** Версия: 1.2 ***************************');
|
||||||
|
WriteLn('******* Авторские права (c) 2011 - 2017, Александр Бабаев **********');
|
||||||
|
WriteLn('--------------------------------------------------------------------');
|
||||||
|
isHandled:= False;
|
||||||
|
if HasParam('list') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ListDiscs(False);
|
||||||
|
end;
|
||||||
|
if HasParam('listex') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ListDiscs(True);
|
||||||
|
end;
|
||||||
|
if HasParam('info') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ShowDiscInfo(GetParamValue('info'));
|
||||||
|
end;
|
||||||
|
if HasParam('eject') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
EjectDisc(GetParamValue('eject'));
|
||||||
|
end;
|
||||||
|
if not isHandled then
|
||||||
|
WriteHelp;
|
||||||
|
// stop program loop
|
||||||
|
Terminate;
|
||||||
|
end;
|
||||||
|
constructor TCDEjecter.Create(TheOwner: TComponent);
|
||||||
|
begin
|
||||||
|
inherited Create (TheOwner);
|
||||||
|
StopOnException:= True;
|
||||||
|
end;
|
||||||
|
destructor TCDEjecter.Destroy;
|
||||||
|
begin
|
||||||
|
inherited Destroy;
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.WriteHelp;
|
||||||
|
begin
|
||||||
|
writeln(FormatStr(GetLocalizedString(cde_messages_help), ['$newline$'], [#13#10]));
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.ListDiscs (const Extendend: Boolean);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
GetCDDiscs: function: PChar;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
SL: TStringListUTF8;
|
||||||
|
Msg: String;
|
||||||
|
Indx: Integer;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
Msg:= '';
|
||||||
|
SL:= TStringListUTF8.Create;
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetCDDiscs:= GetProcAddress(DLL, 'GetCDDiscs');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
SL.Delimiter:= ';';
|
||||||
|
SL.DelimitedText:= GetCDDiscs;
|
||||||
|
if SL.Count > 0 then
|
||||||
|
for Indx:= 0 to SL.Count - 1 do
|
||||||
|
begin
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(SL[Indx][1]));
|
||||||
|
if not (Trim(Msg) = '') then
|
||||||
|
Msg:= Msg + #13#10;
|
||||||
|
Msg:= Msg + SL[Indx];
|
||||||
|
if Extendend then
|
||||||
|
if DInfo.diHasInfo then
|
||||||
|
Msg:= Msg + ' - ' + DInfo.diVolumeName
|
||||||
|
else
|
||||||
|
Msg:= Msg + ' - ' + GetLocalizedString(cde_messages_nodiscorempty);
|
||||||
|
end;
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
SL.Free;
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_discslist));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
function TCDEjecter.FormatDiscInfo (const AString: String; const AInfo: TDiscInfo): String;
|
||||||
|
begin
|
||||||
|
Result:= FormatStr(AString,
|
||||||
|
['$newline$',
|
||||||
|
'$letter$',
|
||||||
|
'$volumename$',
|
||||||
|
'$filesystem$',
|
||||||
|
'$serial$'
|
||||||
|
],
|
||||||
|
[#13#10,
|
||||||
|
AInfo.diDrive,
|
||||||
|
AInfo.diVolumeName,
|
||||||
|
AInfo.diFileSystem,
|
||||||
|
IntToStr(AInfo.diSerial)
|
||||||
|
]);
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.ShowDiscInfo (const ADisc: String);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
Msg: String;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(ADisc[1]));
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
if DInfo.diHasInfo then
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_discdesc), DInfo)
|
||||||
|
else
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_discdesconerror), DInfo);
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_discinfo));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.EjectDisc (const ADisc: String);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
EjectCD: function (const ADisc: WideChar): Boolean;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
Msg: String;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
EjectCD:= GetProcAddress(DLL, 'EjectCD');
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(ADisc[1]));
|
||||||
|
if EjectCD (WideChar(ADisc[1])) then
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_ejectsuccess), DInfo)
|
||||||
|
else
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_ejecterror), DInfo);
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
if not HasParam('silent') then
|
||||||
|
begin
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_ejecttitle));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
var Application: TCDEjecter;
|
||||||
|
{$R *.res}
|
||||||
|
begin
|
||||||
|
Application:= TCDEjecter.Create(Nil);
|
||||||
|
Application.Title:= 'CD Ejecter';
|
||||||
|
Application.Run;
|
||||||
|
Application.Free;
|
||||||
|
end.
|
||||||
164
sources/cdejecter/__history/cdejecter.lpr;15
Normal file
164
sources/cdejecter/__history/cdejecter.lpr;15
Normal file
@@ -0,0 +1,164 @@
|
|||||||
|
program cdejecter;
|
||||||
|
{$mode delphi}
|
||||||
|
{$codepage UTF8}
|
||||||
|
uses Interfaces, {$IFDEF UNIX}{$IFDEF UseCThreads}cthreads,{$ENDIF}{$ENDIF} Classes, SysUtils, CustApp, ANBFormatString,
|
||||||
|
cde_lang, dynlibs, cde_types, LazUTF8Classes, ParamsMngr;
|
||||||
|
type
|
||||||
|
{ TCDEjecter }
|
||||||
|
TCDEjecter = class(TCustomApplication)
|
||||||
|
protected
|
||||||
|
procedure DoRun; override;
|
||||||
|
public
|
||||||
|
constructor Create(TheOwner: TComponent); OVERRIDE;
|
||||||
|
destructor Destroy; OVERRIDE;
|
||||||
|
procedure WriteHelp; VIRTUAL;
|
||||||
|
procedure ListDiscs (const Extendend: Boolean);
|
||||||
|
function FormatDiscInfo (const AString: String; const AInfo: TDiscInfo): String;
|
||||||
|
procedure ShowDiscInfo (const ADisc: String);
|
||||||
|
procedure EjectDisc (const ADisc: String);
|
||||||
|
end;
|
||||||
|
{ TCDEjecter }
|
||||||
|
procedure TCDEjecter.DoRun;
|
||||||
|
var isHandled: Boolean;
|
||||||
|
begin
|
||||||
|
WriteLn('--------------------------------------------------------------------');
|
||||||
|
WriteLn('**************************** CD Ejecter ****************************');
|
||||||
|
WriteLn('*************************** ' + GetLocalizedString(cde_version) + ' 1.2 ***************************');
|
||||||
|
WriteLn('******* ' + FormatStr(GetLocalizedString(cde_copyrights), ['$DEVYEARS$'], ['2011 - 2017']) + ' **********');
|
||||||
|
WriteLn('--------------------------------------------------------------------');
|
||||||
|
isHandled:= False;
|
||||||
|
if HasParam('list') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ListDiscs(False);
|
||||||
|
end;
|
||||||
|
if HasParam('listex') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ListDiscs(True);
|
||||||
|
end;
|
||||||
|
if HasParam('info') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ShowDiscInfo(GetParamValue('info'));
|
||||||
|
end;
|
||||||
|
if HasParam('eject') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
EjectDisc(GetParamValue('eject'));
|
||||||
|
end;
|
||||||
|
if not isHandled then
|
||||||
|
WriteHelp;
|
||||||
|
// stop program loop
|
||||||
|
Terminate;
|
||||||
|
end;
|
||||||
|
constructor TCDEjecter.Create(TheOwner: TComponent);
|
||||||
|
begin
|
||||||
|
inherited Create (TheOwner);
|
||||||
|
StopOnException:= True;
|
||||||
|
end;
|
||||||
|
destructor TCDEjecter.Destroy;
|
||||||
|
begin
|
||||||
|
inherited Destroy;
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.WriteHelp;
|
||||||
|
begin
|
||||||
|
writeln(FormatStr(GetLocalizedString(cde_messages_help), ['$newline$'], [#13#10]));
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.ListDiscs (const Extendend: Boolean);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
GetCDDiscs: function: PChar;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
SL: TStringListUTF8;
|
||||||
|
Msg: String;
|
||||||
|
Indx: Integer;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
Msg:= '';
|
||||||
|
SL:= TStringListUTF8.Create;
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetCDDiscs:= GetProcAddress(DLL, 'GetCDDiscs');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
SL.Delimiter:= ';';
|
||||||
|
SL.DelimitedText:= GetCDDiscs;
|
||||||
|
if SL.Count > 0 then
|
||||||
|
for Indx:= 0 to SL.Count - 1 do
|
||||||
|
begin
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(SL[Indx][1]));
|
||||||
|
if not (Trim(Msg) = '') then
|
||||||
|
Msg:= Msg + #13#10;
|
||||||
|
Msg:= Msg + SL[Indx];
|
||||||
|
if Extendend then
|
||||||
|
if DInfo.diHasInfo then
|
||||||
|
Msg:= Msg + ' - ' + DInfo.diVolumeName
|
||||||
|
else
|
||||||
|
Msg:= Msg + ' - ' + GetLocalizedString(cde_messages_nodiscorempty);
|
||||||
|
end;
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
SL.Free;
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_discslist));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
function TCDEjecter.FormatDiscInfo (const AString: String; const AInfo: TDiscInfo): String;
|
||||||
|
begin
|
||||||
|
Result:= FormatStr(AString,
|
||||||
|
['$newline$',
|
||||||
|
'$letter$',
|
||||||
|
'$volumename$',
|
||||||
|
'$filesystem$',
|
||||||
|
'$serial$'
|
||||||
|
],
|
||||||
|
[#13#10,
|
||||||
|
AInfo.diDrive,
|
||||||
|
AInfo.diVolumeName,
|
||||||
|
AInfo.diFileSystem,
|
||||||
|
IntToStr(AInfo.diSerial)
|
||||||
|
]);
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.ShowDiscInfo (const ADisc: String);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
Msg: String;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(ADisc[1]));
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
if DInfo.diHasInfo then
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_discdesc), DInfo)
|
||||||
|
else
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_discdesconerror), DInfo);
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_discinfo));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.EjectDisc (const ADisc: String);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
EjectCD: function (const ADisc: WideChar): Boolean;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
Msg: String;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
EjectCD:= GetProcAddress(DLL, 'EjectCD');
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(ADisc[1]));
|
||||||
|
if EjectCD (WideChar(ADisc[1])) then
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_ejectsuccess), DInfo)
|
||||||
|
else
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_ejecterror), DInfo);
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
if not HasParam('silent') then
|
||||||
|
begin
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_ejecttitle));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
var Application: TCDEjecter;
|
||||||
|
{$R *.res}
|
||||||
|
begin
|
||||||
|
Application:= TCDEjecter.Create(Nil);
|
||||||
|
Application.Title:= 'CD Ejecter';
|
||||||
|
Application.Run;
|
||||||
|
Application.Free;
|
||||||
|
end.
|
||||||
164
sources/cdejecter/__history/cdejecter.lpr;16
Normal file
164
sources/cdejecter/__history/cdejecter.lpr;16
Normal file
@@ -0,0 +1,164 @@
|
|||||||
|
program cdejecter;
|
||||||
|
{$mode delphi}
|
||||||
|
{$codepage UTF8}
|
||||||
|
uses Interfaces, {$IFDEF UNIX}{$IFDEF UseCThreads}cthreads,{$ENDIF}{$ENDIF} Classes, SysUtils, CustApp, ANBFormatString,
|
||||||
|
cde_lang, dynlibs, cde_types, LazUTF8Classes, ParamsMngr;
|
||||||
|
type
|
||||||
|
{ TCDEjecter }
|
||||||
|
TCDEjecter = class(TCustomApplication)
|
||||||
|
protected
|
||||||
|
procedure DoRun; override;
|
||||||
|
public
|
||||||
|
constructor Create(TheOwner: TComponent); OVERRIDE;
|
||||||
|
destructor Destroy; OVERRIDE;
|
||||||
|
procedure WriteHelp; VIRTUAL;
|
||||||
|
procedure ListDiscs (const Extendend: Boolean);
|
||||||
|
function FormatDiscInfo (const AString: String; const AInfo: TDiscInfo): String;
|
||||||
|
procedure ShowDiscInfo (const ADisc: String);
|
||||||
|
procedure EjectDisc (const ADisc: String);
|
||||||
|
end;
|
||||||
|
{ TCDEjecter }
|
||||||
|
procedure TCDEjecter.DoRun;
|
||||||
|
var isHandled: Boolean;
|
||||||
|
begin
|
||||||
|
WriteLn('--------------------------------------------------------------------');
|
||||||
|
WriteLn('**************************** CD Ejecter ****************************');
|
||||||
|
WriteLn('*************************** ' + GetLocalizedString(cde_version) + ' 1.2 ***************************');
|
||||||
|
WriteLn('******* ' + FormatStr(GetLocalizedString(cde_copyrights), ['$DEVYEARS$'], ['2011 - 2017']) + ' **********');
|
||||||
|
WriteLn('--------------------------------------------------------------------');
|
||||||
|
isHandled:= False;
|
||||||
|
if HasParam('list') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ListDiscs(False);
|
||||||
|
end;
|
||||||
|
if HasParam('listex') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ListDiscs(True);
|
||||||
|
end;
|
||||||
|
if HasParam('info') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ShowDiscInfo(GetParamValue('info'));
|
||||||
|
end;
|
||||||
|
if HasParam('eject') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
EjectDisc(GetParamValue('eject'));
|
||||||
|
end;
|
||||||
|
if not isHandled then
|
||||||
|
WriteHelp;
|
||||||
|
// stop program loop
|
||||||
|
Terminate;
|
||||||
|
end;
|
||||||
|
constructor TCDEjecter.Create(TheOwner: TComponent);
|
||||||
|
begin
|
||||||
|
inherited Create (TheOwner);
|
||||||
|
StopOnException:= True;
|
||||||
|
end;
|
||||||
|
destructor TCDEjecter.Destroy;
|
||||||
|
begin
|
||||||
|
inherited Destroy;
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.WriteHelp;
|
||||||
|
begin
|
||||||
|
writeln(FormatStr(GetLocalizedString(cde_messages_help), ['$newline$'], [#13#10]));
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.ListDiscs (const Extendend: Boolean);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
GetCDDiscs: function: PChar;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
SL: TStringListUTF8;
|
||||||
|
Msg: String;
|
||||||
|
Indx: Integer;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
Msg:= '';
|
||||||
|
SL:= TStringListUTF8.Create;
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetCDDiscs:= GetProcAddress(DLL, 'GetCDDiscs');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
SL.Delimiter:= ';';
|
||||||
|
SL.DelimitedText:= GetCDDiscs;
|
||||||
|
if SL.Count > 0 then
|
||||||
|
for Indx:= 0 to SL.Count - 1 do
|
||||||
|
begin
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(SL[Indx][1]));
|
||||||
|
if not (Trim(Msg) = '') then
|
||||||
|
Msg:= Msg + #13#10;
|
||||||
|
Msg:= Msg + SL[Indx];
|
||||||
|
if Extendend then
|
||||||
|
if DInfo.diHasInfo then
|
||||||
|
Msg:= Msg + ' - ' + DInfo.diVolumeName
|
||||||
|
else
|
||||||
|
Msg:= Msg + ' - ' + GetLocalizedString(cde_messages_nodiscorempty);
|
||||||
|
end;
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
SL.Free;
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_discslist));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
function TCDEjecter.FormatDiscInfo (const AString: String; const AInfo: TDiscInfo): String;
|
||||||
|
begin
|
||||||
|
Result:= FormatStr(AString,
|
||||||
|
['$newline$',
|
||||||
|
'$letter$',
|
||||||
|
'$volumename$',
|
||||||
|
'$filesystem$',
|
||||||
|
'$serial$'
|
||||||
|
],
|
||||||
|
[#13#10,
|
||||||
|
AInfo.diDrive,
|
||||||
|
AInfo.diVolumeName,
|
||||||
|
AInfo.diFileSystem,
|
||||||
|
IntToStr(AInfo.diSerial)
|
||||||
|
]);
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.ShowDiscInfo (const ADisc: String);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
Msg: String;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(ADisc[1]));
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
if DInfo.diHasInfo then
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_discdesc), DInfo)
|
||||||
|
else
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_discdesconerror), DInfo);
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_discinfo));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.EjectDisc (const ADisc: String);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
EjectCD: function (const ADisc: WideChar): Boolean;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
Msg: String;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
EjectCD:= GetProcAddress(DLL, 'EjectCD');
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(ADisc[1]));
|
||||||
|
if EjectCD (WideChar(ADisc[1])) then
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_ejectsuccess), DInfo)
|
||||||
|
else
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_ejecterror), DInfo);
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
if not HasParam('silent') then
|
||||||
|
begin
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_ejecttitle));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
var Application: TCDEjecter;
|
||||||
|
{$R *.res}
|
||||||
|
begin
|
||||||
|
Application:= TCDEjecter.Create(Nil);
|
||||||
|
Application.Title:= 'CD Ejecter';
|
||||||
|
Application.Run;
|
||||||
|
Application.Free;
|
||||||
|
end.
|
||||||
164
sources/cdejecter/__history/cdejecter.lpr;17
Normal file
164
sources/cdejecter/__history/cdejecter.lpr;17
Normal file
@@ -0,0 +1,164 @@
|
|||||||
|
program cdejecter;
|
||||||
|
{$mode delphi}
|
||||||
|
{$codepage UTF8}
|
||||||
|
uses Interfaces, {$IFDEF UNIX}{$IFDEF UseCThreads}cthreads,{$ENDIF}{$ENDIF} Classes, SysUtils, CustApp, ANBFormatString,
|
||||||
|
dynlibs, LazUTF8Classes, ParamsMngr;
|
||||||
|
type
|
||||||
|
{ TCDEjecter }
|
||||||
|
TCDEjecter = class(TCustomApplication)
|
||||||
|
protected
|
||||||
|
procedure DoRun; override;
|
||||||
|
public
|
||||||
|
constructor Create(TheOwner: TComponent); OVERRIDE;
|
||||||
|
destructor Destroy; OVERRIDE;
|
||||||
|
procedure WriteHelp; VIRTUAL;
|
||||||
|
procedure ListDiscs (const Extendend: Boolean);
|
||||||
|
function FormatDiscInfo (const AString: String; const AInfo: TDiscInfo): String;
|
||||||
|
procedure ShowDiscInfo (const ADisc: String);
|
||||||
|
procedure EjectDisc (const ADisc: String);
|
||||||
|
end;
|
||||||
|
{ TCDEjecter }
|
||||||
|
procedure TCDEjecter.DoRun;
|
||||||
|
var isHandled: Boolean;
|
||||||
|
begin
|
||||||
|
WriteLn('--------------------------------------------------------------------');
|
||||||
|
WriteLn('**************************** CD Ejecter ****************************');
|
||||||
|
WriteLn('*************************** ' + GetLocalizedString(cde_version) + ' 1.2 ***************************');
|
||||||
|
WriteLn('******* ' + FormatStr(GetLocalizedString(cde_copyrights), ['$DEVYEARS$'], ['2011 - 2017']) + ' **********');
|
||||||
|
WriteLn('--------------------------------------------------------------------');
|
||||||
|
isHandled:= False;
|
||||||
|
if HasParam('list') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ListDiscs(False);
|
||||||
|
end;
|
||||||
|
if HasParam('listex') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ListDiscs(True);
|
||||||
|
end;
|
||||||
|
if HasParam('info') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ShowDiscInfo(GetParamValue('info'));
|
||||||
|
end;
|
||||||
|
if HasParam('eject') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
EjectDisc(GetParamValue('eject'));
|
||||||
|
end;
|
||||||
|
if not isHandled then
|
||||||
|
WriteHelp;
|
||||||
|
// stop program loop
|
||||||
|
Terminate;
|
||||||
|
end;
|
||||||
|
constructor TCDEjecter.Create(TheOwner: TComponent);
|
||||||
|
begin
|
||||||
|
inherited Create (TheOwner);
|
||||||
|
StopOnException:= True;
|
||||||
|
end;
|
||||||
|
destructor TCDEjecter.Destroy;
|
||||||
|
begin
|
||||||
|
inherited Destroy;
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.WriteHelp;
|
||||||
|
begin
|
||||||
|
writeln(FormatStr(GetLocalizedString(cde_messages_help), ['$newline$'], [#13#10]));
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.ListDiscs (const Extendend: Boolean);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
GetCDDiscs: function: PChar;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
SL: TStringListUTF8;
|
||||||
|
Msg: String;
|
||||||
|
Indx: Integer;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
Msg:= '';
|
||||||
|
SL:= TStringListUTF8.Create;
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetCDDiscs:= GetProcAddress(DLL, 'GetCDDiscs');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
SL.Delimiter:= ';';
|
||||||
|
SL.DelimitedText:= GetCDDiscs;
|
||||||
|
if SL.Count > 0 then
|
||||||
|
for Indx:= 0 to SL.Count - 1 do
|
||||||
|
begin
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(SL[Indx][1]));
|
||||||
|
if not (Trim(Msg) = '') then
|
||||||
|
Msg:= Msg + #13#10;
|
||||||
|
Msg:= Msg + SL[Indx];
|
||||||
|
if Extendend then
|
||||||
|
if DInfo.diHasInfo then
|
||||||
|
Msg:= Msg + ' - ' + DInfo.diVolumeName
|
||||||
|
else
|
||||||
|
Msg:= Msg + ' - ' + GetLocalizedString(cde_messages_nodiscorempty);
|
||||||
|
end;
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
SL.Free;
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_discslist));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
function TCDEjecter.FormatDiscInfo (const AString: String; const AInfo: TDiscInfo): String;
|
||||||
|
begin
|
||||||
|
Result:= FormatStr(AString,
|
||||||
|
['$newline$',
|
||||||
|
'$letter$',
|
||||||
|
'$volumename$',
|
||||||
|
'$filesystem$',
|
||||||
|
'$serial$'
|
||||||
|
],
|
||||||
|
[#13#10,
|
||||||
|
AInfo.diDrive,
|
||||||
|
AInfo.diVolumeName,
|
||||||
|
AInfo.diFileSystem,
|
||||||
|
IntToStr(AInfo.diSerial)
|
||||||
|
]);
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.ShowDiscInfo (const ADisc: String);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
Msg: String;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(ADisc[1]));
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
if DInfo.diHasInfo then
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_discdesc), DInfo)
|
||||||
|
else
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_discdesconerror), DInfo);
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_discinfo));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.EjectDisc (const ADisc: String);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
EjectCD: function (const ADisc: WideChar): Boolean;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
Msg: String;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
EjectCD:= GetProcAddress(DLL, 'EjectCD');
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(ADisc[1]));
|
||||||
|
if EjectCD (WideChar(ADisc[1])) then
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_ejectsuccess), DInfo)
|
||||||
|
else
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_ejecterror), DInfo);
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
if not HasParam('silent') then
|
||||||
|
begin
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_ejecttitle));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
var Application: TCDEjecter;
|
||||||
|
{$R *.res}
|
||||||
|
begin
|
||||||
|
Application:= TCDEjecter.Create(Nil);
|
||||||
|
Application.Title:= 'CD Ejecter';
|
||||||
|
Application.Run;
|
||||||
|
Application.Free;
|
||||||
|
end.
|
||||||
164
sources/cdejecter/__history/cdejecter.lpr;18
Normal file
164
sources/cdejecter/__history/cdejecter.lpr;18
Normal file
@@ -0,0 +1,164 @@
|
|||||||
|
program cdejecter;
|
||||||
|
{$mode delphi}
|
||||||
|
{$codepage UTF8}
|
||||||
|
uses Interfaces, {$IFDEF UNIX}{$IFDEF UseCThreads}cthreads,{$ENDIF}{$ENDIF} Classes, SysUtils, CustApp, ANBFormatString,
|
||||||
|
dynlibs, LazUTF8Classes, cde_dir, cde_lang, cde_types, ParamsMngr;
|
||||||
|
type
|
||||||
|
{ TCDEjecter }
|
||||||
|
TCDEjecter = class(TCustomApplication)
|
||||||
|
protected
|
||||||
|
procedure DoRun; override;
|
||||||
|
public
|
||||||
|
constructor Create(TheOwner: TComponent); OVERRIDE;
|
||||||
|
destructor Destroy; OVERRIDE;
|
||||||
|
procedure WriteHelp; VIRTUAL;
|
||||||
|
procedure ListDiscs (const Extendend: Boolean);
|
||||||
|
function FormatDiscInfo (const AString: String; const AInfo: TDiscInfo): String;
|
||||||
|
procedure ShowDiscInfo (const ADisc: String);
|
||||||
|
procedure EjectDisc (const ADisc: String);
|
||||||
|
end;
|
||||||
|
{ TCDEjecter }
|
||||||
|
procedure TCDEjecter.DoRun;
|
||||||
|
var isHandled: Boolean;
|
||||||
|
begin
|
||||||
|
WriteLn('--------------------------------------------------------------------');
|
||||||
|
WriteLn('**************************** CD Ejecter ****************************');
|
||||||
|
WriteLn('*************************** ' + GetLocalizedString(cde_version) + ' 1.2 ***************************');
|
||||||
|
WriteLn('******* ' + FormatStr(GetLocalizedString(cde_copyrights), ['$DEVYEARS$'], ['2011 - 2017']) + ' **********');
|
||||||
|
WriteLn('--------------------------------------------------------------------');
|
||||||
|
isHandled:= False;
|
||||||
|
if HasParam('list') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ListDiscs(False);
|
||||||
|
end;
|
||||||
|
if HasParam('listex') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ListDiscs(True);
|
||||||
|
end;
|
||||||
|
if HasParam('info') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ShowDiscInfo(GetParamValue('info'));
|
||||||
|
end;
|
||||||
|
if HasParam('eject') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
EjectDisc(GetParamValue('eject'));
|
||||||
|
end;
|
||||||
|
if not isHandled then
|
||||||
|
WriteHelp;
|
||||||
|
// stop program loop
|
||||||
|
Terminate;
|
||||||
|
end;
|
||||||
|
constructor TCDEjecter.Create(TheOwner: TComponent);
|
||||||
|
begin
|
||||||
|
inherited Create (TheOwner);
|
||||||
|
StopOnException:= True;
|
||||||
|
end;
|
||||||
|
destructor TCDEjecter.Destroy;
|
||||||
|
begin
|
||||||
|
inherited Destroy;
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.WriteHelp;
|
||||||
|
begin
|
||||||
|
writeln(FormatStr(GetLocalizedString(cde_messages_help), ['$newline$'], [#13#10]));
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.ListDiscs (const Extendend: Boolean);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
GetCDDiscs: function: PChar;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
SL: TStringListUTF8;
|
||||||
|
Msg: String;
|
||||||
|
Indx: Integer;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
Msg:= '';
|
||||||
|
SL:= TStringListUTF8.Create;
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetCDDiscs:= GetProcAddress(DLL, 'GetCDDiscs');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
SL.Delimiter:= ';';
|
||||||
|
SL.DelimitedText:= GetCDDiscs;
|
||||||
|
if SL.Count > 0 then
|
||||||
|
for Indx:= 0 to SL.Count - 1 do
|
||||||
|
begin
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(SL[Indx][1]));
|
||||||
|
if not (Trim(Msg) = '') then
|
||||||
|
Msg:= Msg + #13#10;
|
||||||
|
Msg:= Msg + SL[Indx];
|
||||||
|
if Extendend then
|
||||||
|
if DInfo.diHasInfo then
|
||||||
|
Msg:= Msg + ' - ' + DInfo.diVolumeName
|
||||||
|
else
|
||||||
|
Msg:= Msg + ' - ' + GetLocalizedString(cde_messages_nodiscorempty);
|
||||||
|
end;
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
SL.Free;
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_discslist));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
function TCDEjecter.FormatDiscInfo (const AString: String; const AInfo: TDiscInfo): String;
|
||||||
|
begin
|
||||||
|
Result:= FormatStr(AString,
|
||||||
|
['$newline$',
|
||||||
|
'$letter$',
|
||||||
|
'$volumename$',
|
||||||
|
'$filesystem$',
|
||||||
|
'$serial$'
|
||||||
|
],
|
||||||
|
[#13#10,
|
||||||
|
AInfo.diDrive,
|
||||||
|
AInfo.diVolumeName,
|
||||||
|
AInfo.diFileSystem,
|
||||||
|
IntToStr(AInfo.diSerial)
|
||||||
|
]);
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.ShowDiscInfo (const ADisc: String);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
Msg: String;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(ADisc[1]));
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
if DInfo.diHasInfo then
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_discdesc), DInfo)
|
||||||
|
else
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_discdesconerror), DInfo);
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_discinfo));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.EjectDisc (const ADisc: String);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
EjectCD: function (const ADisc: WideChar): Boolean;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
Msg: String;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
EjectCD:= GetProcAddress(DLL, 'EjectCD');
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(ADisc[1]));
|
||||||
|
if EjectCD (WideChar(ADisc[1])) then
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_ejectsuccess), DInfo)
|
||||||
|
else
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_ejecterror), DInfo);
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
if not HasParam('silent') then
|
||||||
|
begin
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_ejecttitle));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
var Application: TCDEjecter;
|
||||||
|
{$R *.res}
|
||||||
|
begin
|
||||||
|
Application:= TCDEjecter.Create(Nil);
|
||||||
|
Application.Title:= 'CD Ejecter';
|
||||||
|
Application.Run;
|
||||||
|
Application.Free;
|
||||||
|
end.
|
||||||
164
sources/cdejecter/__history/cdejecter.lpr;19
Normal file
164
sources/cdejecter/__history/cdejecter.lpr;19
Normal file
@@ -0,0 +1,164 @@
|
|||||||
|
program cdejecter;
|
||||||
|
{$mode delphi}
|
||||||
|
{$codepage UTF8}
|
||||||
|
uses Interfaces, {$IFDEF UNIX}{$IFDEF UseCThreads}cthreads,{$ENDIF}{$ENDIF} Classes, SysUtils, CustApp, ANBFormatString,
|
||||||
|
dynlibs, LazUTF8Classes, cde_dir, cde_lang, cde_types, ParamsMngr, cde_kernel;
|
||||||
|
type
|
||||||
|
{ TCDEjecter }
|
||||||
|
TCDEjecter = class(TCustomApplication)
|
||||||
|
protected
|
||||||
|
procedure DoRun; override;
|
||||||
|
public
|
||||||
|
constructor Create(TheOwner: TComponent); OVERRIDE;
|
||||||
|
destructor Destroy; OVERRIDE;
|
||||||
|
procedure WriteHelp; VIRTUAL;
|
||||||
|
procedure ListDiscs (const Extendend: Boolean);
|
||||||
|
function FormatDiscInfo (const AString: String; const AInfo: TDiscInfo): String;
|
||||||
|
procedure ShowDiscInfo (const ADisc: String);
|
||||||
|
procedure EjectDisc (const ADisc: String);
|
||||||
|
end;
|
||||||
|
{ TCDEjecter }
|
||||||
|
procedure TCDEjecter.DoRun;
|
||||||
|
var isHandled: Boolean;
|
||||||
|
begin
|
||||||
|
WriteLn('--------------------------------------------------------------------');
|
||||||
|
WriteLn('**************************** CD Ejecter ****************************');
|
||||||
|
WriteLn('*************************** ' + GetLocalizedString(cde_version) + ' ' + GetCDEVerStr('cde') + '***************************');
|
||||||
|
WriteLn('******* ' + FormatStr(GetLocalizedString(cde_copyrights), ['$DEVYEARS$'], ['2011 - 2017']) + ' **********');
|
||||||
|
WriteLn('--------------------------------------------------------------------');
|
||||||
|
isHandled:= False;
|
||||||
|
if HasParam('list') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ListDiscs(False);
|
||||||
|
end;
|
||||||
|
if HasParam('listex') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ListDiscs(True);
|
||||||
|
end;
|
||||||
|
if HasParam('info') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ShowDiscInfo(GetParamValue('info'));
|
||||||
|
end;
|
||||||
|
if HasParam('eject') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
EjectDisc(GetParamValue('eject'));
|
||||||
|
end;
|
||||||
|
if not isHandled then
|
||||||
|
WriteHelp;
|
||||||
|
// stop program loop
|
||||||
|
Terminate;
|
||||||
|
end;
|
||||||
|
constructor TCDEjecter.Create(TheOwner: TComponent);
|
||||||
|
begin
|
||||||
|
inherited Create (TheOwner);
|
||||||
|
StopOnException:= True;
|
||||||
|
end;
|
||||||
|
destructor TCDEjecter.Destroy;
|
||||||
|
begin
|
||||||
|
inherited Destroy;
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.WriteHelp;
|
||||||
|
begin
|
||||||
|
writeln(FormatStr(GetLocalizedString(cde_messages_help), ['$newline$'], [#13#10]));
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.ListDiscs (const Extendend: Boolean);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
GetCDDiscs: function: PChar;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
SL: TStringListUTF8;
|
||||||
|
Msg: String;
|
||||||
|
Indx: Integer;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
Msg:= '';
|
||||||
|
SL:= TStringListUTF8.Create;
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetCDDiscs:= GetProcAddress(DLL, 'GetCDDiscs');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
SL.Delimiter:= ';';
|
||||||
|
SL.DelimitedText:= GetCDDiscs;
|
||||||
|
if SL.Count > 0 then
|
||||||
|
for Indx:= 0 to SL.Count - 1 do
|
||||||
|
begin
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(SL[Indx][1]));
|
||||||
|
if not (Trim(Msg) = '') then
|
||||||
|
Msg:= Msg + #13#10;
|
||||||
|
Msg:= Msg + SL[Indx];
|
||||||
|
if Extendend then
|
||||||
|
if DInfo.diHasInfo then
|
||||||
|
Msg:= Msg + ' - ' + DInfo.diVolumeName
|
||||||
|
else
|
||||||
|
Msg:= Msg + ' - ' + GetLocalizedString(cde_messages_nodiscorempty);
|
||||||
|
end;
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
SL.Free;
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_discslist));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
function TCDEjecter.FormatDiscInfo (const AString: String; const AInfo: TDiscInfo): String;
|
||||||
|
begin
|
||||||
|
Result:= FormatStr(AString,
|
||||||
|
['$newline$',
|
||||||
|
'$letter$',
|
||||||
|
'$volumename$',
|
||||||
|
'$filesystem$',
|
||||||
|
'$serial$'
|
||||||
|
],
|
||||||
|
[#13#10,
|
||||||
|
AInfo.diDrive,
|
||||||
|
AInfo.diVolumeName,
|
||||||
|
AInfo.diFileSystem,
|
||||||
|
IntToStr(AInfo.diSerial)
|
||||||
|
]);
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.ShowDiscInfo (const ADisc: String);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
Msg: String;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(ADisc[1]));
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
if DInfo.diHasInfo then
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_discdesc), DInfo)
|
||||||
|
else
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_discdesconerror), DInfo);
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_discinfo));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.EjectDisc (const ADisc: String);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
EjectCD: function (const ADisc: WideChar): Boolean;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
Msg: String;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
EjectCD:= GetProcAddress(DLL, 'EjectCD');
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(ADisc[1]));
|
||||||
|
if EjectCD (WideChar(ADisc[1])) then
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_ejectsuccess), DInfo)
|
||||||
|
else
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_ejecterror), DInfo);
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
if not HasParam('silent') then
|
||||||
|
begin
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_ejecttitle));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
var Application: TCDEjecter;
|
||||||
|
{$R *.res}
|
||||||
|
begin
|
||||||
|
Application:= TCDEjecter.Create(Nil);
|
||||||
|
Application.Title:= 'CD Ejecter';
|
||||||
|
Application.Run;
|
||||||
|
Application.Free;
|
||||||
|
end.
|
||||||
63
sources/cdejecter/__history/cdejecter.lpr;2
Normal file
63
sources/cdejecter/__history/cdejecter.lpr;2
Normal file
@@ -0,0 +1,63 @@
|
|||||||
|
program cdejecter;
|
||||||
|
{$mode delphi}
|
||||||
|
{$codepage UTF8}
|
||||||
|
uses {$IFDEF UNIX}{$IFDEF UseCThreads}cthreads,{$ENDIF}{$ENDIF} Classes, SysUtils, CustApp;
|
||||||
|
type
|
||||||
|
{ TCDEjecter }
|
||||||
|
TCDEjecter = class(TCustomApplication)
|
||||||
|
protected
|
||||||
|
procedure DoRun; override;
|
||||||
|
public
|
||||||
|
constructor Create(TheOwner: TComponent); override;
|
||||||
|
destructor Destroy; override;
|
||||||
|
procedure WriteHelp; virtual;
|
||||||
|
end;
|
||||||
|
{ TCDEjecter }
|
||||||
|
procedure TCDEjecter.DoRun;
|
||||||
|
var ErrorMsg: String;
|
||||||
|
begin
|
||||||
|
// quick check parameters
|
||||||
|
ErrorMsg:= CheckOptions('h', 'help');
|
||||||
|
if ErrorMsg <> '' then begin
|
||||||
|
ShowException(Exception.Create(ErrorMsg));
|
||||||
|
Terminate;
|
||||||
|
Exit;
|
||||||
|
end;
|
||||||
|
|
||||||
|
// parse parameters
|
||||||
|
if HasOption('h', 'help') then begin
|
||||||
|
WriteHelp;
|
||||||
|
Terminate;
|
||||||
|
Exit;
|
||||||
|
end;
|
||||||
|
|
||||||
|
{ add your program here }
|
||||||
|
|
||||||
|
// stop program loop
|
||||||
|
Terminate;
|
||||||
|
end;
|
||||||
|
constructor TCDEjecter.Create(TheOwner: TComponent);
|
||||||
|
begin
|
||||||
|
inherited Create (TheOwner);
|
||||||
|
StopOnException:= True;
|
||||||
|
end;
|
||||||
|
destructor TCDEjecter.Destroy;
|
||||||
|
begin
|
||||||
|
inherited Destroy;
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.WriteHelp;
|
||||||
|
begin
|
||||||
|
WriteLn('DEMO!');
|
||||||
|
writeln('Использование: ', ExeName, ' -h');
|
||||||
|
end;
|
||||||
|
var Application: TCDEjecter;
|
||||||
|
|
||||||
|
{$R *.res}
|
||||||
|
|
||||||
|
begin
|
||||||
|
Application:= TCDEjecter.Create(Nil);
|
||||||
|
Application.Title:= 'CD Ejecter';
|
||||||
|
Application.Run;
|
||||||
|
Application.Free;
|
||||||
|
end.
|
||||||
|
|
||||||
163
sources/cdejecter/__history/cdejecter.lpr;20
Normal file
163
sources/cdejecter/__history/cdejecter.lpr;20
Normal file
@@ -0,0 +1,163 @@
|
|||||||
|
program cdejecter;
|
||||||
|
{$mode delphi}
|
||||||
|
{$codepage UTF8}
|
||||||
|
uses Interfaces, {$IFDEF UNIX}{$IFDEF UseCThreads}cthreads,{$ENDIF}{$ENDIF} Classes, SysUtils, CustApp, ANBFormatString,
|
||||||
|
dynlibs, LazUTF8Classes, cde_dir, cde_lang, cde_types, ParamsMngr, cde_kernel;
|
||||||
|
type
|
||||||
|
{ TCDEjecter }
|
||||||
|
TCDEjecter = class(TCustomApplication)
|
||||||
|
protected
|
||||||
|
procedure DoRun; override;
|
||||||
|
public
|
||||||
|
constructor Create(TheOwner: TComponent); OVERRIDE;
|
||||||
|
destructor Destroy; OVERRIDE;
|
||||||
|
procedure WriteHelp; VIRTUAL;
|
||||||
|
procedure ListDiscs (const Extendend: Boolean);
|
||||||
|
function FormatDiscInfo (const AString: String; const AInfo: TDiscInfo): String;
|
||||||
|
procedure ShowDiscInfo (const ADisc: String);
|
||||||
|
procedure EjectDisc (const ADisc: String);
|
||||||
|
end;
|
||||||
|
{ TCDEjecter }
|
||||||
|
procedure TCDEjecter.DoRun;
|
||||||
|
var isHandled: Boolean;
|
||||||
|
begin
|
||||||
|
WriteLn('[*][*][*] CD Ejecter [*][*][*]');
|
||||||
|
WriteLn('[*] ' + GetLocalizedString(cde_version) + ' ' + GetCDEVerStr('cde') + '[*]');
|
||||||
|
WriteLn('[*] ' + FormatStr(GetLocalizedString(cde_copyrights), ['$DEVYEARS$'], ['2011 - 2017']) + ' [*]');
|
||||||
|
WriteLn('');
|
||||||
|
isHandled:= False;
|
||||||
|
if HasParam('list') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ListDiscs(False);
|
||||||
|
end;
|
||||||
|
if HasParam('listex') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ListDiscs(True);
|
||||||
|
end;
|
||||||
|
if HasParam('info') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ShowDiscInfo(GetParamValue('info'));
|
||||||
|
end;
|
||||||
|
if HasParam('eject') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
EjectDisc(GetParamValue('eject'));
|
||||||
|
end;
|
||||||
|
if not isHandled then
|
||||||
|
WriteHelp;
|
||||||
|
// stop program loop
|
||||||
|
Terminate;
|
||||||
|
end;
|
||||||
|
constructor TCDEjecter.Create(TheOwner: TComponent);
|
||||||
|
begin
|
||||||
|
inherited Create (TheOwner);
|
||||||
|
StopOnException:= True;
|
||||||
|
end;
|
||||||
|
destructor TCDEjecter.Destroy;
|
||||||
|
begin
|
||||||
|
inherited Destroy;
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.WriteHelp;
|
||||||
|
begin
|
||||||
|
writeln(FormatStr(GetLocalizedString(cde_messages_help), ['$newline$'], [#13#10]));
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.ListDiscs (const Extendend: Boolean);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
GetCDDiscs: function: PChar;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
SL: TStringListUTF8;
|
||||||
|
Msg: String;
|
||||||
|
Indx: Integer;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
Msg:= '';
|
||||||
|
SL:= TStringListUTF8.Create;
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetCDDiscs:= GetProcAddress(DLL, 'GetCDDiscs');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
SL.Delimiter:= ';';
|
||||||
|
SL.DelimitedText:= GetCDDiscs;
|
||||||
|
if SL.Count > 0 then
|
||||||
|
for Indx:= 0 to SL.Count - 1 do
|
||||||
|
begin
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(SL[Indx][1]));
|
||||||
|
if not (Trim(Msg) = '') then
|
||||||
|
Msg:= Msg + #13#10;
|
||||||
|
Msg:= Msg + SL[Indx];
|
||||||
|
if Extendend then
|
||||||
|
if DInfo.diHasInfo then
|
||||||
|
Msg:= Msg + ' - ' + DInfo.diVolumeName
|
||||||
|
else
|
||||||
|
Msg:= Msg + ' - ' + GetLocalizedString(cde_messages_nodiscorempty);
|
||||||
|
end;
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
SL.Free;
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_discslist));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
function TCDEjecter.FormatDiscInfo (const AString: String; const AInfo: TDiscInfo): String;
|
||||||
|
begin
|
||||||
|
Result:= FormatStr(AString,
|
||||||
|
['$newline$',
|
||||||
|
'$letter$',
|
||||||
|
'$volumename$',
|
||||||
|
'$filesystem$',
|
||||||
|
'$serial$'
|
||||||
|
],
|
||||||
|
[#13#10,
|
||||||
|
AInfo.diDrive,
|
||||||
|
AInfo.diVolumeName,
|
||||||
|
AInfo.diFileSystem,
|
||||||
|
IntToStr(AInfo.diSerial)
|
||||||
|
]);
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.ShowDiscInfo (const ADisc: String);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
Msg: String;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(ADisc[1]));
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
if DInfo.diHasInfo then
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_discdesc), DInfo)
|
||||||
|
else
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_discdesconerror), DInfo);
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_discinfo));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.EjectDisc (const ADisc: String);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
EjectCD: function (const ADisc: WideChar): Boolean;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
Msg: String;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
EjectCD:= GetProcAddress(DLL, 'EjectCD');
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(ADisc[1]));
|
||||||
|
if EjectCD (WideChar(ADisc[1])) then
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_ejectsuccess), DInfo)
|
||||||
|
else
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_ejecterror), DInfo);
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
if not HasParam('silent') then
|
||||||
|
begin
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_ejecttitle));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
var Application: TCDEjecter;
|
||||||
|
{$R *.res}
|
||||||
|
begin
|
||||||
|
Application:= TCDEjecter.Create(Nil);
|
||||||
|
Application.Title:= 'CD Ejecter';
|
||||||
|
Application.Run;
|
||||||
|
Application.Free;
|
||||||
|
end.
|
||||||
163
sources/cdejecter/__history/cdejecter.lpr;21
Normal file
163
sources/cdejecter/__history/cdejecter.lpr;21
Normal file
@@ -0,0 +1,163 @@
|
|||||||
|
program cdejecter;
|
||||||
|
{$mode delphi}
|
||||||
|
{$codepage UTF8}
|
||||||
|
uses Interfaces, {$IFDEF UNIX}{$IFDEF UseCThreads}cthreads,{$ENDIF}{$ENDIF} Classes, SysUtils, CustApp, ANBFormatString,
|
||||||
|
dynlibs, LazUTF8Classes, cde_dir, cde_lang, cde_types, ParamsMngr, cde_kernel;
|
||||||
|
type
|
||||||
|
{ TCDEjecter }
|
||||||
|
TCDEjecter = class(TCustomApplication)
|
||||||
|
protected
|
||||||
|
procedure DoRun; override;
|
||||||
|
public
|
||||||
|
constructor Create(TheOwner: TComponent); OVERRIDE;
|
||||||
|
destructor Destroy; OVERRIDE;
|
||||||
|
procedure WriteHelp; VIRTUAL;
|
||||||
|
procedure ListDiscs (const Extendend: Boolean);
|
||||||
|
function FormatDiscInfo (const AString: String; const AInfo: TDiscInfo): String;
|
||||||
|
procedure ShowDiscInfo (const ADisc: String);
|
||||||
|
procedure EjectDisc (const ADisc: String);
|
||||||
|
end;
|
||||||
|
{ TCDEjecter }
|
||||||
|
procedure TCDEjecter.DoRun;
|
||||||
|
var isHandled: Boolean;
|
||||||
|
begin
|
||||||
|
WriteLn('[#] CD Ejecter [#]');
|
||||||
|
WriteLn('[#] ' + GetLocalizedString(cde_version) + ' ' + GetCDEVerStr('cde') + '[#]');
|
||||||
|
WriteLn('[#] ' + FormatStr(GetLocalizedString(cde_copyrights), ['$DEVYEARS$'], ['2011 - 2017']) + ' [#]');
|
||||||
|
WriteLn('');
|
||||||
|
isHandled:= False;
|
||||||
|
if HasParam('list') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ListDiscs(False);
|
||||||
|
end;
|
||||||
|
if HasParam('listex') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ListDiscs(True);
|
||||||
|
end;
|
||||||
|
if HasParam('info') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ShowDiscInfo(GetParamValue('info'));
|
||||||
|
end;
|
||||||
|
if HasParam('eject') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
EjectDisc(GetParamValue('eject'));
|
||||||
|
end;
|
||||||
|
if not isHandled then
|
||||||
|
WriteHelp;
|
||||||
|
// stop program loop
|
||||||
|
Terminate;
|
||||||
|
end;
|
||||||
|
constructor TCDEjecter.Create(TheOwner: TComponent);
|
||||||
|
begin
|
||||||
|
inherited Create (TheOwner);
|
||||||
|
StopOnException:= True;
|
||||||
|
end;
|
||||||
|
destructor TCDEjecter.Destroy;
|
||||||
|
begin
|
||||||
|
inherited Destroy;
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.WriteHelp;
|
||||||
|
begin
|
||||||
|
writeln(FormatStr(GetLocalizedString(cde_messages_help), ['$newline$'], [#13#10]));
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.ListDiscs (const Extendend: Boolean);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
GetCDDiscs: function: PChar;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
SL: TStringListUTF8;
|
||||||
|
Msg: String;
|
||||||
|
Indx: Integer;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
Msg:= '';
|
||||||
|
SL:= TStringListUTF8.Create;
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetCDDiscs:= GetProcAddress(DLL, 'GetCDDiscs');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
SL.Delimiter:= ';';
|
||||||
|
SL.DelimitedText:= GetCDDiscs;
|
||||||
|
if SL.Count > 0 then
|
||||||
|
for Indx:= 0 to SL.Count - 1 do
|
||||||
|
begin
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(SL[Indx][1]));
|
||||||
|
if not (Trim(Msg) = '') then
|
||||||
|
Msg:= Msg + #13#10;
|
||||||
|
Msg:= Msg + SL[Indx];
|
||||||
|
if Extendend then
|
||||||
|
if DInfo.diHasInfo then
|
||||||
|
Msg:= Msg + ' - ' + DInfo.diVolumeName
|
||||||
|
else
|
||||||
|
Msg:= Msg + ' - ' + GetLocalizedString(cde_messages_nodiscorempty);
|
||||||
|
end;
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
SL.Free;
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_discslist));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
function TCDEjecter.FormatDiscInfo (const AString: String; const AInfo: TDiscInfo): String;
|
||||||
|
begin
|
||||||
|
Result:= FormatStr(AString,
|
||||||
|
['$newline$',
|
||||||
|
'$letter$',
|
||||||
|
'$volumename$',
|
||||||
|
'$filesystem$',
|
||||||
|
'$serial$'
|
||||||
|
],
|
||||||
|
[#13#10,
|
||||||
|
AInfo.diDrive,
|
||||||
|
AInfo.diVolumeName,
|
||||||
|
AInfo.diFileSystem,
|
||||||
|
IntToStr(AInfo.diSerial)
|
||||||
|
]);
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.ShowDiscInfo (const ADisc: String);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
Msg: String;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(ADisc[1]));
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
if DInfo.diHasInfo then
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_discdesc), DInfo)
|
||||||
|
else
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_discdesconerror), DInfo);
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_discinfo));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.EjectDisc (const ADisc: String);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
EjectCD: function (const ADisc: WideChar): Boolean;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
Msg: String;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
EjectCD:= GetProcAddress(DLL, 'EjectCD');
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(ADisc[1]));
|
||||||
|
if EjectCD (WideChar(ADisc[1])) then
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_ejectsuccess), DInfo)
|
||||||
|
else
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_ejecterror), DInfo);
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
if not HasParam('silent') then
|
||||||
|
begin
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_ejecttitle));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
var Application: TCDEjecter;
|
||||||
|
{$R *.res}
|
||||||
|
begin
|
||||||
|
Application:= TCDEjecter.Create(Nil);
|
||||||
|
Application.Title:= 'CD Ejecter';
|
||||||
|
Application.Run;
|
||||||
|
Application.Free;
|
||||||
|
end.
|
||||||
184
sources/cdejecter/__history/cdejecter.lpr;22
Normal file
184
sources/cdejecter/__history/cdejecter.lpr;22
Normal file
@@ -0,0 +1,184 @@
|
|||||||
|
program cdejecter;
|
||||||
|
{$mode delphi}
|
||||||
|
{$codepage UTF8}
|
||||||
|
uses Interfaces, {$IFDEF UNIX}{$IFDEF UseCThreads}cthreads,{$ENDIF}{$ENDIF} Classes, SysUtils, CustApp, ANBFormatString,
|
||||||
|
dynlibs, LazUTF8Classes, cde_dir, cde_lang, cde_types, ParamsMngr, cde_kernel;
|
||||||
|
type
|
||||||
|
{ TCDEjecter }
|
||||||
|
TCDEjecter = class(TCustomApplication)
|
||||||
|
protected
|
||||||
|
procedure DoRun; override;
|
||||||
|
public
|
||||||
|
constructor Create(TheOwner: TComponent); OVERRIDE;
|
||||||
|
destructor Destroy; OVERRIDE;
|
||||||
|
procedure WriteHelp; VIRTUAL;
|
||||||
|
procedure ListDiscs (const Extendend: Boolean);
|
||||||
|
function FormatDiscInfo (const AString: String; const AInfo: TDiscInfo): String;
|
||||||
|
procedure ShowDiscInfo (const ADisc: String);
|
||||||
|
procedure EjectDisc (const ADisc: String);
|
||||||
|
procedure BuildTitle;
|
||||||
|
end;
|
||||||
|
{ TCDEjecter }
|
||||||
|
procedure TCDEjecter.DoRun;
|
||||||
|
var isHandled: Boolean;
|
||||||
|
begin
|
||||||
|
BuildTitle;
|
||||||
|
isHandled:= False;
|
||||||
|
if HasParam('list') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ListDiscs(False);
|
||||||
|
end;
|
||||||
|
if HasParam('listex') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ListDiscs(True);
|
||||||
|
end;
|
||||||
|
if HasParam('info') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ShowDiscInfo(GetParamValue('info'));
|
||||||
|
end;
|
||||||
|
if HasParam('eject') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
EjectDisc(GetParamValue('eject'));
|
||||||
|
end;
|
||||||
|
if not isHandled then
|
||||||
|
WriteHelp;
|
||||||
|
// stop program loop
|
||||||
|
Terminate;
|
||||||
|
end;
|
||||||
|
constructor TCDEjecter.Create(TheOwner: TComponent);
|
||||||
|
begin
|
||||||
|
inherited Create (TheOwner);
|
||||||
|
StopOnException:= True;
|
||||||
|
end;
|
||||||
|
destructor TCDEjecter.Destroy;
|
||||||
|
begin
|
||||||
|
inherited Destroy;
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.WriteHelp;
|
||||||
|
begin
|
||||||
|
writeln(FormatStr(GetLocalizedString(cde_messages_help), ['$newline$'], [#13#10]));
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.ListDiscs (const Extendend: Boolean);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
GetCDDiscs: function: PChar;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
SL: TStringListUTF8;
|
||||||
|
Msg: String;
|
||||||
|
Indx: Integer;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
Msg:= '';
|
||||||
|
SL:= TStringListUTF8.Create;
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetCDDiscs:= GetProcAddress(DLL, 'GetCDDiscs');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
SL.Delimiter:= ';';
|
||||||
|
SL.DelimitedText:= GetCDDiscs;
|
||||||
|
if SL.Count > 0 then
|
||||||
|
for Indx:= 0 to SL.Count - 1 do
|
||||||
|
begin
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(SL[Indx][1]));
|
||||||
|
if not (Trim(Msg) = '') then
|
||||||
|
Msg:= Msg + #13#10;
|
||||||
|
Msg:= Msg + SL[Indx];
|
||||||
|
if Extendend then
|
||||||
|
if DInfo.diHasInfo then
|
||||||
|
Msg:= Msg + ' - ' + DInfo.diVolumeName
|
||||||
|
else
|
||||||
|
Msg:= Msg + ' - ' + GetLocalizedString(cde_messages_nodiscorempty);
|
||||||
|
end;
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
SL.Free;
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_discslist));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
function TCDEjecter.FormatDiscInfo (const AString: String; const AInfo: TDiscInfo): String;
|
||||||
|
begin
|
||||||
|
Result:= FormatStr(AString,
|
||||||
|
['$newline$',
|
||||||
|
'$letter$',
|
||||||
|
'$volumename$',
|
||||||
|
'$filesystem$',
|
||||||
|
'$serial$'
|
||||||
|
],
|
||||||
|
[#13#10,
|
||||||
|
AInfo.diDrive,
|
||||||
|
AInfo.diVolumeName,
|
||||||
|
AInfo.diFileSystem,
|
||||||
|
IntToStr(AInfo.diSerial)
|
||||||
|
]);
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.ShowDiscInfo (const ADisc: String);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
Msg: String;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(ADisc[1]));
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
if DInfo.diHasInfo then
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_discdesc), DInfo)
|
||||||
|
else
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_discdesconerror), DInfo);
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_discinfo));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.EjectDisc (const ADisc: String);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
EjectCD: function (const ADisc: WideChar): Boolean;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
Msg: String;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
EjectCD:= GetProcAddress(DLL, 'EjectCD');
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(ADisc[1]));
|
||||||
|
if EjectCD (WideChar(ADisc[1])) then
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_ejectsuccess), DInfo)
|
||||||
|
else
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_ejecterror), DInfo);
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
if not HasParam('silent') then
|
||||||
|
begin
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_ejecttitle));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.BuildTitle;
|
||||||
|
var StrT, StrV, StrC, StrABL, S1, S2: String;
|
||||||
|
MaxLength, Indx: Byte;
|
||||||
|
const ASymbol: Char = '#';
|
||||||
|
begin
|
||||||
|
StrT:= 'CD Ejecter';
|
||||||
|
StrV:= GetLocalizedString(cde_version) + ' ' + GetCDEVerStr('cde');
|
||||||
|
StrC:= FormatStr(GetLocalizedString(cde_copyrights), ['$DEVYEARS$'], ['2011 - 2017']);
|
||||||
|
MaxLength:= 0;
|
||||||
|
MaxLength:= Length(StrT);
|
||||||
|
if Length(StrV) > MaxLength then
|
||||||
|
MaxLength:= Length(StrV);
|
||||||
|
if Length(StrC) > MaxLength then
|
||||||
|
MaxLength:= Length(StrC);
|
||||||
|
MaxLength:= MaxLength + 8;
|
||||||
|
StrABL:= '';
|
||||||
|
for Indx:= 1 to MaxLength do
|
||||||
|
StrABL:= StrABL + ASymbol;
|
||||||
|
WriteLn('[#] CD Ejecter [#]');
|
||||||
|
WriteLn('[#] ' + {ver} + '[#]');
|
||||||
|
WriteLn('[#] ' + {copy} + ' [#]');
|
||||||
|
WriteLn('');
|
||||||
|
end;
|
||||||
|
var Application: TCDEjecter;
|
||||||
|
{$R *.res}
|
||||||
|
begin
|
||||||
|
Application:= TCDEjecter.Create(Nil);
|
||||||
|
Application.Title:= 'CD Ejecter';
|
||||||
|
Application.Run;
|
||||||
|
Application.Free;
|
||||||
|
end.
|
||||||
201
sources/cdejecter/__history/cdejecter.lpr;23
Normal file
201
sources/cdejecter/__history/cdejecter.lpr;23
Normal file
@@ -0,0 +1,201 @@
|
|||||||
|
program cdejecter;
|
||||||
|
{$mode delphi}
|
||||||
|
{$codepage UTF8}
|
||||||
|
uses Interfaces, {$IFDEF UNIX}{$IFDEF UseCThreads}cthreads,{$ENDIF}{$ENDIF} Classes, SysUtils, CustApp, ANBFormatString,
|
||||||
|
dynlibs, LazUTF8Classes, cde_dir, cde_lang, cde_types, ParamsMngr, cde_kernel;
|
||||||
|
type
|
||||||
|
{ TCDEjecter }
|
||||||
|
TCDEjecter = class(TCustomApplication)
|
||||||
|
protected
|
||||||
|
procedure DoRun; override;
|
||||||
|
public
|
||||||
|
constructor Create(TheOwner: TComponent); OVERRIDE;
|
||||||
|
destructor Destroy; OVERRIDE;
|
||||||
|
procedure WriteHelp; VIRTUAL;
|
||||||
|
procedure ListDiscs (const Extendend: Boolean);
|
||||||
|
function FormatDiscInfo (const AString: String; const AInfo: TDiscInfo): String;
|
||||||
|
procedure ShowDiscInfo (const ADisc: String);
|
||||||
|
procedure EjectDisc (const ADisc: String);
|
||||||
|
procedure BuildTitle;
|
||||||
|
end;
|
||||||
|
{ TCDEjecter }
|
||||||
|
procedure TCDEjecter.DoRun;
|
||||||
|
var isHandled: Boolean;
|
||||||
|
begin
|
||||||
|
BuildTitle;
|
||||||
|
isHandled:= False;
|
||||||
|
if HasParam('list') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ListDiscs(False);
|
||||||
|
end;
|
||||||
|
if HasParam('listex') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ListDiscs(True);
|
||||||
|
end;
|
||||||
|
if HasParam('info') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
ShowDiscInfo(GetParamValue('info'));
|
||||||
|
end;
|
||||||
|
if HasParam('eject') then
|
||||||
|
begin
|
||||||
|
isHandled:= True;
|
||||||
|
EjectDisc(GetParamValue('eject'));
|
||||||
|
end;
|
||||||
|
if not isHandled then
|
||||||
|
WriteHelp;
|
||||||
|
// stop program loop
|
||||||
|
Terminate;
|
||||||
|
end;
|
||||||
|
constructor TCDEjecter.Create(TheOwner: TComponent);
|
||||||
|
begin
|
||||||
|
inherited Create (TheOwner);
|
||||||
|
StopOnException:= True;
|
||||||
|
end;
|
||||||
|
destructor TCDEjecter.Destroy;
|
||||||
|
begin
|
||||||
|
inherited Destroy;
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.WriteHelp;
|
||||||
|
begin
|
||||||
|
writeln(FormatStr(GetLocalizedString(cde_messages_help), ['$newline$'], [#13#10]));
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.ListDiscs (const Extendend: Boolean);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
GetCDDiscs: function: PChar;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
SL: TStringListUTF8;
|
||||||
|
Msg: String;
|
||||||
|
Indx: Integer;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
Msg:= '';
|
||||||
|
SL:= TStringListUTF8.Create;
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetCDDiscs:= GetProcAddress(DLL, 'GetCDDiscs');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
SL.Delimiter:= ';';
|
||||||
|
SL.DelimitedText:= GetCDDiscs;
|
||||||
|
if SL.Count > 0 then
|
||||||
|
for Indx:= 0 to SL.Count - 1 do
|
||||||
|
begin
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(SL[Indx][1]));
|
||||||
|
if not (Trim(Msg) = '') then
|
||||||
|
Msg:= Msg + #13#10;
|
||||||
|
Msg:= Msg + SL[Indx];
|
||||||
|
if Extendend then
|
||||||
|
if DInfo.diHasInfo then
|
||||||
|
Msg:= Msg + ' - ' + DInfo.diVolumeName
|
||||||
|
else
|
||||||
|
Msg:= Msg + ' - ' + GetLocalizedString(cde_messages_nodiscorempty);
|
||||||
|
end;
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
SL.Free;
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_discslist));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
function TCDEjecter.FormatDiscInfo (const AString: String; const AInfo: TDiscInfo): String;
|
||||||
|
begin
|
||||||
|
Result:= FormatStr(AString,
|
||||||
|
['$newline$',
|
||||||
|
'$letter$',
|
||||||
|
'$volumename$',
|
||||||
|
'$filesystem$',
|
||||||
|
'$serial$'
|
||||||
|
],
|
||||||
|
[#13#10,
|
||||||
|
AInfo.diDrive,
|
||||||
|
AInfo.diVolumeName,
|
||||||
|
AInfo.diFileSystem,
|
||||||
|
IntToStr(AInfo.diSerial)
|
||||||
|
]);
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.ShowDiscInfo (const ADisc: String);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
Msg: String;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(ADisc[1]));
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
if DInfo.diHasInfo then
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_discdesc), DInfo)
|
||||||
|
else
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_discdesconerror), DInfo);
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_discinfo));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.EjectDisc (const ADisc: String);
|
||||||
|
var DLL: TLibHandle;
|
||||||
|
EjectCD: function (const ADisc: WideChar): Boolean;
|
||||||
|
GetVolumeInfo: function (const ADisc: WideChar): TDiscInfo;
|
||||||
|
Msg: String;
|
||||||
|
DInfo: TDiscInfo;
|
||||||
|
begin
|
||||||
|
DLL:= SafeLoadLibrary('cdejecter.dll');
|
||||||
|
GetVolumeInfo:= GetProcAddress(DLL, 'GetVolumeInfo');
|
||||||
|
EjectCD:= GetProcAddress(DLL, 'EjectCD');
|
||||||
|
DInfo:= GetVolumeInfo(WideChar(ADisc[1]));
|
||||||
|
if EjectCD (WideChar(ADisc[1])) then
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_ejectsuccess), DInfo)
|
||||||
|
else
|
||||||
|
Msg:= FormatDiscInfo(GetLocalizedString(cde_messages_ejecterror), DInfo);
|
||||||
|
FreeLibrary(DLL);
|
||||||
|
if not HasParam('silent') then
|
||||||
|
begin
|
||||||
|
WriteLn(GetLocalizedString(cde_messages_ejecttitle));
|
||||||
|
WriteLn(Msg);
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
procedure TCDEjecter.BuildTitle;
|
||||||
|
procedure WriteWord (const AWord: String; const hMaxLength: Byte; const ASymbol: Char);
|
||||||
|
var S1, S2: String;
|
||||||
|
Indx, hLen: Byte;
|
||||||
|
begin
|
||||||
|
hLen:= Length(AWord) div 2;
|
||||||
|
S1:= '';
|
||||||
|
for Indx:= 1 to hMaxLength - hLen - 1 do
|
||||||
|
S1:= S1 + ASymbol;
|
||||||
|
S1:= S1 + ' ';
|
||||||
|
S2:= ' ';
|
||||||
|
for Indx:= (Length(S1) + Length(StrT)) + 1 to MaxLength;
|
||||||
|
S2:= S2 + ASymbol;
|
||||||
|
WriteLn(S1 + AWord + S2);
|
||||||
|
end;
|
||||||
|
var StrT, StrV, StrC, StrABL: String;
|
||||||
|
MaxLength, hMaxLength, Indx: Byte;
|
||||||
|
const ASymbol: Char = '#';
|
||||||
|
begin
|
||||||
|
StrT:= 'CD Ejecter';
|
||||||
|
StrV:= GetLocalizedString(cde_version) + ' ' + GetCDEVerStr('cde');
|
||||||
|
StrC:= FormatStr(GetLocalizedString(cde_copyrights), ['$DEVYEARS$'], ['2011 - 2017']);
|
||||||
|
MaxLength:= 0;
|
||||||
|
MaxLength:= Length(StrT);
|
||||||
|
if Length(StrV) > MaxLength then
|
||||||
|
MaxLength:= Length(StrV);
|
||||||
|
if Length(StrC) > MaxLength then
|
||||||
|
MaxLength:= Length(StrC);
|
||||||
|
MaxLength:= MaxLength + 8;
|
||||||
|
hMaxLength:= MaxLength div 2;
|
||||||
|
StrABL:= '';
|
||||||
|
for Indx:= 1 to MaxLength do
|
||||||
|
StrABL:= StrABL + ASymbol;
|
||||||
|
WriteLn(StrABL);
|
||||||
|
WriteWord(StrT, hMaxLength, ASymbol);
|
||||||
|
WriteWord(StrV, hMaxLength, ASymbol);
|
||||||
|
WriteWord(StrC, hMaxLength, ASymbol);
|
||||||
|
WriteLn(StrABL);
|
||||||
|
WriteLn('');
|
||||||
|
end;
|
||||||
|
var Application: TCDEjecter;
|
||||||
|
{$R *.res}
|
||||||
|
begin
|
||||||
|
Application:= TCDEjecter.Create(Nil);
|
||||||
|
Application.Title:= 'CD Ejecter';
|
||||||
|
Application.Run;
|
||||||
|
Application.Free;
|
||||||
|
end.
|
||||||
Some files were not shown because too many files have changed in this diff Show More
Reference in New Issue
Block a user