I was in a hurry so I wrote this. Don't know if this is natively supported.
Function DeselectButtonID(ID%)
For B.Button = Each Button
BH = Handle(B)
If FUI_SendMessage(BH, M_GETID) = ID Then
FUI_SendMessage(BH, M_SETSELECTED, False)
EndIf
Next
End Function