0
擴展我以前的問題,我試圖重用代碼爲多個按鈕分配顏色/狀態。在我的最後一個問題中,我忘記了代碼的顏色部分。這是我正在嘗試的 - 但獲得一個Undeclared變量'buttonprs'之前使用它被分配任何值。正如我正在學習 - 我敢肯定,我有語法問題,並感謝您的幫助!多按鈕ColorDrawable /狀態語法
Sub SetStateDrawable(Btn As Button, buttonPRS As ColorDrawable, buttonENL As ColorDrawable)
buttonENL.Initialize(Colors.Black,0)
buttonPRS.Initialize(Colors.DarkGray,0)
Dim buttonSLD As StateListDrawable
buttonSLD.Initialize
Dim buttonSTS(2) As Int
buttonSTS(0) = buttonSLD.State_Enabled
buttonSTS(1) = -buttonSLD.State_Pressed
buttonSLD.AddState2(buttonSTS, buttonENL)
Dim buttonSTS(1) As Int
buttonSTS(0) = buttonSLD.State_Pressed
buttonSLD.AddState2(buttonSTS, buttonPRS)
End Sub
SetStateDrawable(mybuttonBTN1, buttonPRS, buttonENL)
SetStateDrawable(mybuttonBTN2, buttonPRS, buttonENL)