2010-01-28 17 views
1

我用新的複選框修改了madExcept的發送助手。如果使用選中此框,我想發送附加附件和錯誤報告(用戶數據文件的副本)。madExcept,在將附加文件附加到報告之前,檢查自定義助理中複選框的狀態

如何檢查用戶是否選中了該框?

問候, -Vegar

+1

您是否在madshi新聞組(news.soft-gems.net)詢問過?它有時在那裏很安靜,但目前Mathias似乎很活躍並且很快就會回答。 – frogb 2010-01-28 16:13:55

+0

標題顯示你想知道如何附加額外的東西。身體說你想知道如何檢查一個複選框。這是兩個完全不同的東西。你有什麼麻煩? (如果兩者都遇到問題,請考慮詢問兩個單獨的問題。) – 2010-01-28 17:25:52

+0

我的問題是僅在用戶要求時才附加文件。稍微編輯標題以澄清。 我在madExcept論壇上提出了同樣的問題,但我沒有嘗試任何新聞組。 – Vegar 2010-01-28 21:38:08

回答

0

我在forum.madshi.net的瘋狂幫助下解決了這個問題。

我的解決方案涉及TMadExceptionHandler-component和事件OnExceptionAction

procedure TMainForm.MadExceptionHandler1ExceptAction(action: TExceptAction; 
    const exceptIntf: IMEException; var handled: Boolean); 
var 
    cbSendData: INVCheckbox; 
    assistant: INVAssistant; 
begin 
    if action = eaSendBugReport2 then 
    begin 
    assistant := exceptIntf.GetAssistant(exceptIntf.SendAssistant); 
    cbSendData := assistant.Forms[1].nvCheckBox('SendDataChk'); 

    exceptIntf.AdditionalAttachments.Clear; 
    if (cbSendData.Checked) then 
    begin 
     //Add data files as attachments... 
    end; 
    end; 
end; 

還有一件小事情,那就是在特殊場合啓用/禁用複選框。 Madshi告訴我這樣做的正確方法是向助理註冊一個actionhandler-callback,並在複選框上檢查nvaItemEvent-操作。我還沒有嘗試過。

-Vegar

-2

我不知道madExcept,但至於它的源代碼是德爾福(從你的標籤似乎),你可以檢查它像這樣:

begin 
    if CheckBox1.Checked then 
    AttachDataFile; 
end; 

CheckBox1是您在將控件放入窗體編輯器時爲其設置的名稱。如果您不知道名稱,請使用鼠標選擇它,然後查看對象檢查器以查看屬性名稱。

+1

哦,我很抱歉,但如果你不知道madExcept,我想你不應該試圖回答... – Vegar 2010-01-29 08:34:53

+0

看看這裏看看它是什麼:http://help.madshi。淨/ madExceptSettings9.htm – Vegar 2010-01-29 08:46:57

相關問題