Number := iState; プロパティのSet [...] パティのSetメソッドを実装します State
_Counter Set(...) PROP [...] ターフェイスプロパティ、特別 Set と Get メソ