पारदर्शी रूप से क्लिक करें

Question

मेरे पास अर्द्ध पारदर्शी पूर्णस्क्रीन फ़ॉर्म है और मुझे इस फ़ॉर्म पर अपने कंप्यूटर को नियंत्रित करने की आवश्यकता है।

असल में हमें आकाश को देखने के लिए कंप्यूटर पर लाल स्क्रीन फ़िल्टर की आवश्यकता है, लेकिन हम लाल प्लेक्सीग्लस जैसे कुछ का उपयोग नहीं करना चाहते हैं।

मैंने विंडोज एपीआई (मॉनीटर कॉन्फ़िगरेशन फ़ंक्शन) की निगरानी की http://msdn.microsoft.com/en-us/library/windows/desktop/dd692964(v=vs.85).aspx लेकिन मैं इसे नहीं कर सकता। मैंने लाल फ़िल्टर की तरह पारदर्शी रूप किया (सब कुछ लाल और काले स्वर लगता है), लेकिन मैं अपने रूप में कंप्यूटर को नियंत्रित नहीं कर सकता। कोई भी उस बारे में मेरी मदद करता है?

Answer 1

एक नया वीसीएल परियोजना बनाएं। मुख्य रूप के गुणों में, clRed को Color निर्धारित करते हैं, AlphaBlendtrue को, AlphaBlendValue127 को, WindowStatewsMaximized को, FormStylefsStayOnTop के लिए, और निम्नलिखित कोड जोड़ें:

type 
    TForm1 = class(TForm) 
    private 
    protected 
    procedure CreateParams(var Params: TCreateParams); override; 

... 

procedure TForm1.CreateParams(var Params: TCreateParams); 
begin 
    inherited; 
    Params.ExStyle := Params.ExStyle or WS_EX_LAYERED or WS_EX_TRANSPARENT; 
end; 

(Sample video, Sample compiled EXE, Source)