inkscapeをmacにインストールする

macbook airにinkscapeをインストールした。

OS X 10.8.3

XQuartz 2.7.4 (xorg-server 1.13.0)
まずhttp://track05.seesaa.net/article/23472660.htmlを見ながらinkscapeをインストール。でもx11は対応していないのか動かない。

次にhttp://memo.yomukaku.net/entries/SKNgCdPを発見。XQuartzをインストール、起動。その後inkscapeを起動すると上手くいった。

vb6 ファイル番号ってなんだよ・・・

昨日仕事でvb6のコード読まなきゃいけなかったんだけど、FreeFileって関数でファイル番号ってのを取得してたんですよ。

ファイル番号って概念は初めてだったのでまず関数で調べたんだ。
でもどこ行っても「FreeFileは空いているファイル番号を取得する」としか書いて無くてファイル番号にわかの僕には冷たい感じだったんだ。

msdn探すけどvb6とかもうないですって言われるし、OpenしてるとこではAsでつないでるから型なの？とかいろいろ泣きそうだった。

というわけで備忘録。

ファイル番号とはファイルのオープン時に重複をさけるためにある0から511までの正の整数をしめします。
したがって、あるファイル(A.txt)にファイル番号1を割り当てたら他のファイル(b.txt)にファイル番号1を割り当てる事はできません。この時は0、2から511までの任意のファイル番号を指定する必要があります。

 FreeFile関数は未使用のファイル番号を取得してくれる人でした。


参考にした記事の人に感謝を。

ファイル番号
http://www6.plala.or.jp/MrHomepage/lecture/vblecture/vb17.html
ついでに読み書きについて
http://www.red.oit-net.jp/tatsuya/vb/Open.htm


できればvb6は触りたくないなｗ

vb6 .selectってなんなのさ!?

どうやらexcelのシートを選択するメンバだったようです。

xlapp.sheets(シート名).select()

しかしselectといいinputといい嫌な名前ばかりだ...


http://detail.chiebukuro.yahoo.co.jp/qa/question_detail/q1136700931

構造体の要素を動的に操作する

ポインタの話。
c言語使う機会があるので調べなおして備忘録。

以下のような構造体があったとして、セルの値を動的に参照したいですよ。

struct SAMPLE_TABLE {
    char[] name;
    int cell0;
    int cell1;
    int cell2;
    int cell3;
    int cell4;
    int cell5;
}

これを下記の様なループで回すと初期化できる。

SAMPLE_TABLE  sample_table;
int* p_cell = &sample_table.cell0;
int i;
for (i = 0; i < 6; i++ ) {
    *p_cell = i;
    p_cell ++;
}

1.変数を定義するとその値はメモリのどこかに保存される。
ポインタは定義された変数の保存先のメモリ領域（アドレス）だ。

int* p_cellはアドレスを格納するための変数（ポインタ変数）を定義している。

2.変数の前に&（アンパサンド)を付けることでその変数のアドレスを取得することができる。

&sample_table.cell0ではsample_tableのcell0のアドレスを取得する。

3.ポインタ変数の前に*(アスタリスク)を付けることでそのポインタ変数に格納されたアドレスを参照する。

*p_cell = iはp_cellに格納されたアドレスが参照するメモリ領域にiを代入している。

4.一回目のループではsample_table.cell0 = 0、

二回目のループではsample_table.cell1 = 1と同じ意味だ。

c言語の変数は定義された順にアドレスに領域が確保される。

そのためcell0～cell5は連続したアドレスに保存されることとなる。

次の行のp_cell ++でアドレスの参照先を一つ進める。

...程度の理解（現状）。
間違ってたり誤解を招く表現してたら指摘ください。

byte長なんかの詳しい話は参考サイトへ
http://www5c.biglobe.ne.jp/~ecb/c/01_04.html

オブジェクトを動的にキャストしたい vb2010

仕事で必要になったので、全ては時の中に...さんを参考に型変換を動的に行ってみた。

作業中にコンパイルエラーが出たが、下記の項目をOffにすることで実行できました。

プロジェクトのプロパティ>コンパイル>コンパイル　オプション>Option Strict(S):

遅延バインディングの可否を設定する項目だった。デフォルトではOn（不許可）に設定してあったためコンパイルエラーが出たようです。参考にした記事では触れられていないが、あまりOffにしない方が良い。

最終的に以下のようなコードになりました。

Sub Export(ByVal obj As Objct)  '何受け取るかわかんないけどobjの型に変換したい
  Dim t As Type = obj.Type '変換後の型を取得
  Dim after As Object = Convert.ChengeType(anyObj, t) 'anyObjをobjの型に変換
End Sub

仮想環境の容量拡張したいんだが

vmware使ってたら仮想環境に入れてるwindows7がwinupdateかかりまくって容量が真っ赤で大変である。
サビ残してパーティションの容量を拡張することにする。

以下環境によって読み替えてください。

1.仮想環境をシャットダウンして VM＞設定 を開く。
2. ハードウェアタブ＞ハードディスク＞ユーティリティ から拡張を選択。
    この時スナップショットを取っていると拡張できないので削除した。3.パーティション容量を拡張して適用する。
4.ここからGpartedのLive版をダウンロードする

5.VM＞設定＞ハードウェアタブ＞CD/DVDを選択
    デバイスのステータス＞起動時に接続 にチェック
    接続＞ISO イメージ ファイルを使用する にチェックし、参照からダウンロードした.isoを指定する。
6.仮想マシンを再起動し、BIOSが起動したところでF2を押す
    ブートの優先順位をCD-ROM Driveに設定し、save and Exit!
7.仮想マシンを起動し、Gpartedを起動する。（ここまで書いて帰りたくなるｗ）
    Gparted Live (Default settings)を選択する。
8.ここでキー配列を聞いてくるがDon't Touch Keymapで変更しなかった。作業に問題はなかったようなのでよしとするｗ

9.ここでさらに使用する言語を聞いてくるので日本語ならば15を入力してEnter.

10.最後にGUIで起動するかCUIで起動するか聞いてくる。もちろんGUIだ。0を入力してEnter.
    これでGpartedが起動するはずだ。

11.LiveOS(Debianﾀﾞﾀﾖ-＾＾）が起動するとGpartedも自動で立ち上がる。増やしたいパーティションを選択し、[リサイズ/移動]ボタンを押す。
   後は先程拡張した容量をあてがって[OK].[Apply]ボタンを押せば完了だ。
12.Gparted（Debian）を終了し、ＶＭ＞設定＞ハードウェアタブ＞CD/DVD を選択。
    接続＞物理ドライブを使用する にチェックを戻し[OK]
13.仮想マシンを起動する。
    増えたー^^！！


参考にさせていただいた記事の人に感謝:
http://usefulnetwork.blog57.fc2.com/blog-entry-810.html
http://pctrouble.lessismore.cc/software/gparted.html



ホストＯＳに関係なく使えそうなので覚えておくことにする。
帰ろう！帰ろう！ｗｗ

Android開発環境構築

いまさら書くまでもないと思うけど、先日入れなおしたので備忘録。
環境はwin7 64bit。

1.Eclipseを取得
MergeDoc ProjectからJavaのFull Editionをダウンロード、展開、任意の場所に置く。

2.AndroidSDKを取得
Android DevelopersからSDK Tools Onlyのzip版をダウンロード、展開、任意の場所に置く。


3.EclipseからAndroidSDKを使うためのPluginをインストール
Eclipse起動＞ヘルプ＞新規ソフトフェアのインストール
[追加ボタン]クリック＞[名前]に適当な名前を入力(androidSDK pluginとか)
[ロケーション]に"https://dl-ssl.google.com/android/eclipse/"を入力＞[OK]ボタンクリック
[Developer Tools]を選択し[次へ]ボタンクリック
後は指示に従ってインストールする。
plugin落とせないって言われたらここ。

インストール後はそれぞれ必要なAPIやドライバ等をインストールする。

4.パースペクティブの設定
このままでは[ウィンドウ]に[Android SDK マネージャー]と[Android 仮想デバイス・マネージャー]が表示されていないと思う。
表示するには[ウィンドウ]＞[パースペクティブのカスタマイズ]＞[コマンド・グループ可用性]タブ表示
使用可能なコマンド・グループの[Android SDKおよびAVD マネージャー]を選択し[OK]をクリック

これでEclipseを再起動すると[ウィンドウ]に[Android SDK マネージャー]と[Android 仮想デバイス・マネージャー]が追加されていると思う。



参考にさせてもらったブログの人に感謝を。
http://izeef.web.fc2.com/develop/android/env_eclipse.html
http://www.garunimo.com/program/p14.xhtml
http://www.devlog.alt-area.org/?p=547

vbでtextbox使ったときの話

下のような処理を書いててなんか時間かかってて、カーソルも砂時計になるしformも操作できなくなるしなんかおかしいと思ったのね。

Dim txtBox As New TextBox
Dim arry As ArrayList
arry = ArrayList.Synchronized(New ArrayList)
'arryになんか追加する処理
While 0 < arry.Count
    txtBox.text = Convert.ToString(arry(0)) & vbCrLf & txtBox.text
End While

下記の様に修正。

If 0 < arry.Count Then
    Dim str As String = txtBox.text
    While 0 < arry.Count
        str  = Convert.ToString(arry(0)) & vbCrLf & str
    End While
    txtBox.text = str
End If

解決しました。textbox遅いんだ。こいつから毎回出したり入れたりしてたので時間がかかってたのでした。

そういえばjavaやってた時にも同じことで悩んだ気がするorz

null入ってたorz

vbのbyte型の配列使ってて詰まった。
たとえば以下のようなコード

Dim a(10) As Byte
a(0) = 1
a(9) = 1
Dim str As String = Text.Encoding.UTF8.GetString(a)

aの先頭と末尾には1が入るが残りはnullである。しかしデバッガで見ると半角スペースが入っているように見えるので、そこを勘違いしていた。エラーを吐くわけでもないのでどうしようかと...

str.Split(" ")としたかったのだがないものを探しても見つからないのだ。
要素がnullであれば半角スペースに変換するループを書いて対応した。

For i As Integer = 0 To a.Length - 1
    If Nothing = a(i) Then
        a(i) = Text.Encoding.UTF8.GetBytes({" "c})(0)
    End If
Next

 .....備えよう....

ruby1.9.3インストール→chown

先月からアカベコマイリを参考にしつつかなりのんびりとsakura2Gに環境作ってるんですが・・・

rubyをインストールした直後に「権限がないよ！」と怒られssh接続できなくなりました。
とりあえずsakuraのリモートコンソールからrootでログインして作業ユーザーのhomeディレクトリを確認すると・・・

ls -l /home

所有者とグループがrootになっていた。
chownで作業用ユーザーに取り戻す。

 chown -R user:user /home/user

一応sshも繋がるようになったけど原因がわかってないので釈然としない。
checkinstallの手順間違えたとか？

macのターミナルでjavacが文字化けしてバージョンが判んねえよ

cyberduckを使いたくてmacbook AirにJAVA環境入れる。
ターミナルで

javac -version

を実行するとインストールするか聞かれたのでインストール。
インストール後、もう一度javac -vをするとバージョンが文字化けして見れない。
javaVMではデフォルトのencodeがshift-JISになっているらしい。ターミナルはutf-8、そのため文字化けしていたとのこと。
このままではいつかjavaでコンパイルするときにエラーメッセージも読めやしない。

対処：.bash_profileと.bashrcを作成し、javaコマンド実行時に.bashrcからVMに直接encodeを指定してやる。

1: homeディレクトリに.bash_profileと.bashrcがあるかを確認する。

ls -a

見つからなければ作成する。

2: .bashrcに以下を追加。.bash_profileに追加してもいいが今回は.bashrcの方が多数派っぽいのでこちらに書きました。

 JAVA_TOOL_OPTIONS=-Dfile.encoding=UTF-8

3: .bash_profileを再読み込み。

source .bash_profile

再読み込み出来ないときは.bash_profileに.bashrcを読み込む処理書いてないとか、 . ~/.bashrcのスペース抜けてたとか確認してみよう^^;

終わったらもう一度

javac -version

でバージョンを確認する。文字化けしてなければOK

ref:
http://d.hatena.ne.jp/snaka72/20120101/1325403702
http://www.linux-beginner.com/linux_kihon12.html

vb2010 Application.Restart()とStopWatchクラスを使ってみた

職場でApplication.Restart()を使ったら重複起動チェックに引っかかって2回目以降が起動してくれないのでメモ

初回の再起動では別プロセスで開いてくれるようだが、2回目以降は別プロセスにならない？(詳しい人教えてください)ようで、重複起動チェックに引っかかって再起動してくれなくなった。

そこで重複起動チェックの処理を修正することにしました。


最初はただのif文だったのを以下のように修正。
while UBound(Diagnostics.Process.GetProcessesByName(Diagnostics.Process.GetCurrentProcess.ProcessName)) > 0
thread.sleep(100)
i+=100
if i >3000 then
  exit while
end if
これで前プロセスの終了を3秒だけ待って起動できるようになった。
後でYさんからStopWatch使おうといわれ以下に修正。

Dim _stopWatch As New Stopwatch
_stopWatch.Start()
While  UBound(Diagnostics.Process.GetProcessesByName(Diagnostics.Process.GetCurrentProcess.ProcessName)) > 0
  Thread.Sleep(100)
  If _stopWatch.ElapsedMilliseconds > 3000 Then Exit While
End While
_stopWatch.Stop()

処理の実行時間を計るときは便利そうです。

社員になって狂っていく

会社の陰口書く。

4月に入社して半年間会社に飼われてみた感想など。
週休2日で日８h勤務（9～18時、休憩1h）の姫路市内の制御系SIer。

入社したての頃は定時で帰ってたけど、だんだんとサビ残増えてきた。
最近の見えない残業時間は平均2h。

入社したての頃は学ぶことも多かったけど、最近は一回指摘されたミスを何回もしてる気がする。
21時まで残って遅れた分取り戻そうとするけど全然終わらないし、ミスも増える。
一回やったことを消化できてない気がする。（blogも更新しなくなったしｗ）

疑念だけどサビ残前提でスケジュール組まれてる気も少しする。

毎日昼ぐらいに残業申請書を書いて提出するんだけど、誰も残業申請してない。
そのくせみんな定時になっても帰らないし、終電までいる人もいる。

毎日2hサビ残すると5日で2010h、4週で8040h。
8040hってすごい時間だ。105日分ただ働きしてることになる。

僕の給料が基本14万で業績手当が3万
いろいろ引いて手取り14万くらい。

残業代出てたとしたら大変なことになっちゃう。

上司も先輩も帰らないし、残業代でないし、給料安いし、そもそも自分がしたい勉強に使える時間がない。
就職＝安定って定石があるけどこれは安定した状態だろうか？
今会社が危なくなったら一番に切られるのって、最も勤務期間が短い僕じゃないだろうか？

まあ、ほかと比べたらマシっていう思考は何も生まないし、だれもハッピーにならないから置いといて。
こんなこと日本中でやってるとか頭オカシイ。

*10/4
時間の計算を自然にしくじるw。でも１年先輩の人は訂正線の方であってるなw
残業少ない方じゃんと言われる方へ：〜よりマシって考え方は誰も幸せにならないので嫌いです。

vb_別のPC環境にてフォームのサイズが変更される

windows7のvisual studio2010で開発していたのですが、別のPCでプロジェクトを開くとFormのSizeが変更されていました。

原因はwindows7の「画面上の文字を読みやすくします」設定が各環境で異なること。
両方の環境で同じ設定にしたら解決しました。

かなり詰まったけどここのおかげで助かった。

解決してみると簡単だなｗ

vb2008で開かれているフォームを取得する

vb2008にてアクティブでないフォームの属性やプロシージャを使いたいことがあるかもしれません。
そんな時My.Application.OpenFormsを使うと開いているフォームを参照できます。
詳しくはこちら。

 For Each frm As Form In My.Application.OpenForms
            If Not frm.name = "KWGTYPE" Then
                frm.close()
            End If
 Next

上記のようにすればアクティブでないフォームから条件で選別して閉じることもできます。
間違ってたらおしえてくだしぁ^^

MBA届いてました＾＾；

今週の火曜日には届いてたんだけど、仕事終わらなくてあんまり触ってないorz
起動してChrome入れた程度の感想だと、USキーボードが思った以上に良い感じ＾＾
あとやっぱり薄い！軽い！
ディスプレイとか折れそうでビクビクしながらやさしく触ってます。エロい。


なにインストールしたらいんだろ。
rubyとperlとphpは入ってた。あとvimとawkも！
早く時間作ってもっと仲良くなりたい。

MBAぽちった

一昨日の夜、新型MacBook Airをぽちった。
6/27日（今日じゃん）までローン金利0円だったので今しかっ
まあ10回払いにしたけどもっと多くすればよかったかも。金利0だし。

11インチ
CPU：2.0GHzデュアルコアIntel Core i7（Turbo Boost使用時最大3.2GHz）
メモリ：8G
SSD：256G
キーボード：USA


注文確定したのでもう後に引けないｗ
届くのは7月1～5日。
ちょーたのしみ！

SQL Server文字列を日付形式にキャストする

ここを参考に書いたんだけど、

SELECT CONVERT(datetime, '20080102', 112)

引用の最後の112って何ぞ？ってなって調べた。
http://msdn.microsoft.com/ja-jp/library/ms187928.aspx

msdsによると国ごとのフォーマットを指定してる様子。

SQL ServerにCSVをインポートする

ここを参考にばるくいんさーとというのをやってみた。

BULK INSERT テーブル名 FROM 'インサートしたいファイルのパス.csv'
   WITH (
      DATAFILETYPE = 'char',
      FIELDTERMINATOR = ',',
      ROWTERMINATOR = '\n'
);

char型、カンマ区切り、改行文字かな。

CASE文-SQLで条件分岐してみる

ここを参考にCASE文を使ってみた。
今まではプログラム側で対応してたけどこれ使いこなしたほうが便利。