C#|テキストボックス上でのD&Dでフォームを移動する

TextBoxコントロール上でのドラッグ&ドロップでフォームを移動させようとした場合、文字列を選択する操作とバッティングしないようにする必要がある。

以下の実装で良い感じに動いた。

Point mouseDownPoint = new Point();
bool dAndDMoveFlag = false;
private void textBox1_MouseDown(object sender, MouseEventArgs e) {
    if(e.Button != MouseButtons.Left) return;
    mouseDownPoint = e.Location;
    bool flag = true;
    int charHeight = 
        TextRenderer.MeasureText("A", this.textBox1.Font).Height;
    
    for(int i = 0; i < this.textBox1.Lines.Length; i++) {
        Point point = new Point(0, i * charHeight);
        Size size = 
            TextRenderer.MeasureText(
                this.textBox1.Lines[i], 
                this.textBox1.Font);
        Rectangle rect = new Rectangle(point, size);
    
        if(rect.Contains(e.Location)) {
            flag = false;
            break;
        }
    }
    
    this.dAndDMoveFlag = flag;
}
private void textBox1_MouseMove(object sender, MouseEventArgs e) {
    if(dAndDMoveFlag) {
        Point p = this.Location;
        p.Offset(
            new Point(e.X - mouseDownPoint.X, e.Y - mouseDownPoint.Y));
        this.Location = p;
    }
}
private void textBox1_MouseUp(object sender, MouseEventArgs e) {
    dAndDMoveFlag = false;
}


 

素早くドラッグ&ドロップしたときに文字が選択されてしまいフォームの移動がキャンセルされるのを回避する為にdAndDMoveFlag(センスねー名前w)でフラグを立てている。

あとはそんなに難しいことしてないと思う。

※textBox1のTextが空の場合にLinesプロパティの境界外を参照して例外が発生していたので修正した。

※気が変わったので違うロジックでゴッソリと書き換えた。

C#|System.Windows.Forms.ColorDialogのバグ?

ColorDialogクラスのCustomColorsプロパティが期待通りに動作しない。

フォームの背景色をColor.FromArgb(50, 100, 150)に設定している。ちなみにこんな色。

ClpBdImg0[1]

ボタンがクリックされるとColorDialogのCustomColorsプロパティにColor.FromArgb(50, 100, 150)を設定して表示する。

おかしい、追加した色が黒く表示されている。色の作成ボタンを押してRGB値を見てみると

ColorDialogBug2[1]

RとBが反転している。これは困った。

using System;

using System.Drawing;

using System.Windows.Forms;

public partial class Form1 :Form {

    Color color = Color.FromArgb(50, 100, 150);

    public Form1() {

        InitializeComponent();

        this.BackColor = color;

    }

    private void button1_Click(object sender, EventArgs e) {

        this.colorDialog1.CustomColors = new int[] { color.ToArgb() };

        this.colorDialog1.ShowDialog();

    }

}

ここに解決策があった。

http://www.atmarkit.co.jp/bbs/phpBB/viewtopic.php?topic=14475&forum=7

ToArgbではなくColorTranslator.ToWin32()を使えばいいとのこと。これで期待通りに動作した。

めでたしめでたし。

C#|IronPython|C#でIronPython2.0をホスティングする

http://www.voidspace.org.uk/ironpython/ip_in_ip.shtml (英語)

英語は読めないからソースだけ読んで参考にしました。

【参照設定】

IronPython2.0のディレクトリより

IronPython.dll

Microsoft.Scripting.Core.dll

Microsoft.Scripting.dll

【Form1.cs】

using System;

using System.Windows.Forms;

using IronPython.Hosting;

using Microsoft.Scripting.Hosting;

public partial class Form1 :Form {

  public Form1() {

    InitializeComponent();

  }

  private void button1_Click(object sender, EventArgs e) {

    ScriptEngine engine = Python.CreateEngine();

    ScriptSource source =

        engine.CreateScriptSourceFromFile(“./test.py”);

    ScriptScope scope = engine.CreateScope();

    //IronPythonにformという変数名でthisを渡す。

    scope.SetVariable(“form”, this);

    //ここで実行

    source.Execute(scope);

    //IronPythonのtestVarという変数のオブジェクトを取得する。

    object value = scope.GetVariable(“testVar”);

    this.button1.Text = (string)value;

  }

}

【test.py】

form.Text = “Hello,World!”

testVar = “test”

こんな感じで、IronPython側にオブジェクトを渡してIronPython側で操作したり、IronPython側のオブジェクトをC#側で取得することが出来ました。

IronPythonとのオブジェクトのやり取りはScriptScopeオブジェクトを通して行うんですね。

これだけでもかなり面白いです。IronPython1.0からはかなり勝手が変わったようです。

C#|クリップボードビューア作成での悩み

C#でクリップボードの履歴を収集、参照するアプリを作っているんだけど、迷ってます。終了時に収集した履歴をファイルに保存して、起動時に読み込みたいんだけど、その保存形式をどうしようかと。

テキストデータしか収集しない仕様だから保存もプレーンなテキストでやりたいんだけど、区切り文字をどうしようかと悩んでる。クリップボードに格納出来ない文字とかがあればそれに決まりなんだけどなぁ…。

これを書いてるたった今、HTMLエンコードして区切り文字を2chのDATっぽく”><”にするってのを思い付いたんだけど、それもどうかなとも思う…。出来れば保存したファイルをテキストエディタで開いて理解出来る形にしたい。

結局BinaryFormatterで履歴の読み書きを実装しました。しかし、妥協はしたけど納得はしてないので引き続きよい案募集。

機能的にはこれで完成、ClipBoardWatcher(ネーミングセンス皆無w)。

DeskTopMemoに次いで手放せないツールになりそう。

あにすのコード保管庫

今までこっそりと更新してきましたが(mixiとかTwitterには書いてたけど)、大分コード量が増えてきたので告知します。

あにすのコード保管庫

サイドバーのコンテンツにリンクがあります。

よくあるTips集ではなく、コピペしてそのまま使って貰おうという趣旨のオンラインクラスライブラリのようなものです。なのでコードの解説等は殆どありません。コピペで使えるから、中身が分からなくても使い方だけ判ればいいのです。

あれ、これって前にも書いたよな…ってコードをPCの中から探してくるのが面倒になってきたってのがこれを書き始めた動機です。

バグ報告、リクエスト、感想、お小遣い等お待ちしてます。

C#|エクスプローラのコンテキストメニューを表示する

調べていたらなかなか難しそうで悶絶してました。そこで見付けたのがこれ。

http://cspace.s2.xrea.com/software/SimpleCommand/index.php#1000000042

ここのコンテキストメニューってツールです。

これをProcess.Start()メソッドで起動するだけで右クリックメニューを表示出来ます。

これは良いものです。

【役立たず】タイピングに反応して踊るたこルカのデスクトップマスコット【うるさい】

更にこんなことしてました。

なんと嬉しいことにソースコード掲載のご希望があったのでUPします。

https://anis774.net/LOVELOG_IMG/takorukasrc.zip