Типизированные файлы из интернета

[lux16]

Привет, народ. Есть такой вопрос, вот допустим у меня на сервере есть типизированный файл, как бы мне его скачать прямо в память, и потом заполнить переменную - запись. Я умею скачивать сами файлы, но вот как сделать без сохранения на диск не знаю. Подскажите кто может, плз. Надо именно не создовая файла

[kangreon]

Если к примеру использовать компонент TIdHTTP для закачки файла, то это будет выглядить примерно так:

var
  http: TIdHTTP;
  ms: TMemoryStream;
  sl: TStringList;
begin
  http := TIdHTTP.Create(nil);
  ms := TMemoryStream.Create;
  http.get('http://site.com/file.txt', ms);
  http.Free;
  ms.Position := 0;

Все. Ваш файл будет находиться в памяти. А дальше уже делайте с файлом что угодно.

Продолжение.

  ...
  sl := TStringList.Create;
  sl.LoadFromStream(ms);  
end;

[lux16]

Хм, вот именно, что у меня с этим проблем нету, вопрос именно по типизированным файлам, как потом в переменную занести скаченный результат ?! Это я спрашивал

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

вас не смущает что "типизированные файлы"?
в Делфи этот механизм только для файлов.

[lux16]

Сообщение от Пепел Феникса

вас не смущает что "типизированные файлы"?
в Делфи этот механизм только для файлов.

Ну так немного =) Но все же, может есть решение ?

[kangreon]

Можите уточнить что за типизированный файл? Какой нибудь пример.

[lux16]

ХМ, вот есть структура:

type
 ff = packed record
  str: String[10];
 end;

Данная структура записана в файле, на сервере. Что тут не ясного ?

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

1)сохранить во временный файл и его открыть.
2)сохранить в поток, и читать его методами.
выходит примерно так:

type
 ff = packed record
  str: String[10];
 end;

//------------------------

var f:ff;
     MS:TMemoryStream;
begin
 MS:=TMemoryStream.Create;
 idhttp1.Get(<addr>,MS);
 MS.Position:=0;
 while (MS.Size-MS.Position)>=SizeOf(f) do
  begin
    MS.Read(f,SizeOf(f));
    //чтото делаем со структурой.
  end;

[lux16]

Оо, спс. Вот это как раз то, что нужно