Перейти к содержимому
Korean Random

D_MAN_1987

Пользователь
  • Публикации

    48
  • Зарегистрирован

  • Посещение

Репутация

7 Нуп

Контакты

  • Ник
    D_MAN_1987
  • Сервер WoT
    RU / CIS

Посетители профиля

800 просмотров профиля
  1. @ktulho очень спасибо @ЛОМ вот тут рабочий вариант
  2. @ktulho я думаю здесь описаны все имеющиеся в библиотеке процедуры. В общем спасибо всем, кто тратил время и нервы) Поставил юникод версию и заработало)
  3. @ktulho ну етижипасатижи! Нормально определил! А у меня дичь выдает... 5,5,9(а) версия у вас какая?
  4. @ktulho и мы вернулись к результату "двухстраничной" давности.... Пришлите ваш экзешник, пожалуйста, попробую его у себя запустить, посмотрим что покажет
  5. @ktulho у вас компилится?? у меня нет
  6. @ktulho ничего не понимаю... DefaultDirName={code:WotDir} указано, вызов функции есть, ошибок нет, а результат все равно такой: Задача то пустяковая. Найти нужную папку и закинуть в неё другую папку, а вожусь уже третьи сутки...
  7. @ktulho ну мне это нужно) Но результата никакого не могу добиться. Если есть готовый пример, как получить путь к релизу, одарите, если возможно) Вариант с реестром не всегда подходит, просто...
  8. @ktulho ну по идее строку с результатом WOT_GetClientPathW
  9. Я тоже не понимаю что творю) тот же результат - пустая строка адреса
  10. @ktulho procedure InitializeWizard(); begin SetLength(Buffer, 1024);
  11. подставил этот вариант, не вылетает, но и не определяет (точнее не присваивает нужное) значение 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; тупо пустая строка пути..
  12. procedure WOT_GetClientVersionW(Buffer: String; BufferSize: Integer; ClientIndex: Integer); @night_dragon_on разве размер буфера не указывается при вызове процедуры?
  13. Пробовал выбрать таким способом: в лог выдает и вылетает
×