Показать сообщение отдельно
  #2  
Старый 29.03.2012, 18:00
Аватар для Страдалецъ
Страдалецъ Страдалецъ вне форума
Гуру
 
Регистрация: 09.03.2009
Адрес: На курорте, из окна вижу теплое Баренцево море. Бррр.
Сообщения: 4,723
Репутация: 52347
По умолчанию

ScrollBox и Image вам в руки. Все методы там есть.
Вот так можно загружать:
Код:
procedure TForm1.BitBtn1Click(Sender: TObject);
Var
  Jpg: TJpegImage;
begin
 Jpg := TJpegImage.Create;
 Jpg.LoadFromFile('C:\11\c130030228.JPG');
 Map.Left := 0;
 Map.Top := 0;
 Map.Width := Jpg.Width;
 Map.Height := Jpg.Height;
 Map.Picture.Assign(Jpg);
 Jpg.Free;
end;
__________________
Жизнь такова какова она есть и больше никакова.
Помогаю за спасибо.
Ответить с цитированием