FreePascal.ru

Можно небольшой примерчик по MD5Stream (или все же MD5Buffer?)?

Да, я в курсе про Application.ProcessMessages, однако у меня файлы размером в 50-200 мбайт (текстуры), поэтому фриз все же существует
Ткните меня в нужную сторону, возможно, можно переделать подобный кусок кода от TProcess:

CompProc := TProcess.Create(nil);
with TProcess.Create(nil ...

Ага, помогло, спасибо.

Теперь главная загвоздка - как убрать блокировку главной формы при подсчете хеша, не вынося при этом MD5File в отдельный тред...

Вот и проблемка с MD5:

procedure TForm1.Button2Click(Sender: TObject);
begin
Index := 0;
fn := TStringList.Create;
md5s := TStringList.Create;

fn.LoadFromFile(ExtractFilePath(Application.EXEName) + 'hashes.name');

try repeat
MD5Print(MD5File(fn&#46 ...

Протокол, естественно, HTTP
Спасибо за советы, сегодня буду пробовать (как доберусь до рабочего компьютера)

Да, я новичок, поэтому могу не представлять как это все можно оформить

Задача следующая - слить с сервера файл, генерируемый "find . ! -type d -print0 | xargs -0 md5sum", взять оттуда данные и сравнить с md5 локального файла.

Я просто не совсем понимаю как это реализовать

Необходимо сравнить несколько файлов на локальной машине и на удаленной по MD5. Есть ли какая-нибудь документация по этому поводу? Или кто-нибудь может предоставить пример?

Спасибо большое, помогло :> Вот что получилось у меня:

procedure TForm1.LAUNCHURTClick(Sender: TObject);
begin
cmdopts := ' +name ' + NICK.Text + ' +connect ' + IPADDRESS.Text;
cmdopts1 := ' +password ' + PWFIELD.Text;
Xoverlay := 'xinit /usr/bin/mumble-overlay ...

Пишу небольшую программку для облегчения жизни геймерам-линуксоидам. Суть программы вот в чем: запускается процесс ioUrbanTerror.ARCH, путь до которого хранится в BINARYPATH (TEdit). К нему, в зависимости от выбранных параметров, добавляются такие опции, как запуск mumble-overlay, или же запуск во ...