Эффекты в компонентах.

← →
Лёха (2005-06-29 09:19) [0]

Дарова.
Вопрос такой. Можно-ли сделать появление компонента(TImage, TLabel и др.) эффектным, т.е. появляется в виде фрагментов, как бы разворачивался(по-моему, можно реализовать в цикле). Что-то вроде этого используется в проге DemoShield.
Зарание спасибо.

← →
TUser © (2005-06-29 09:30) [1]

Назначать компоненту регион (SetWindowRgn), только к TImage и TLabel эти никак не относится.

← →
gydvin (2005-06-29 09:35) [2]

А не проще отрисовывать на paintbox, а потом paintbox.visible:=false;

← →
Чай толпой (2005-06-29 09:42) [3]

Дарова Лёха!

исп. канву
TCanvas
например, TImage, в принципе = матрица точек, надо взять контекст устр-ва
Desktop: TCanvas;

Desktop := TCanvas.Create;
Desktop.Handle := GetWindowDC();
и вывести по-пиксельно TImage в каком угодно порядке

читай тут, в разделе графика
http://delphiworld.narod.ru/_all_articles_.html

пока, Лёха!

← →
Лёха (2005-06-29 09:53) [4]

Вот ещё вопросик. Как отоюразить форму в виде изображения (что-то вроде скина).

← →
Чай толпой (2005-06-29 09:56) [5]

Дарова Лёха!

читай тут, в разделе скины
http://delphiworld.narod.ru/_all_articles_.html

пока, Лёха!

← →
gydvin (2005-06-29 13:53) [6]

procedure TForm1.Button1Click(Sender: TObject); var Desk : TCanvas ; begin Desk := TCanvas.Create ; try with Desk do Handle := GetWindowDC (form1.Handle) ; with PaintBox1.Canvas do CopyRect (Rect (0, 0,form1.Width, form1.Height),Desk, Rect (0, 0,form1.Width, form1.Height)) finally Desk.Free end ;end ;

Эффекты в компонентах. Найти похожие ветки