FC2カウンター

現在の訪問者数

現在の閲覧者数:

カレンダー

10 | 2017/11 | 12
- - - 1 2 3 4
5 6 7 8 9 10 11
12 13 14 15 16 17 18
19 20 21 22 23 24 25
26 27 28 29 30 - -

プロフィール

剣菱P

Author:剣菱P
剣菱Pと申します。
性別:男
年齢:27
二兎を追って一兎も得られないタイプ

マイコンやプログラミング、ニコニコ動画、雑記等
方向性は見えずとも、ちょっとずつ更新していく予定です!

リンクフリーです。
こんなブログでよかったらよろしくお願いしま~す。

公開メール kenbishiP@gmail.com

検索フォーム

最新記事

最新コメント

カテゴリ

メールフォーム

名前:
メール:
件名:
本文:

月別アーカイブ

最新トラックバック

リンク

ブロとも一覧

ブロとも申請フォーム

ランキング

ランキング参加中です。気が向いたらクリックしてあげてください。


にほんブログ村 その他趣味ブログへ
にほんブログ村 その他趣味ブログ 趣味の工作へ

スポンサーサイト


上記の広告は1ヶ月以上更新のないブログに表示されています。
新しい記事を書く事で広告が消せます。

緊急プラン NT川崎に向けて ウレタン樹脂が»

コメント

コメントの投稿













管理者にだけ表示を許可する

シリアル通信やっと出来た


やっとシリアル通信が再びつながりました

ってか、実は詳しくはまだ良くわかってませんw

こうやったら出来るよというのを参考にしたら出来ましたが、なぜそうなるのか
まだわかってないのです

とりあえず自分の覚書としてコードを書きます

#pragma endregion
private: System::Void hScrollBar1_Scroll(System::Object^  sender, System::Windows::Forms::ScrollEventArgs^  e) {           
           
            String ^ s_data1 = textBox1->Text;
            data1 = hScrollBar1->Value;
            textBox1->Text = data1.ToString("D3");
            serialPort1->Write("A"+s_data1+"   \r\n");
         }
private: System::Void hScrollBar2_Scroll(System::Object^  sender, System::Windows::Forms::ScrollEventArgs^  e) {
             String ^s_data2 = textBox2->Text;
             data2 = hScrollBar2->Value;
            textBox2->Text = data2.ToString("D3");
            serialPort1->Write("B"+s_data2+"   \r\n");
         }
private: System::Void hScrollBar3_Scroll(System::Object^  sender, System::Windows::Forms::ScrollEventArgs^  e) {
             String ^s_data3 = textBox3->Text;
             data3 = hScrollBar3->Value;
            textBox3->Text = data3.ToString("D3");
            serialPort1->Write("C"+s_data3+"   \r\n");
         }
private: System::Void hScrollBar4_Scroll(System::Object^  sender, System::Windows::Forms::ScrollEventArgs^  e) {
             String ^s_data4 = textBox4->Text;
             data4 = hScrollBar4->Value;
            textBox4->Text = data4.ToString("D3");
            serialPort1->Write("D"+s_data4+"   \r\n");
         }
private: System::Void hScrollBar5_Scroll(System::Object^  sender, System::Windows::Forms::ScrollEventArgs^  e) {
             String ^s_data5 = textBox5->Text;
             data5 = hScrollBar5->Value;
            textBox5->Text = data5.ToString("D3");
            serialPort1->Write("E"+s_data5+"   \r\n");
         }
private: System::Void Form1_Load(System::Object^  sender, System::EventArgs^  e) {
            serialPort1->Open();
            textBox11->Text = "ポートオープン";
           
         }


delegate void SetTextCallback(String ^);

private: void SetText(String^ str){
             
            array<Char> ^data = str->ToCharArray();

            switch(data[0]){
                case 'A': textBox6->Text = str->Substring(1,3);break;
                case 'B': textBox7->Text = str->Substring(1,3);break;
                case 'C': textBox8->Text = str->Substring(1,3);break;
                case 'D': textBox9->Text = str->Substring(1,3);break;
                case 'E': textBox10->Text = str->Substring(1,3);break;
            }
         }

private: System::Void serialPort1_DataReceived(System::Object^  sender, System::IO::Ports::SerialDataReceivedEventArgs^  e) {
           
             String^ str;
           
             str = serialPort1->ReadLine();
             this->Invoke(gcnew SetTextCallback(this,&Form1::SetText),str);
           
           
         }
private: System::Void Form1_FormClosing(System::Object^  sender, System::Windows::Forms::FormClosingEventArgs^  e) {
            serialPort1->Close();
         }




タチコマの操作パネルの基礎を想定しているので

スクロールバーを動かすとその値がシリアルで出力されて
受信した値を表示しています

201005181.jpg

一応うまくいったのですが、問題が一つ

スクロールバーをドラッグして動かした場合は問題ないのですが、
横のボタンで1づつ動かすと 値がずれます

なぜか次のクリックで前の値が出力されているよう

とりあえず、今回は疲れたのでそこは保留w
スポンサーサイト

緊急プラン NT川崎に向けて ウレタン樹脂が»

コメント

コメントの投稿













管理者にだけ表示を許可する


上記広告は1ヶ月以上更新のないブログに表示されています。新しい記事を書くことで広告を消せます。