डेल्फी

Question

में कौन सी ईवेंट कॉल प्रक्रिया निर्धारित करने के लिए मेरे पास डेल्फी में XYZ (प्रेषक: TObject) नामक एक प्रक्रिया है। मेरे फॉर्म पर एक बटन है।

Button.onclick:= xyz; 
Button.OnExit:= xyz; 

दोनों घटनाएं एक ही प्रक्रिया को कॉल करती हैं। मैं प्रक्रिया XYZ में निर्धारित करना चाहता हूं, जो ईवेंट इस (ऑनक्लिक या एक्सिटिट) को कॉल करता है और उसके अनुसार कोडिंग के साथ आगे बढ़ता है। यह निर्धारित करने के लिए कि कौन सी घटना निकाल दी जाती है? धन्यवाद

Answer 1

आप उचित जानकारी से उस जानकारी को पकड़ नहीं सकते हैं। समाधान दो अलग-अलग शीर्ष-स्तरीय ईवेंट हैंडलर का उपयोग करना है जो बदले में एक और विधि को कॉल कर सकते हैं, यह पहचानने के लिए कि कौन सा ईवेंट संभाला जा रहा है।

type 
    TButtonEventType = (beOnClick, beOnExit); 

procedure TMyForm.ButtonClick(Sender: TObject); 
begin 
    HandleButtenEvent(beOnClick); 
end; 

procedure TMyForm.ButtonExit(Sender: TObject); 
begin 
    HandleButtenEvent(beOnExit); 
end; 

procedure TMyForm.HandleButtonEvent(EventType: TButtonEventType); 
begin 
    //use EventType to decide how to handle this 
end;