Показать сообщение отдельно
  #7  
Старый 27.06.2013, 23:23
Аватар для angvelem
angvelem angvelem вне форума
.
 
Регистрация: 18.05.2011
Адрес: Омск
Сообщения: 3,970
Версия Delphi: 3,5,7,10,12,XE2
Репутация: выкл
По умолчанию

Цитата:
Сообщение от Alegun
У нас наверное версии разные
Наверное, только и у меня 2002 года.
Код:
procedure TForm1.Button3Click(Sender: TObject);
begin
  Image1.Picture.LoadFromFile('image.jpg');
  Image1.Update;
  sleep(500);
  Image1.Picture.LoadFromFile('F:\PICTURE\JPG\Animals\1.jpg');
  Image1.Update;
  sleep(500);
  Image1.Picture.LoadFromFile('rose.jpg');
end;
__________________
Je venus de nulle part
55.026263 с.ш., 73.397636 в.д.
Ответить с цитированием