отображение текста на канве

[belyjj]

metka1:    
    proba:='Ñ èñïîëüçîâàíèåì '+inttostr(nom)+' ôàéëîâ - '+inttostr(kolvo)+' ðàç(à)';
   with Canvas do begin
     Canvas.Brush.Color:= clBtnFace;
     Canvas.Font.Size:=12;
     Canvas.TextOut(100,100,proba);    
    end;
    Exit;
   metka2:
    showmessage('metka2 '+inttostr(kolvo));
    proba:='Ñ èñïîëüçîâàíèåì '+inttostr(nom)+' ôàéëîâ - '+inttostr(kolvo)+' ðàç(à)';
    Canvas.Brush.Color:= clBtnFace;
    Canvas.Font.Size:=12;
    Canvas.TextOut(100,100,proba);
    Exit;

Почему во второй метке где стоит showmessage текс отображается нормально(строка proba), а если showmessage убрать, то текст не выводится?
В первой метке пробовал сделать нормально, но выводит только конец строки proba.

[Прик]

Что за Canvas (к какому компоненту прицеплен)? Canvas - это просто участок памяти и, если он ничему не принадлежит, то и не доступен взирающему на экран. Во втором случае отображение происходит потому что, после вызова и удаления диалога ShowMessage винда автоматически прорисовывает (рендерит) часть экрана, который был закрыт этим окном. Картинка на канве вынуждена прорисоваться.
Отсюда вывод: скорее всего, прорисовку изображения на канве в программе никто не делает.
Зависит, конечно, от компонента, которому принадлежит канва. Какие-то делают автоматом, какие-то нет.

[belyjj]

спасибо за ответ! мне нужно просто вывести текст на форму. Можно label сделать, но я думал так удобнее, сейщас поставил там ещё чото и так то всё выводится, походу рейдеринг)

[belyjj]

это получается можно Form1.canvas... сделать, да?