[El Sanchez]

Необходим пример чтения xml файла »

Gugle, пример xml никуда не годится, исправил на такой:

читать дальше »

PHP код:

<root>

    <element_1></element_1>

    <element_11></element_11>

    <element_12>

        <element_121 attr1='121.1' attr2='121.2' attr3='121.3'></element_121>

        <element_122 attr1='122.1' attr2='122.2' attr3='122.3'></element_122>

        <element_123 attr1='123.1' attr2='123.2' attr3='123.3'></element_123>

    </element_12>

    <element_13></element_13>

    <element_2>

        <element_21></element_21>

        <element_22></element_22>

        <element_23></element_23>

    </element_2>

    <element_3></element_3>

 </root> 

Парсер будет сильно зависеть от самого xml, нужные ноды могут быть где угодно в иерархии, с/без аттрибутами. Для данного примера скрипт может быть такой:

Код:

...
objXMLDoc := CreateOleObject('Microsoft.XMLDOM');  //создаем объект
  objXMLDoc.async := False;  //синхронный режим
  objXMLDoc.load('d:\Program Files\Inno Setup 5\Projects\test\Output\test.xml');   //грузим файл
  XMLPath := '//root/element_12';  //выделяем нужные ноды. Эта строка может быть очень большой
  if objXMLDoc.parseError.errorCode <> 0 then Exit; //если структура файла не xml, выходим
  objNodes := objXMLDoc.selectNodes(XMLPath); //получаем список нод в зависимости от ранее заданного XMLPath
  if objNodes.length > 0 then for i := 0 to objNodes.Length-1 do //в данном случае нода будет всего лишь одна
    if objNodes.item[i].hasChildNodes then  //если нода имеет дочерние ноды,...
      for j := 0 to objNodes.item[i].childNodes.length-1 do //... то для всех детей...
      begin
        MsgBox(objNodes.item[i].childNodes.item[j].nodeName, mbInformation, MB_OK); //...выводим имя дочерней ноды,
        for k := 0 to objNodes.item[i].childNodes.item[j].attributes.length-1 do
        begin
          MsgBox(objNodes.item[i].childNodes.item[j].attributes.item(k).name, mbInformation, MB_OK); //...названия ее аттрибутов
          MsgBox(objNodes.item[i].childNodes.item[j].attributes.item(k).value, mbInformation, MB_OK); //...и значения аттрибутов
        end;
      end;

[Devils Night]

Проблема, при установке не записываются записи реестра, как решить?

В общем

Код:

; Служба 2
Root: HKLM; SubKey: SYSTEM\CurrentControlSet\Services\Служба; ValueType: string; ValueName: DisplayName; ValueData: Служба; Flags: uninsdeletekey
Root: HKLM; SubKey: SYSTEM\CurrentControlSet\Services\Служба; ValueType: string; ValueName: ObjectName; ValueData: LocalSystem; Flags: uninsdeletekey
Root: HKLM; SubKey: SYSTEM\CurrentControlSet\Services\Служба\Enum; ValueType: string; ValueName: 0; ValueData: Root\LEGACY_СЛУЖБА_SERVICE\0000; Flags: uninsdeletekey

записываются нормально, а

Код:

[Registry]
; Служба 1
Root: HKLM; SubKey: SYSTEM\CurrentControlSet\Enum\Root\LEGACY_СЛУЖБА_SERVICE\0000; ValueType: string; ValueName: Service; ValueData: Служба; Flags: uninsdeletekey
Root: HKLM; SubKey: SYSTEM\CurrentControlSet\Enum\Root\LEGACY_СЛУЖБА_SERVICE\0000; ValueType: string; ValueName: Class; ValueData: LegacyDriver; Flags: uninsdeletekey
Root: HKLM; SubKey: SYSTEM\CurrentControlSet\Enum\Root\LEGACY_СЛУЖБА_SERVICE\0000; ValueType: string; ValueName: DeviceDesc; ValueData: Служба; Flags: uninsdeletekey
Root: HKLM; SubKey: SYSTEM\CurrentControlSet\Enum\Root\LEGACY_СЛУЖБА_SERVICE\0000\Control; ValueType: string; ValueName: ActiveService; ValueData: Служба; Flags: uninsdeletekey

не хочет, пишет Отказано в доступе, что делать?

P.S

так что харе флуд разводить »

Сам же спрашивает, а потом ещё говорит харе флудить.valyok666, krutx, вы оба могли бы и через ПМ об этом поспорить.

[Rikill]

Devils Night, попробуй в конце строчек добавить это:

Код:

Permissions: full

[Devils Night]

попробуй в конце строчек добавить»

Не работает, пишет ошибку: Parameter "Permissions" includes a malformed value "full"

[Arsi000]

друзья! подскажите пожалуйста что значит в секции Files флаг Flags: ignoreversion gacinstall
ну ignoreversion понятно, а вот что такое gacinstall? для чего это надо и в каких случаях может знает кто

[derfyt]

У меня такой вопрос что нужно написать в скрипте чтобы...
Он устанавливал дополнительные программы перед установкой главной программы..
Ну что то типо: запустил Setup.exe; Нажал далее выбрал директорию типо началась установка, но сначала вылетело окно с directx установкой... (типо установите сначала это)..

[krutx]

как сделать сильное сжатие (используя только инно)
у меня в скрипте параметры сжатия

Код:

Compression=lzma2/ultra64
 LZMAMatchFinder=BT 
LZMAUseSeparateProcess=true 
LZMANumFastBytes=273 
LZMADictionarySize=131072 
InternalCompressLevel=ultra64
 SolidCompression=true 
MergeDuplicateFiles=true

[Rikill]

krutx, ну всё. Максимум.
derfyt , почему бы не сделать установку direct x обязательной после установки программы? С помощью секции [run]?

[insombia]

вот мой скрипт переделанный valyok666 может кому надо готовый скрипт для CODMW3
http://rghost.ru/29571811

[Vista-w]

insombia,
В секции [*run]
измени на это
-------------------------
Check: CheckError and SoftCheck
Не будет окон ошибок установки DirectX VC++ и т.д
-------------------------
И кнопку далее на странице SelectDirPage преименуй на "Установить" а то юзверь будет думать, что имеется еще какойнить шаг перед установкой.
-------------------------