font "",Var_FontSizeOfTodoList : objmode 2
objsize 303,300
pos 696,000 : listbox listboxInt,0,"ToDoリストをロード中"
hListboxInt = objinfo(stat, 2)
objenable 55,0

listboxTitle=""
listboxLimit=""
listboxDetail=""
pos 696,290 : input  listboxTitle ,302, 42,0 : tmp = objinfo(stat, 2) : sendmsg tmp, $CF, 1 : objenable 56,0
pos 696,332 : input  listboxLimit ,302, 42,0 : tmp = objinfo(stat, 2) : sendmsg tmp, $CF, 1 : objenable 57,0
pos 696,374 : mesbox listboxDetail,305,178,0 : tmp = objinfo(stat, 2) : sendmsg tmp, $CF, 1 : objenable 58,0

font "",Var_FontSizeOfButton : objmode 2
objsize (1000-696)/2,50
pos 696,552              : button gosub "タスクを追加する",*AddTask : objenable 59,0
pos 696+(1000-696)/2,552 : button gosub "タスクを完了する",*DelTask   : objenable 60,0