メイン | 2005年3月 »

2005 - 2 /26

Word でインタラクティブ囲い文字

「インタラクティブ」なんて大それたタイトルだけど、汎用性のない、子供の遊びレベルのコードです。
元記事はこちらの掲示板

たったあれだけのコードだけど、Word の VBA も奥が深いというか、ワケがわからんというか、なんともはや。

除菌ちゃんのアドバイスを参考に、ActiveDocument.Pathプロパティを使って、カレントドキュメントのパスを得ることで、たぶんどこでも動くようになったはず。

まぁでも、Word で、しかもただ○で囲むためだけに VBA 使うのって、はなはだ自己満足。

Private Sub Label1_Click()
  Label1.Picture = _
  LoadPicture(ActiveDocument.Path + "\i\you_maru.gif")
  Label2.Picture = _
  LoadPicture(ActiveDocument.Path + "\i\huyou.gif")
End Sub
Private Sub Label2_Click()
  Label1.Picture = _
  LoadPicture(ActiveDocument.Path + "\i\you.gif")
  Label2.Picture =_
  LoadPicture(ActiveDocument.Path + "\i\huyou_maru.gif")
End Sub

docファイルのダウンロード(you_huyou_check.lzh:14,792bytes)

でもね、やっぱりウチじゃ相対パスで動くんです。
なので、ワケがわからんし、なんともはや なのです。

投稿者 hamayo : 22:31 | トラックバック

Flashのスクリプト、

変えました。
そんだけ。

投稿者 hamayo : 00:10 | コメント (1) | トラックバック

2005 - 2 /21

セルの背景色をマウスオーバー/アウト

リンク元はこちらの掲示板です。

対象のオブジェクトと色名を、引数渡ししてやれば良いかもしれませんね。
どれもみな同じ色にするのであれば、色名は引数を使う必要はないですが、こうした方が汎用的かな、と思ったので・・・。

<script language="JavaScript" type="text/JavaScript">
<!--
function bgColorChanger(o,hex){
o.style.backgroundColor = hex;
}
//-->
</script> <body> <table>
<tr>
<td onMouseOver="bgColorChanger(this,'#82c3d5');" onMouseOut="bgColorChanger(this,'');">uuh</td>
<td onMouseOver="bgColorChanger(this,'#cfcab4');" onMouseOut="bgColorChanger(this,'');">yah</td>
<td onMouseOver="bgColorChanger(this,'#afc032');" onMouseOut="bgColorChanger(this,'');">tah</td>
</tr>
</table>
</body>

実際のページだと、こんな感じ(←クリックで別ページ)で。

投稿者 hamayo : 21:45 | コメント (6) | トラックバック

2005 - 2 /20

Flash 使ってます

「Flash 使ってるなら使ってるって示しなさいよ。」
ってコメントがつきましたので(エントリーとは無関係のコメントなので非掲載ですが)あのボタン付けました。
サイドバーの最下段です。

ただそれだけです。

投稿者 hamayo : 20:14 | コメント (4) | トラックバック

2005 - 2 /18

続_Bフレッツのコーディネート

Bフレッツのコーディネートとやらは、あっさり完了いたしました。
借りてきたジェットを、MJを開けた中にある配管に突っ込んでやると、おもての保安器のそばにある配管口のカバーを突き破って、先っちょが出てきてました。

「なんでもいいんでヒモとかを入れといてくれると助かります」ってことだったので、荷造りヒモをジェットの先に付けて、また家の中に入ってジェットを引っ張ってやると、ヒモも一緒にスルスルと出てきました。
これで工事の人も楽になることでしょう。

家の中には、ちょうど内装リフォームの業者の方々がおられたのですが、まさかぼくがこの家の世帯主になる人だとは思ってないだろうなぁ。。。

10時過ぎに事務所に戻ってブラブラしてると、Yさんから電話が入りました。
「ヒモ通したのアンタかい?」、「だったら来る必要なかったな~」って。
だってYさん、あなたがそうしろって言ったから・・・。

で、世間話なぞして電話を切ったのですが、肝心の工事日の段取りを付けるのを忘れてました。
待ってればNTTから連絡があるのでしょうか。

Webでいろいろな情報を集めてみると、Bフレッツに関してはこちらから積極的にプッシュしていかないと、ぜんぜん前へ進まないとかなんとか。
とりあえず1週間くらい待ってみるつもりです。

投稿者 hamayo : 23:30 | コメント (1) | トラックバック

2005 - 2 /17

Bフレッツのコーディネート

明日は引っ越し先の家で、Bフレッツの光ドロップケーブルが引き込めるかどうかの、コーディネート予定日です。
NTTから誰かがやってきて、どこから線を入れてどこに引き出すのかとか、どこの柱から引っ張ってくるのかとかを、調査するそうです。

NTTの電話口の女の子は、「時間の指定は出来ません。午前中にうかがいます」とだけ言っていたのですが、こっちも仕事をさぼって立ち会うわけですから、もうちょっとNTTにも頑張って欲しいのです。

というわけで、明日午前中サボっていいですか?、という話しを上司にしてみると、「たぶんYさんが行くんじゃないかな。時間聞いてあげるよ」という、出来すぎた話みたいな展開になってしまいました。
顔が広い人というのは、ホント信じられないような人脈を持っているものですね。

そのままその上司に話しをお任せしていたら、結局ぼくが自分でコーディネートしてその結果を Yさんに連絡する、ということに決まったようです。
そんなんで本当にいいのかなぁ。。。
ぼくとしては得したのか損したのか、まだよく分からないです。


投稿者 hamayo : 23:04 | コメント (1) | トラックバック

2005 - 2 /14

さようなら文庫本たち

引っ越しを機に、うんと溜まった小説の文庫本を古本屋に売ることにしたのです。
200冊くらいを処分すると決め、そのうち売れそうな本だけを、週末に古本屋に持ち込んできました。

でも買い取ってくれたのは、たったの20冊だけでした。
しめて 1,000円です。

ぼくは本を読むときに、しおり代わりにページの角を折る癖があるのです。
ヒモが付いてる新潮文庫であっても、やっぱり角を折ってしまいます。
そのせいで、ほとんどの本が売り物にならなかったようです。

売れなかった本は、メトロ文庫行きです。
ページの角を折ったぼくの本でも、カバーがなかったり、背中がばっくり割れたり、線引きまくりのメトロ文庫の中では、きっと特上品でしょう。
地下鉄利用者の手の中で、第二の人生を送って下さい。

投稿者 hamayo : 22:18 | コメント (1) | トラックバック

2005 - 2 /13

webも リアルも 引っ越します。

来月リアルの方で引っ越すことになりました。

メタル回線がRT収容なので、DSLが使えない場所です。
FTTHを引く予定なのですが、「はい。たった今から回線変わりましたよ」、ってな感じには行きそうもなく、ネットから隔離された日々を送らないといけないようです。

それにともなって、ISPの方のWebスペースも、サービス切り替えのタイミングによっては、消えてなくなってしまう可能性が出てきたので、急遽サーバーを借りることになってしまいました。

どうせ今までずっと更新をサボってたんだから、ほっといてもいいんだけど、いちおう長いことやってきたものですから、さっきダウンロードしてきたばっかりの Movable Type を使って、仮の住まいを作ってみました・・・・・

本家のサイトの方も、とってもゆっくりなペースで作ってはいるのですが、ここしばらくは引っ越しに忙しくて、たぶん止まってしまうでしょう。

自分が書いたスクリプトでも、半月も経てば何のことだか分からなくなるものです。
とりあえずコメントをたっぷり挿入しまくって、来るべき未来に備えたいと思います。

なお、以前のサイトについては、http://www.dab.hi-ho.ne.jp/teruki/index2.htmlから閲覧できるようになっています。
思い残すことがお有りの方は、お急ぎ下さい。

投稿者 hamayo : 21:11 | コメント (2)