घर
Top.Mail.Ru Yandeks.Metrika
फोरम: "विनएपीआई";
वर्तमान संग्रह: 2004.12.12;
डाउनलोड करें: [xml.tar.bz2];

नीचे

विंडो अधिकतमकरण और सिस्टम संदेश इसी तरह की शाखाएँ खोजें


tchn   (2004-10-28 19:24) [0]

मैं डेल्फी आईडीई में अधिकतम के रूप में खिड़कियों के व्यवहार बनाने की कोशिश करता हूं।
मैं यही करता हूँ:

procedure TForm2.WMSysCommand(var Msg: TWMSysCommand);
var
 mf: TForm;
begin
 case Msg.CmdType of
   SC_MAXIMIZE:
     begin
       WindowState := wsMaximized;
       mf := Application.MainForm;
       Top := mf.Top + mf.Height;
       Height := Screen.WorkAreaHeight - Top;
       Left:=Screen.WorkAreaLeft;
       Width := Screen.WorkAreaWidth;
     end;
 end;
 inherited;
end;


यह काम करता है, लेकिन पूरी तरह से नहीं: जब आप सिस्टम बटन पर क्लिक करते हैं या सिस्टम मेनू आइटम चुनते हैं, तो सब कुछ ठीक है। लेकिन खिड़की के शीर्षक पर डबल क्लिक करने पर काम नहीं करता है। जाहिर है - पकड़ने के लिए एक और संदेश। लेकिन कौन सा?



DVM ©   (2004-10-28 19:39) [1]

WM_GETMINMAXINFO?



tchn   (2004-10-28 20:26) [2]

बहुत बहुत धन्यवाद!
WM_GETMINMAXINFO के साथ, सब कुछ बहुत सरल हो गया!



पन्ने: 1 पूरी शाखा

फोरम: "विनएपीआई";
वर्तमान संग्रह: 2004.12.12;
डाउनलोड करें: [xml.tar.bz2];

ऊपर





मेमोरी: 0.54 एमबी
समय: 0.086 c
4-1098948731
Lexx3D
2004-10-28 11:32
2004.12.12
सीडी, डीवीडी ड्राइव ...


3-1100224787
kostan
2004-11-12 04:59
2004.12.12
OnUpdateError के माध्यम से इंटरबेस डेडलॉक को कैप्चर करना मदद नहीं करता है


6-1092257951
PITER
2004-08-12 00:59
2004.12.12
टीसीपी के साथ काम करने के लिए एक घटक की पसंद के साथ सलाह दें


9-1092134680
Micah'GF
2004-08-10 14:44
2004.12.12
भग्न


14-1101363932
NewDelpher
2004-11-25 09:25
2004.12.12
विद्वानों के लिए एक प्रश्न: क्या पर्यवेक्षक के लिए शोध प्रबंध आवश्यक है?





अफ्रीकी अल्बानियन अरबी भाषा अर्मेनियाई आज़रबाइजानी बस्क बेलारूसी बल्गेरियाई कैटलन सरलीकृत चीनी) चीनी पारंपरिक) क्रोएशियाई चेक डेनिश डच अंग्रेज़ी एस्तोनियावासी फिलिपिनो फिनिश फ्रेंच
गैलिशियन् जॉर्जियाई जर्मन यूनानी हाईटियन यहूदी हिंदी हंगरी आइसलैंड का इन्डोनेशियाई आयरिश इतालवी जापानी कोरियाई लात्वीयावासी लिथुआनियाई मेसीडोनियन मलायी मोलतिज़ नार्वेजियन
फ़ारसी पोलिश पुर्तगाली रोमानियाई रूसी सर्बियाई स्लोवाक स्लोवेनियाई स्पेनिश स्वाहिली स्वीडिश थाई तुर्की यूक्रेनी उर्दू वियतनामी वेल्श यहूदी बंगाली बोस्नियाई
सिबुआनो एस्पेरांतो गुजराती हौसा हमोंग ईग्बो जावानीस कन्नड़ खमेर लाओ लैटिन माओरी मराठी मंगोलियन नेपाली पंजाबी सोमाली तामिल तेलुगु योरूबा
ज़ुलु
Английский Французский Немецкий Итальянский Португальский Русский Испанский