[lnkForumImage]
TotalShareware - Download Free Software

Confronta i prezzi di migliaia di prodotti.
Asp Forum
 Home | Login | Register | Search 


 

Forums >

ntu-kpi.comp.programming

[q] Delphi (Form Max

Vova aka Melkij

4/23/2005 3:19:00 PM

ëÁË × ÓÁÂÖÅ ÚÁÐÒÅÔÉÔØ ÍÁËÓÉÍÉÚÁÃÙÀ ÆÏÒÍÉ.

PS: ÷ÏÔ ÎÁÛÅÌ ÎÁ ÕÄÁÌÅÎÉÅ ÉÈ. ëÁË ÏÎÏ ÒÁÂÏÔÁÅÔ?

procedure TForm1.FormCreate(Sender: TObject);
var
l: DWORD;
begin
l := GetWindowLong(Self.Handle, GWL_STYLE);
l := l and not (WS_MINIMIZEBOX);
l := l and not (WS_MAXIMIZEBOX);
l := SetWindowLong(Self.Handle, GWL_STYLE, l);
end;

4 Answers

Helene

4/23/2005 4:05:00 PM

0

> ëÁË × ÓÁÂÖÅ ÚÁÐÒÅÔÉÔØ ÍÁËÓÉÍÉÚÁÃÙÀ ÆÏÒÍÉ.

åÓÌÉ ÈÏÞÅÛØ ÏÇÒÁÎÉÞÉÔØ × ÄÅÊÓÔ×ÉÑÈ ÐÏÌØÚÏ×ÁÔÅÌÑ - × Ó×ÏÊÓÔ×Å ÆÏÒÍÙ
BorderIcons ÓÔÁ×Ø biMaximize × False. üÔÏ ÓÄÅÌÁÅÔ ÎÅÁËÔÉ×ÎÏÊ ÓÏÏÔ×ÅÔÓÔ×ÕÀÝÕÀ
ËÎÏÐÏÞËÕ × ÚÁÇÏÌÏ×ËÅ ÏËÎÁ.

íÏÖÅÛØ ÍÅÎÑÔØ Ó×ÏÊÓÔ×Ï BorderStyle, ×ÓÅ ÐÒÅËÒÁÓÎÏ ÏÐÉÓÁÎÏ × help'Å.

íÏÖÎÏ ËÏÒÑ×Ï - ÉÓÐÏÌØÚÏ×ÁÔØ ÓÏÂÙÔÉÅ OnResize. :))

chook

4/23/2005 4:16:00 PM

0

Vova aka Melkij ?EUAO:
> eAE ? OAAOA UA?OAOEOO IAEOEIEUAAUA ?IOIE.
>
> PS: ÷IO IAUAI IA OAAIAIEA EE. eAE III OAAIOAAO?
>
> procedure TForm1.FormCreate(Sender: TObject);
> var
> l: DWORD;
> begin
> l := GetWindowLong(Self.Handle, GWL_STYLE);
> l := l and not (WS_MINIMIZEBOX);
> l := l and not (WS_MAXIMIZEBOX);
> l := SetWindowLong(Self.Handle, GWL_STYLE, l);
> end;
>

iO OAE UI IA NOII?
aAOAU OOEIO ?¦EIA, ?EEIA?A?U ? IOIIO EIIEOAOI¦ OOEI¦ ¦ OOA?EU IAUAA.

Muzman

4/24/2005 12:27:00 AM

0

ðÒÉ×ÅÔ Helene <helene@viii.ntu-kpi.kiev.ua>, ÜÔÏ ÔÙ ÎÁÐÉÓÁÌ:
> åÓÌÉ ÈÏÞÅÛØ ÏÇÒÁÎÉÞÉÔØ × ÄÅÊÓÔ×ÉÑÈ ÐÏÌØÚÏ×ÁÔÅÌÑ - × Ó×ÏÊÓÔ×Å ÆÏÒÍÙ
> BorderIcons ÓÔÁ×Ø biMaximize × False. üÔÏ ÓÄÅÌÁÅÔ ÎÅÁËÔÉ×ÎÏÊ
> ÓÏÏÔ×ÅÔÓÔ×ÕÀÝÕÀ ËÎÏÐÏÞËÕ × ÚÁÇÏÌÏ×ËÅ ÏËÎÁ.
óÁÍÙÊ ÏÐÔÉÍÁÌØÎÙÊ ×ÁÎÉÁÎÔ, ÓÁÍ ÔÁËÏÊ ÀÚÁÀ.
>
> íÏÖÅÛØ ÍÅÎÑÔØ Ó×ÏÊÓÔ×Ï BorderStyle, ×ÓÅ ÐÒÅËÒÁÓÎÏ ÏÐÉÓÁÎÏ × help'Å.
îÕ ÜÔÏ ÍÏÖÎÏ, ÅÓÌÉ ÎÅ ÈÏÞÅÔÓÑ ÌÁÚÉÔØ × Object Ispector...

> íÏÖÎÏ ËÏÒÑ×Ï - ÉÓÐÏÌØÚÏ×ÁÔØ ÓÏÂÙÔÉÅ OnResize. :))
ïÎÏ ×ÓÅ É ÔÁË ÞÅÒÅÚ ÎÅÇÏ ÒÁÂÏÔÁÅÔ, ÚÁÞÅÍ ×ÙÄÕÍÙ×ÁÔØ ×ÅÌÏÓÉÐÅÄ?

--
åÓÌÉ ÔÙ ÎÅ ÐÏÎÉÍÁÅÛ ÓÔÒÁÄÁÎÉÊ, ÔÙ ÌÅÇËÏ ÍÏÖÅÛ ÐÒÉÞÉÎÉÔØ ÅÝÅ ÂÏÌØÛÅ ÂÅÚ
×ÓÑËÏÊ ÚÁÄÎÅÊ ÍÙÓÌÉ. (ðÏÇÏ×ÏÒËÉ ó×ÏÂÏÄÎÙÈ É ÁËÓÉÏÍÙ âÅÎÅ äÖÅÓÅÒÉÔ)
[Team: M13 Group][Team: KGB][Tram: FE]

Chapaev

4/25/2005 8:11:00 AM

0

> > iIOAUO IAINOO O?IEOO?I BorderStyle, ?OA ?OAEOAOII I?EOAII ? help'A.
> iO UOI IIOII, AOIE IA EI?AOON IAUEOO ? Object Ispector...
?OI AU UOI UIA?EII?

> > iIOII EION?I - EO?IIOUI?AOO OIAUOEA OnResize. :))
> iII ?OA E OAE ?AOAU IACI OAAIOAAO, UA?AI ?UAOIU?AOO ?AIIOE?AA?
eOI "III"?