Цитата:
|
Сообщение от 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;
|