Последние записи

made in programmersforum 5

Интенсив по Python: Работа с API и фреймворками 24-26 ИЮНЯ 2022. Знаете Python, но хотите расширить свои навыки?
Slurm подготовили для вас особенный продукт! Оставить заявку по ссылке - https://slurm.club/3MeqNEk

Online-курс Java с оплатой после трудоустройства. Каждый выпускник получает предложение о работе
И зарплату на 30% выше ожидаемой, подробнее на сайте академии, ссылка - ttps://clck.ru/fCrQw

17th
Янв

Загрузка изображения через com-порт

Posted by maloy under Delphi, Архив

maks448

Прошу помочь в решении такой задачи: через ком-порт приходит файл изображения в формате jpeg(с камеры). Нужно его сохранить на диск под каким-то именем. Считываю его с порта в массив в виде набора байтов, а что дальше с ним делать( т.е как его «переделать» в файл!) — что-то никак не соображу, т.к. раньше никогда с этим не сталкивался. Прошу подбросить идею, хотя не откажусь и от реального примера.

Пепел Феникса

можно так

Код:

type
  TArrayOfByte=array of byte;

procedure SaveFileFromBytes(FileName:string;const bytes:TArrayOfByte);
var i:integer;
    FileS:TFileStream;
begin
 FileS:=TFileStream.Create(FileName,fmCreate);
 for i:=Low(Bytes) to High(Bytes) do FileS.Write(Bytes,1);
 FileS.Free;
end;

тема на форуме от 2009 года