[Delphi] Ukrycie górnego paska

Jak za pomocą Delphi 6 ukryć górny pasek (ten na którym są: nazwa aplikacji, przyciski |_|, |X|)

Prosze o pomoc!

[code]Form1.BorderStyle := bsNone;[/code]

Można jeszcze utworzyć procedurę OnPaint formy i tak ją zmodyfikować:

[code]procedure TForm1.FormPaint(Sender: TObject);
var tmpRect: TRect;
begin
tmpRect:=Rect(0,0,width,height);
Frame3D(Form1.Canvas,tmpRect,clwhite,clgray,1);
end;[/code]

Dookoła krawędzi okna będzie ramka 3d.

Można jeszcze utworzyć procedurę OnPaint formy i tak ją zmodyfikować:

[code]procedure TForm1.FormPaint(Sender: TObject);
var tmpRect: TRect;
begin
tmpRect:=Rect(0,0,width,height);
Frame3D(Form1.Canvas,tmpRect,clwhite,clgray,1);
end;[/code]

Dookoła krawędzi okna będzie ramka 3d.

Frame3D() -- ??? co to za funkcja ?

A czy Canvas formy zawiera górną ramkę? Wydaje mi się, że nie...

A czy Canvas formy zawiera górną ramkę? Wydaje mi się, że nie...

Nie to jest Nonclient Arena ;] czy jakoś tak

Frame3D to funkcja z modułu ExtCtrls, korzysta z niej większość kontrolek graficznych Winzgrozy. Oczywiście ten sposób należy zastosować już przy włączonym BorderStyle=bsNone i wszystko będzie wyglądać ładnie. NoclientArea jest wywalane w taką jedną chorobę zakaźną :) a Frame3D narysuje nowe krawędzie okna. Ramka będzie ciut cieńsza niż standardowo, ale nawet ładniejsza. Czy wszystkie niejasności są już wyjaśnione?