Image обновление

[-BlindGuardian-]

Вот такая проблема у меня появилась. Программа наподобие графического редактора - на форме есть 2 image.
Один - рабочее поле, второй - миниизображение (навигатор) а-ля фотошоп. При каждом изменении первого имеджа, картинка заносится во временный файл (для возможности шага назад). Из этого же временного файла сразу же беру картинку для навигатора - чтобы изображения соответствовали. Но навигатор подвисает.
Т.е в нем не отображается последнее изменение. Однако если свернуть форму, затем развернуть - ситуация меняется и все обновляется. Это конечно хорошо, но пользователь каждый раз сворачивать окно не будет.
Пробовал метод Image.Refresh - безрезультатно.
В чем проблема?

[mihali4]

Из этого же временного файла сразу же беру картинку для навигатора

Зачем из файла ?
Почему просто не сделать Assign ?

[-BlindGuardian-]

Сообщение от mihali4

Зачем из файла ?
Почему просто не сделать Assign ?

Можно подробнее? Как работает процедура? Работаю не на своей машине сейчас, тут хелпника к делфи нету...^^

[MadReason]

Image2.Picture.Assign(Image1.Picture);

[-BlindGuardian-]

Тоже самое. Обновляется только при сворачивании и разворачивани формы.

[Kotofff]

А может все-таки вместо Image.Refresh попробовать Image.Repaint - потому как при разворачивании формы как раз происходит перерисовка всех контролов ...

[mihali4]

Опробовал простенько - никаких "затыков" не вижу:

procedure TForm1.Button1Click(Sender: TObject);
begin
Image2.Picture.Assign(Image1.Picture);
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
with Image1.Canvas do
begin
MoveTo(20,20);
Pen.Width:=5;
LineTo(100,100);
end;
end;

Проявляется моментально, безо всяких "репэйнтов"...
Может вы не на той канве рисуете ?

[-BlindGuardian-]

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

[mihali4]

Переложил Image2 на Panel1 - ничего не изменилось...
Все так же прекрасно обновляется.
Без выкрутасов.

[noveek]

Сегодня столкнулся ровно с этой же проблемой

Image1.Picture.FreeImage;
Image1.Refresh;
Image1.Repaint;
Image1.picture.Assign(bmp);

Не помогает

UPD:
Помогло так:

Image1.picture.Assign(bmp);
Image1.visible:=false;
Image1.visible:=true;