घर
Top.Mail.Ru Yandeks.Metrika
मंच: "मीडिया";
वर्तमान संग्रह: 2003.04.10;
डाउनलोड करें: [xml.tar.bz2];

नीचे

रूप पारदर्शिता इसी तरह की शाखाएँ खोजें


Mr Black   (2003-01-05 02:34) [0]

Кто-нибудь знает как сделать любую часть формы сделать
прозрачной. Например чтобы был прозрачным левый верхний угол
обычной формы.



Evgeny   (2003-01-05 10:53) [1]

используй регионы.



Mihey   (2003-01-05 20:29) [2]

Лучше используй компонент, но вот у меня есть две функции, которые могут задать регионы компоненту по маске и восстановить то, что сделали:

प्रक्रिया क्रॉपविंडो (हैंडल: एचडब्ल्यूएनडी; पिक्चर: टीपीचित्र);
था
hrgn, hrgn1: पूर्णांक;
एचडीसी: पूर्णांक;
x, y: पूर्णांक;
रंग: टीसीरोल;
शुरू करना
// रंग: = चित्र। बिटमैप। कनवास।पिक्सल [0, 0];
रंग: = क्लेव्हीट;
एचडीसी: = गेटीडीसी (हैंडल);
hrgn: = CreateRectRgn (0, 0, Picture.Graphic.Width, Picture.Graphic.Height);
x के लिए: = 1 से चित्र। Graphic.Width करें
y के लिए: = 1 से चित्र। Graphic.Height do
अगर पिक्चर.बिटमैप.कैनवास.पिक्सल्स [x - 1, y - 1] = रंग तब शुरू होता है
hrgn1: = CreateRectRgn (x - 1, y - 1, x, y);
CombineRgn (hrgn, hrgn, hrgn1, RGN_DIFF);
DeleteObject (hrgn1);
अंत;
SetWindowRgn (संभाल, घंटा, सच);
// DeleteObject (घंटा);
रिलीज़डीसी (हैंडल, एचडीसी);
अंत;

procedure UncropWindow( Handle: HWnd; Picture : TPicture );
था
hrgn : integer;
एचडीसी: पूर्णांक;
शुरू करना
एचडीसी: = गेटीडीसी (हैंडल);
hrgn := CreateRectRgn( 0, 0, Picture.Graphic.Width , Picture.Graphic.Height );
SetWindowRgn (संभाल, घंटा, सच);
ReleaseDC( Handle, hdc );
अंत;



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

मंच: "मीडिया";
वर्तमान संग्रह: 2003.04.10;
डाउनलोड करें: [xml.tar.bz2];

ऊपर





मेमोरी: 0.54 एमबी
समय: 0.021 c
3-30312
Nikitos
2003-03-23 23:40
2003.04.10
DBF टेबल


1-30350
intell
2003-03-31 16:00
2003.04.10
PopupMenu में ProgressBar कैसे जोड़ें?


14-30591
nayk
2003-02-18 02:53
2003.04.10
मुझे बताएं कि एसएमएस द्वारा जानकारी कहां मिलेगी


1-30399
DenisX
2003-03-30 15:30
2003.04.10
कक्षाओं के साथ काम करें


14-30539
ddenisv
2003-03-24 04:26
2003.04.10
और क्यूआरपोर्ट कहां गया?





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