SFX-Macros – Утилита для автоматизации установки приложений

[Ninsha]

VitProff, Я не использую wget.exe, знаю только, что с его помощью можно скачивать файлы. Я никогда не работал ни с http ни с https, и нет желания начинать.

[TToLL]

Сrack, Тогда если можно поделитесь тем как организовано скачивание файлов в Макрос.


Цитата Сrack:



Я никогда не работал ни с http ни с https,

SFX-Macros – Утилита для автоматизации установки приложений

Но файлы по http Макрос качает хорошо?

[TToLL]

Цитата VitProff:



Но файлы по http Макрос качает хорошо?

SFX-Macros – Утилита для автоматизации установки приложений

Я не так часто ей пользовался, битых файлов не было, были конечно неудачные попытки, на что срабатывала проверка по размеру.





Скрытый текст

[spoiler]Код:

[/spoiler]

Код: Выделить всё

function GetInetFileSize(const FileUrl:string): integer;
var
  idHTTP: TidHTTP;
begin
  Try
  Result:=0;
  idHTTP:=TIdHTTP.Create(nil);
  idHTTP.Head(FileUrl);
  Result:=idHTTP.Response.ContentLength;
  IdHTTP.Free;
  Except
  Result:=0;
  Exit;
  End;
end;

Код:

Код: Выделить всё

const BufferSize = 1024;
var hSession, hURL: HInternet;
Buffer: array[1..BufferSize] of Byte;
BufferLen: DWORD;
f: File;
sAppName: string;
OpSize,OpSizeAll:Int64;
FileNameTemp:String;
FileNameTemp:=Converter('%Temp%\'+Random(8)+'.tmp');
   sAppName := ExtractFileName(Application.ExeName);
   hSession := InternetOpen(PChar(sAppName), INTERNET_OPEN_TYPE_PRECONFIG,
         nil, nil, 0);
   try
      hURL := InternetOpenURL(hSession,
      PChar(fileURL),nil,0,0,0);
      try
         AssignFile(f, FileNameTemp);
         Rewrite(f,1);
         repeat
            InternetReadFile(hURL, @Buffer, SizeOf(Buffer), BufferLen);
            BlockWrite(f, Buffer, BufferLen);
            OpSize:=OpSize+BufferLen;
            FormProgress.ProgressBar1.Position:=(OpSize*100) div OpSizeAll;
            Application.ProcessMessages;
         until BufferLen = 0;
         CloseFile(f);
         Result:=True;
      finally
      InternetCloseHandle(hURL);
      end;
   finally
   InternetCloseHandle(hSession);
   FormProgress.ProgressBar1.Visible:=False;
   end;

[Сrack]

Сrack, А ResHacher меняет эти данные в SFX-Macros без проблем?

И ещё вопрос: в последней версии SFX-Macros ключ /config не работает?

[TToLL]

hi,everybody

i'm really glad to be part of this good excellent forum

i'd like to ask :

Please tell me how to change the logo popup in the nice program called "sfx macros" (our topic now)

and guide me to change the logo popup from macros to my name in all resulting macros exe files

thanks in advance

i really need this to learn

waiting for the help

thanks to much

[TToLL]

Как удалить целую ветку в реестре(Конкретное значение удаляет, а ветку не получается)?

[TToLL]

TToLL, Только если через командную строку



Код:

Код: Выделить всё

C:\Windows\system32\cmd.exe /c команда

[katya74]

Здравствуй Уважаемый Сrack! Помогите мне пожалуйста, как с помощью программы макрос сделать так, чтобы Microsoft .NET Framework 4.5.2 выглядел в программе MinstAll как один файл, но при этом при его инсталяции устанавливался языковый пакет и все обновления. Как можно объединить в одно меню, с помощью этой утилиты.

[Сrack]

katya74, В чем именно сложность?

[Сrack]

TToLL, Сначала заблокировал запуск процесса TeamViewer.exe, потом разблокировал, но не сразу, а через 5 секунд, т.к. не понятно как он запускается, его похоже запускает не сам инсталлятор, а его дочерний процесс.