23 lines
436 B
AutoHotkey
23 lines
436 B
AutoHotkey
MyData := new FinalBox("Immutable data")
|
|
MsgBox % "MyData.Data = " MyData.Data
|
|
MyData.Data := "This will fail to set"
|
|
MsgBox % "MyData.Data = " MyData.Data
|
|
|
|
Class FinalBox {
|
|
__New(FinalValue) {
|
|
ObjInsert(this, "proxy",{Data:FinalValue})
|
|
}
|
|
; override the built-in methods:
|
|
__Get(k) {
|
|
return, this["proxy",k]
|
|
}
|
|
__Set(p*) {
|
|
return
|
|
}
|
|
Insert(p*) {
|
|
return
|
|
}
|
|
Remove(p*) {
|
|
return
|
|
}
|
|
}
|