[eXeC0D3]

Прошу вас помогите срочное дело хочу сделать форму на премер как етот: link

заранее болшое спосибо

[eXeC0D3]

некто не может ? ;(

[0nni]

Используй либо регионы, либо TransparentColor (для верссий дельфи выше 5-й)

[eXeC0D3]

а примерчик нелзя? )

[ApplicatiOn]

устанавливаешь форме цвет (например clWhite)

OnFormCreate

TransparentColor := true;
TransparentColorValue := clWhite;

Все что на форме белое - станет прозрачным.

загружаешь изображение с белым фоном и фон будет прозрачен. придаш любую форму...

[ApplicatiOn]

или просто укажешь TransparentColor, и он возьмет (если не ошибаюсь) с левого нижнего угла пиксел и по нему так же сделает все прозрачное..

[eXeC0D3]

спосибо, а как сделать так чтобы TransparentColor не деиствовал на веб броузер WebBrowser1 ?

[ApplicatiOn]

никак, он перехватывает прорисовку формы.. Это тогда надо делать прозрачным отдельные элементы (это я уже незнаю, возможно ли вообще в стандартных процедурах).

есть только такой вариант, например, форме задать маловстречающийся цвет HEX'а:

form1.color := $D17897 (что-то близко к фиалетовому)

TransparentColor := true;
TransparentColorValue := $D17897;

останется рачитывать только на то чтобы этот цвет не попался в web browser'e. Вообще это немного извращенный способ))

а вот микро - програмку накотал (для делфи чтоб не париться с цветами)
http://depositfiles.com/files/sbblth5ye

код любого цвета)

[0nni]

Все таки лучше не париться с TransparentColor а чуть-чуть почитаь про регионы. Примеров в сети море

[eXeC0D3]

и вот еше

var
h : hwnd;
begin
h := FindWindow(nil, 'mu');
if h <> 0 then
ShowWindow(h,WS_MINIMIZE)
else
ShowMessage('Window Not Found !');
end;

делаю так и окошка сворачиваится и потом опять идет на свое место
а в чем проблема?

Делаю Mu Window Minimizer

[eXeC0D3]

Nobody knows, how to switch fullscreen window mode to "windowmode" screen while game?