Картинка изменяла свой размер вместе с формой программы

← →
Kamilos © (2011-12-07 16:48) [0]

Как програмно сделать чтобы картинка изменяла свой размер вместе с формой самой программы?

← →
Омлет © (2011-12-07 16:53) [1]

В событии отрисовки картинки надо учитывать размеры формы. Событие это срабатывает при каждом изменении размеров формы.

← →
MBo © (2011-12-07 16:56) [2]

Корнет, Вы - женщина?! ©

Какая картинка?

На всякий случай - см. событие OnResize

← →
Kamilos © (2011-12-07 16:56) [3]

> В событии отрисовки картинки надо учитывать размеры формы.
> Событие это срабатывает при каждом изменении размеров формы.
>

А как это?

← →
Kamilos © (2011-12-07 16:58) [4]

> Корнет, Вы - женщина?!

Я нет, а вот подруга да ей красивости хочеться.

← →
Ega23 © (2011-12-07 17:10) [5]

1. http://docwiki.embarcadero.com/VCL/XE2/en/Controls.TControl.Align
2. http://docwiki.embarcadero.com/VCL/XE2/en/Controls.TControl.Anchors

← →
Омлет © (2011-12-07 17:12) [6]

На форму положить PaintBox, присвоить обработчики OnCreate для формы и OnPaint для PaintBox"а. В папку с программой положить картинку 1.bmp:

TForm1 = class(TForm) PaintBox1: TPaintBox; procedure FormCreate(Sender: TObject); procedure PaintBox1Paint(Sender: TObject); private fBmp: TBitmap; end; ... procedure TForm1.FormCreate(Sender: TObject); begin fBmp := TBitmap.Create; fBmp.LoadFromFile("1.bmp"); end; procedure TForm1.PaintBox1Paint(Sender: TObject); begin PaintBox1.Canvas.StretchDraw(ClientRect, fBmp); end;

← →
Омлет © (2011-12-07 17:14) [7]

Но если рисуешь прямо на форме - см. [2] (OnResize).

← →
MBo © (2011-12-07 17:19) [8]

>Я нет, а вот подруга да ей красивости хочеться.
Да я насчет т.н. "женской логики" - когда наружу выдаются только обрывки мыслей. Вот отвечающим телепатам и приходится додумывать, о чём же конкретно идёт речь.

← →
Dennis I. Komarov © (2011-12-08 01:24) [9]

"Зачем нам кузнец? Нам кузнец не нужен." ©

Всем спасибо за помощь. Убедил подругу что эта функция нафиг ненужна.

бгггг

>что эта функция нафиг ненужна.
А из чего это следует? ;)

> А из чего это следует? ;)

Лучшее - враг хорошего. :)

Картинка изменяла свой размер вместе с формой программы Найти похожие ветки