Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Форма [D5, D6, Win95/98, WinME]

Свой © (2002-06-01 02:38:00)
Прошу прошения но все таки!!!
Мне ну наверно нужен компонент который делает окна как я хочу, ну типа как у годзилы, ну т.е. любой формы со всеми там пораметрами, и все такое посоветуйте!!!
Спасибо !!!

bpv (2002-06-03 09:42:00) [1]
есть набор компонентов 1stClass компании Wolf2Wolf

Energy (2002-06-03 07:00:00) [2]
Если надо могу прислать статейку по этому поводу: простое окно неправильной формы, сложные окна, окна из картинок.
И давно видел такой компонент который позволяет рисовать окна произвольной формы.

Свой (2002-06-02 17:01:00) [3]
спасибо Всем!!! начал разбираться!!!

Sergey B.A. (2002-06-01 18:25:00) [4]
В королевстве Delphi поищи logomaker.

Blacki (2002-06-01 12:14:00) [5]
Ну можешь вот так сделать:
создай картинку rgn.bmp, где чёрным цветом пометь те места формы, которые должны быть дырявые, и напиши такой код:
function BitmapToRegion(Bitmap:TBitMap;TransColor:Tcolor):HRGN;
var
X,Y:integer;
XStart:integer;
begin
result:=0;
with Bitmap do
for Y:=0 to Height-1 do begin
x:=0;
while X<Width do begin
//Пропускаем прозрачные точки
while (X<Width) and (Canvas.Pixels[X,Y]=TransColor) do inc(X);
if X>=Width then Break;
XStart:=X;
//Пропускаем непрозрачные точки
while (X<Width) and (Canvas.Pixels[X,Y]<>TransColor) do inc(X);
//Создаём новый регион и добавляем его к региону всей картинки
if Result=0 then Result:=CreateRectRgn(XStart,Y,X,Y+1)
else CombineRgn(Result,Result,CreateRectRgn(XStart,Y,X,Y+1),RGN_OR);
end;
end;
end;

procedure TForm1.FormCreate(Sender: TObject);
var temp:tbitmap;
begin
temp:=tbitmap.Create;
temp.LoadFromFile("rgn.bmp");
setwindowrgn(form1.Handle,BitmapToRegion(temp,clBlack),true);
temp.Free;
end;

Anatoly Podgoretsky (2002-06-01 08:29:00) [6]
KaPaT © (01.06.02 02:43)
есть

Свой (2002-06-01 03:16:00) [7]
Ну вроде да есть формрег что то было но на 5 делфе ни идет а мож че не хватает там!!!
Ну впринципе да но все таки хочется же упростить себе жизнь !!

KaPaT (2002-06-01 02:43:00) [8]
А разве такие есть???
Сам слепи такие окна...там несложно...немного фантазии =))

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »