netail.net

_ Libretto ▲

研究費用でノートパソコンを買い換えようと目論む．そろそろ Libretto ともおさらばかも？

_ Java ▲

今日のはまり．Object[] map.values().toArray() はHoge[] にキャストできない．Hoge[] を確保してからObject をキャストしながら個別に代入する必要がある．考えてみれば当たり前なのに，なぜか思いつかなかった．

_ さよなら三角 ▲

ふと思い立って「さよなら三角」の本文を調べてみた．バリエーションがたくさんあったのにちょっと驚いたが，私が知ってるバージョンに一番近かったものを忘れないうちにメモ．

さよなら三角 またきて四角四角はとうふ とうふは白い白いはうさぎ うさぎははねるはねるはかえる かえるは緑（あおい） 緑はやなぎ 柳はゆれるゆれるはゆうれい ゆうれいは消える消えるは電気 電気はひかるひかるはおひさま おひさまはまるい まるいはドーナツ ドーナツはおいしいおいしいはおにぎり おにぎりは三角さよなら三角 またきて四角

_ Delphi ▲

ドラッグ中のキーボード状態を取得するのには，KeyboardStateToShiftState というのを使えばいいらしい．VCL ヘルプに載ってないけど……．

CTRL が押されたら DragObject を継承して作ったCopy プロパティを ON にして，Copy プロパティが ON かどうかでドラッグ中のカーソルキーの値を返すようにgetDragCursor をオーバーライドしてみた．

カーソル自体も自作．影は付かないけど，Windows システムカーソルを手本にそれっぽいコピー時用のカーソルを作ってみた．[ツール]-[イメージエディタ]で書いてMYCURSOR CURSOR "ファイル名"const crMyCursor = 1;Screen[crMyCursor] := LoadCursor(hinstance, "MYCURSOR");とするだけ．けっこう簡単でいい．

_ Calendar ▲

周期予定の GUI を大幅修正開始．データ構造はまったく変わってないが，ListView を使うところを TreeView に完全に置換する．