Отобразить в Image картинку с интернета

[Giku]

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

1)есть обработка ошибок, попытатся грузить как ГИФ, если не выходит, то как ПНГ.
2)есть еще HEAD запрос.
3)определять руками.

1) есл вы про TRY и EXCEPT то не получается
2) счас поищу
3) руками тоже не получится так как обьектов много (и создаются они динамически)

[Giku]

разобрался

если кому то надо вот что у меня

var
   Form1: TForm1;
   myFile: file;
   str: string;
   byteArray : array[1..8] of byte;
   i, count: Integer;
implementation

{$R *.dfm}


procedure TForm1.ButtonClick(Sender: TObject);
begin
  AssignFile(myFile,'C:\Users\pla-pla-pla\61ca84a086');
  Reset(myFile,1);
  BlockRead(myFile, byteArray, 4, count);
  for i := 1 to 4 do
  Memo.Lines.Add(Char(byteArray[i]));
end;
end.

ксли что неправильно то поправьте.
Всем спасибо

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

) есл вы про TRY и EXCEPT то не получается

по умолчанию под отдалчиком ошибка всегда отображается.