Jump to content
Korean Random

DuMaH_K

User
  • Posts

    83
  • Joined

  • Last visited

Posts posted by DuMaH_K

  1. 1 минуту назад, Pavel3333 сказал:

    браузер со списком изменений

    норм

    1 минуту назад, Pavel3333 сказал:

    после обновы 27.03 в моде будет автообновлялка

    то есть? автоматически обновление мода без вмешательства юзера? а так можно разве?)

     

  2. 2 часа назад, yridro сказал:

    Это так сложно наверное... крестик на картинке глазами найти и нажать его мышкой...

    Вовсе не сложно, но я в игру захожу с перерывами и каждый раз это окно надоедает наблюдать

     

    2 часа назад, StranikS_Scan сказал:

    Я так понимаю по здравой логике должно один раз выскочить ))))))))

     

    2 часа назад, SEREGA_SF сказал:

    Не, там при каждом новом заходе в клиент вылазает, Пашка видимо торопился сильно))

    Мне лично вообще не мешает)

    Я не против если оно бы выскакивало в системном канале, но на весь экран - это перебор.

    Была бы хоть картинка красивая, а так... :smile:

  3. @ktulho ничего не понимаю... DefaultDirName={code:WotDir} указано, вызов функции есть, ошибок нет, а результат все равно такой:

    2018-01-06_205612.png.caa28a6177a06cb41177f52406edda23.png

    Задача то пустяковая. Найти нужную папку и закинуть в неё другую папку, а вожусь уже третьи сутки...

  4. 1 минуту назад, ktulho сказал:

    не совсем понятно, что вы сделать в этой строчке

    Я тоже не понимаю что творю)

    2 минуты назад, ktulho сказал:

    попробуйте заменить ее на:

    
    Result := Copy(Buffer,0,Pos(#0, Buffer));

    тот же результат - пустая строка адреса

  5. 32 минуты назад, ktulho сказал:

    WOT_GetClientVersionW(Buffer, Length(Buffer) - 1, Index);

    подставил этот вариант, не вылетает, но и не определяет (точнее не присваивает нужное) значение

    function WotDir (Path: String): String;
    var
      ClientsCount, Index: Integer;
      Str: String;
    begin
      ClientsCount:= WOT_GetClientsCount();
    
      if ClientsCount > 0 then
      begin
        for Index:=1 to ClientsCount do 
        begin
          WOT_GetClientVersionW(Buffer,Length(Buffer)-1,Index);
    //      Str:=Copy(Buffer,0,Pos(#0, Buffer));
    
          case WOT_GetClientBranch(Index) of     //выбираем тип клиента
             1: begin                                      //релиз
                  WOT_GetClientPathW(Buffer,Length(Buffer)-1,Index);
                  Result:=ExpandConstant(Buffer);
                end;
             2: begin                                      //
                  WOT_GetClientPathW(Buffer,Length(Buffer)-1,Index);
                  Result:=ExpandConstant(Buffer);
                end;                               
             3: begin                                      //
                  WOT_GetClientPathW(Buffer,Length(Buffer)-1,Index);
                  Result:=ExpandConstant(Buffer);
                end;                               
             4: begin                                      //
                  WOT_GetClientPathW(Buffer,Length(Buffer)-1,Index);
                  Result:=ExpandConstant(Buffer);
                end;                               
          end;
           
        end;
      end; 
    
    end;

    тупо пустая строка пути..

  6. Пробовал выбрать таким способом:

     

    #include "findwot.iss"

    [Files]

    Source: Files\findwot.dll; DestDir: "{tmp}"; Flags: ignoreVersion dontcopy;

     

    var  

    Buffer:String;

    function WotDir (Path: String): String;

    var  

    ClientsCount, Index: Integer;  

    Str: String; begin  

    ClientsCount:= WOT_GetClientsCount();  

    if ClientsCount > 0 then

      begin

        for Index:=1 to ClientsCount do

          begin

          WOT_GetClientVersionW(Buffer,1024,Index);

          Str:=Copy(Buffer,0,Pos(#0, Buffer));

          case WOT_GetClientBranch(Index) of     //выбираем тип клиента

             1: begin                                      //релиз

                  WOT_GetClientPathW(Buffer,1024,Index);

                  Result:=ExpandConstant(Buffer);

                end;

             end;

            end;  

       end; 

    end;

     

     

    в лог выдает

     

     


    [17:25:33,190] *** Setup started [17:25:33,497] Setup version: Inno Setup version 5.5.9 (a) [17:25:33,498] Original Setup EXE: D:\Games\Для WOT\МодПак\oleni\Output\OLENI_v17.exe [17:25:33,499] Setup command line: /SL5="$350A56,560234,215552,D:\Games\Для WOT\МодПак\oleni\Output\OLENI_v17.exe" /SPAWNWND=$3C111C /NOTIFYWND=$3F104C /DEBUGWND=$4F0612 [17:25:33,501] Windows version: 10.0.16299 (NT platform: Yes) [17:25:33,502] 64-bit Windows: Yes [17:25:33,503] Processor architecture: x64 [17:25:33,505] User privileges: Administrative [17:25:33,534] 64-bit install mode: No [17:25:33,536] Created temporary directory: C:\Users\0D0B~1\AppData\Local\Temp\is-RE0OL.tmp [17:25:33,541] Extracting temporary file: C:\Users\0D0B~1\AppData\Local\Temp\is-RE0OL.tmp\findwot.dll [17:25:37,452] *** Setup exit code: 0xC0000409

     

     

    и вылетает

     

     


    2018-01-06_172734.thumb.png.ece6fa05a0fe53d0cc7b1b7d83214a81.png
     

     

×
×
  • Create New...