DOBON.NETプログラミング道掲示板

■ 「新規作成」から投稿できます。
■ マルチポストされた投稿を見つけたときは、その投稿に返信することによりご報告ください。その際は匿名で投稿し、マルチポストされている場所を併記してください。
■ スパム対策のため、メールアドレスの先頭に"_"という文字が付加されています。
RSS 2.0 RSS 2.0 | RSS 0.91 | 携帯電話用 | 自分専用のアイコンを使用するには | 掲示板への要望 | 管理人に連絡 | お気楽掲示板
■ 24時間以内に作成されたスレッドは New で表示されます。
■ 24時間以内に更新されたスレッドは UpDate で表示されます。

記事リスト ( )内の数字はレス数
NomalDataGridViewでAlt+Enterで改行したい(2) | Nomal全角シフト中にアクセスキーが効かない(5) | NomalDataAdapter.Updateで構文エラー(6) | Nomal抽象クラスで実装したクラスの情報を知る(3) | NomalProcessクラスからbatファイル実行後、KILLできない(2) | Nomal画面遷移(モーダルとモードレス)(2) | Nomal兆億万表記の文字列を数値に変換できる?(3) | NomalGetDirectoriesでルートを指定するとエラーになる(3) | NomalLinqにおける明示的型指定の方法(3) | Nomal2つのradの数値から1つの角度を求めるコードを改善できますか?(C++)(2) | Nomalコンソールアプリで、WebView2の利用(2) | NomalEntity Frameworkは、使えるか?(2) | Nomalデータベースからのテーブル名一覧の効率的な取得方法(3) | NomalC#のlong型でオーバーフローになる(2) | Nomal正規表現のパターン表記方法(2) | NomalWebView2によるスクレ―ピング(4) | Nomalこういた物を作れますか?(2) | Nomalツールボックスにtableadapterが表示されない(1) | NomalC# Chart X軸上のグラフ表示(3) | NomalVB.NETでBluetoothデバイスの電池残量を取得する方法(3) | Nomalクリスタルレポート 明細部のサブレポート(0) | Nomal重なったPictureBox同士を透過する方法(7) | NomalWindowsフォームデザイナについて(3) | NomalVB.NETからcmdでpingを実行した時の結果(5) | Nomalvb.netでExcelファイル操作(7) | Nomalvb.netでのExcelファイルそうさ(2) | Nomalキーボード+バーコードでキーボード入力を無効にしたい(6) | Nomalファイルとして配置したマニフェストを優先したい(2) | NomalTabPageの背景色(5) | NomalVB2022でクリスタルレポートが開けない(2) | NomalC#でJpeg圧縮のTiffファイルを作成したい(4) | Nomalエクセルのみ監視ができない(2) | NomalDataGridViewのVirtualModeを有効した場合の実装方法(4) | NomalExcelの数値 -> 日付みたいな関数?(2) | NomalDrawstringでの透過文字作成(3) | Nomaljumbo icon(256x256)が存在するか知る方法(6) | NomalSpinWait()を使う理由(2) | Nomalantecedentってなんですか?(2) | Nomalワンタイムパスワードのサイトに自動ログインしてアクセストークンを得る(3) | Nomalstyle.displayだと効率悪いから違うやり方をしたいです。(5) | Nomalテーブルを順番通りに直すプログラムを外部で読み込めるようにしたいです。(4) | NomalJSONの複雑な入れ子内部の値を取りたい。(3) | Nomalグリッド表示レコードをJSONに変換(5) | Nomalシステム時計の設定(3) | NomalSeleniumで開いているページのTableを編集したい(5) | Nomalソケット通信入門 ひらがな(4) | NomalVisual Basicでエラーが出る(3) | Nomalインストーラにて、ローミングフォルダにファイルを配置したい(0) | NomalRGB値の所得(2) | NomalVB.net からAccessDBへの接続(2) | Nomal時間変数(文字列)の扱い(4) | Nomal画像のスクロール(6) | Nomalタイマーの一括処理(6) | NomalTreeViewとDataGridViewのスクロールを同期(シンクロ)させたい(4) | NomalTreeViewの現在位置とDataGridViewの現在位置を合わせたい(7) | Nomalフォームのリサイズ時にDataGridViewが再描画されない(4) | NomalPDFをフォーム上で表示させる方法につきまして(4) | NomalPictureBoxの画像を連続保存(11) | NomalテキストボックスのValidatingイベントよりも先に発生するボタン発生イベントは何でしょう?(2) | Nomal継承元フォームで各フォームのボタン動作を検知したい(3) | NomalWindowsエクスプローラからのドラッグ&ドロップ(2) | Nomalラジオボタンの一括設定(7) | Nomalクリックイベントでexeを作成できるか(2) | Nomal作成した白黒画像をWordに貼り付けてから「図として保存」(8) | Nomalアセンブリ情報が載らない(1) | NomalRichTextBoxのテキストをpictureBOXへ(12) | Nomalc#で日付型の定義の仕方で質問があります。(2) | Nomal先頭に空白(スペース)があるファイルを読み込んでRichTextBoxへ書き出すとスペースが削除える(6) | NomalExcel Com オブジェクトの増殖(13) | Nomal二次元マップから値の取得(1) | NomalアプリでHDMIへ出す解像度を変えたい(4) | NomalDataGridViewのドロップダウンリストの表示と選択後の値を分けたい(1) | Nomal列車の時間ごとの位置情報を表示したいです。(2) | Nomal画像の中心を基点に回転(4) | NomalDataGridViewの行ヘッダーに行番号を表示した時のエラー(4) | NomalタッチキーボードでIMEを自動で切替えたい(6) | NomalVSTOによるエクセルアドインのインストーラーでのアップデート(1) | NomalMP4動画を再生する方法について(5) | NomalVB.NetでVB6.0と同じFontを指定しても同様に印刷されない(9) | NomalLabelで文字単位の背景色(7) | NomalLableのカラー色を文字変数から変更したい(5) | NomalUrlにアクセスするとダウンロードされるファイルを捕まえる(2) | Nomalタブレット等でスワイプによるスクロールを実装(2) | NomalTEXTBOXのプロパティを文字列に(7) | NomalPDFをフォーム上で表示させる方法につきまして(6) | NomalChart X軸上の描画を切り替えたい(0) | NomalRichTextBoxへのドラッグ&ドロップしたExcelファイルの扱い(3) | Nomal特定のPCだけ発生する「パディングは無効なので削除できません」のエラーの原因(6) | NomalASP.NET WebApi内でXmlReader.Create(url)がタイムアウトする(4) | NomalDatagridViewでファンクションキーを止めたい(5) | Nomal表示動作が重くなる(3) | Nomalbitmapを複数スレッドで処理したい(2) | Nomalフォーム背景のみを半透明にしたい(5) | Nomal読み出し元フォームの位置取得方法(2) | NomalLoadOptionのパラメータの意味(3) | Nomalコンストラクターに続く{}の意味(2) | Nomal1行で書くことできますか?(3) | Nomalvb.netで7zの圧縮・解凍をしたい。(2) | NomalCommandBuilderによって作られるCommandTextの内容(5) | NomalDataGridViewの特定セルにボタンを配置する方法(5) |



■記事リスト / ▼下のスレッド
■35433 / 親記事)  jumbo icon(256x256)が存在するか知る方法
□投稿者/ inunoshi 一般人(1回)-(2023/06/04(Sun) 20:10:12)
  • アイコン環境/言語:[.NET Framework] 
    分類:[.NET] 

    jumbo icon(256x256)の取得をしたいです。
    以下のコードで取得できますが、256x256アイコンを持ってないファイルの場合、
    以下の画像のように48x48アイコンが左上に描画された256x256アイコンが
    取得されていしまいます。
    256x256アイコンを持っていないことを知る方法はありませんでしょうか。
    IImageListを使って知る方法でもわかればありがたいですが、できればWindowsAPIを
    使って知る方法がわかればありがたいです。
    ご存じの方、ご教授ください。



    ---------------------------------------------------------
    //プログラムと同じフォルダに「C:\Windows\winhlp32.exe」の256x256アイコンを出力
    using System;
    using System.Drawing;
    using System.Windows.Forms;
    using System.Runtime.InteropServices;
    using System.IO;
    using System.Reflection;

    public class Icon256
    {
    [StructLayout(LayoutKind.Sequential, CharSet = CharSet.Unicode)]
    public struct SHFILEINFO
    {
    public IntPtr hIcon;
    public int iIcon;
    public uint dwAttributes;
    [MarshalAs(UnmanagedType.ByValTStr, SizeConst = 260)]
    public string szDisplayName;
    [MarshalAs(UnmanagedType.ByValTStr, SizeConst = 80)]
    public string szTypeName;
    }

    [DllImport("shell32.dll")]
    static extern int SHGetImageList(uint iImageList, ref Guid riid, out IntPtr ppv);

    [DllImport("comctl32.dll", SetLastError=true)]
    static extern bool ImageList_DrawEx(IntPtr himl, int i, IntPtr hdcDst, int x, int y, int dx, int dy, uint rgbBk, uint rgbFg, int fStyle);

    [DllImport("shell32.dll", EntryPoint = "SHGetFileInfoW", CharSet = CharSet.Unicode)]
    public static extern IntPtr SHGetFileInfo(string pszPath, uint dwFileAttributes, out SHFILEINFO psfi, uint cbFileInfo, uint uFlags);

    public static void Main()
    {
    Bitmap iconImage = new Bitmap(256, 256);
    Guid IID_IImageList = new Guid("46EB5926-582E-4017-9FDF-E8998DAA0950");
    const uint SHIL_JUMBO = 0x0004;
    IntPtr pimgList;

    SHGetImageList(SHIL_JUMBO, ref IID_IImageList, out pimgList);

    uint SHGFI_ICON = 0x00000100;
    uint SHGFI_SYSICONINDEX = 0x00004000;
    uint SHGFI_OVERLAYINDEX = 0x00000040;
    uint vFlags = SHGFI_ICON | SHGFI_SYSICONINDEX | SHGFI_OVERLAYINDEX;

    SHFILEINFO shfi = new SHFILEINFO();
    SHGetFileInfo(@"C:\Windows\winhlp32.exe", 0, out shfi, (uint)Marshal.SizeOf(shfi), vFlags);

    Graphics g = Graphics.FromImage(iconImage);
    uint CLR_DEFAULT = 0xFF000000;
    ImageList_DrawEx(pimgList, shfi.iIcon & 0xFFFFFF, g.GetHdc(), 0, 0, 0, 0, CLR_DEFAULT, CLR_DEFAULT, 0);
    g.Dispose();

    string dstPathName = Path.GetDirectoryName(Assembly.GetEntryAssembly().Location) + @"\testIcon256.png";
    iconImage.Save(dstPathName);
    }
    }

256×256 => 250×250
イメージ
testIcon256.png
/1KB
違反を報告
引用返信

▽[全レス6件(ResNo.2-6 表示)]
■35443 / ResNo.2)  Re[2]: jumbo icon(256x256)が存在するか知る方法
□投稿者/ inunoshi 一般人(4回)-(2023/06/05(Mon) 22:31:38)
  • アイコン魔界の仮面弁士様

    お忙しい中、お教えいただきありがとうございます。
    IconLib.dllの存在は知りませんでした。
    早速ダウンロードして動かしてみました。
    私の動かし方が悪いと思うのですが、「FirstOrDefault」のところで
    コンパイルエラーになってしまった(Win11標準のcsc.exeでコンパイル)ので
    初心者的なコードで恐縮ですが、以下のようにしたら256x256アイコンの取得ができました。
    256x256アイコンがない場合は何も出力されないことも確認できました。

    ありがとうございました。

    using System;

    public class Icon256
    {
      public static void Main()
      {
        string iconFilePath = @"C:\Windows\notepad.exe";

        var size = new System.Drawing.Size(256, 256);
        var multiIcon = new System.Drawing.IconLib.MultiIcon();
        multiIcon.Load(iconFilePath);
        
        foreach (var singleIcon in multiIcon){
          for(int i = 0; i < singleIcon.Count; i++){
            if(singleIcon[i].Size == size){
              var icon = singleIcon[i];

              if (icon != null)
              {
                string outName = string.Format(@"D:\{0}_256_{1}.ico",
                  System.IO.Path.GetFileNameWithoutExtension(iconFilePath),
                  singleIcon.Name
                );
                using (var sm = new System.IO.FileInfo(outName).Create())
                icon.Icon.Save(sm);
                return;
              }
            }
          }
        }
      }
    }
解決み!
違反を報告
引用返信
■35445 / ResNo.3)  Re[3]: jumbo icon(256x256)が存在するか知る方法
□投稿者/ 魔界の仮面弁士 大御所(1550回)-(2023/06/05(Mon) 22:56:31)
  • アイコンNo35443に返信(inunoshiさんの記事)
    >> using (var sm = new System.IO.FileInfo(outName).Create())
    >> using (icon)
    済みません、前回答のこの部分は
     using (icon)
     using (var sm = new System.IO.FileInfo(outName).Create())
    の書き間違いです。


    > IconLib.dllの存在は知りませんでした。
    私も知りませんでした。
    探せばあるだろうと検索しただけです。


    > 私の動かし方が悪いと思うのですが、「FirstOrDefault」のところで
    > コンパイルエラーになってしまった(Win11標準のcsc.exeでコンパイル)ので
    using System.Linq; を書き忘れていたのではないでしょうか?


    > 初心者的なコードで恐縮ですが、以下のようにしたら256x256アイコンの取得ができました。
    > 256x256アイコンがない場合は何も出力されないことも確認できました。
    色数の異なる複数の 256x256 アイコンが同時に収録されている可能性がある点にも注意してください。

    また、.exe / .dll / .icl の場合、別アイコンの 256x256 サイズ画像を
    含んでいる可能性もあります。


    > icon.Icon.Save(sm);
    保存後は再利用しないでしょうし、Dispose した方が良いかもしれません。

    まぁ、今回は static void Main 自体が直ちに終了するようにしているので、
    Dispose や using を使わずとも、プロセス終了と共に、
    リソースの処分も勝手に行われるでしょうけれどね。

解決み!
違反を報告
引用返信
■35446 / ResNo.4)  Re[4]: jumbo icon(256x256)が存在するか知る方法
□投稿者/ inunoshi 一般人(5回)-(2023/06/05(Mon) 23:41:58)
  • アイコン>> 私の動かし方が悪いと思うのですが、「FirstOrDefault」のところで
    >> コンパイルエラーになってしまった(Win11標準のcsc.exeでコンパイル)ので
    >using System.Linq; を書き忘れていたのではないでしょうか?

    実はいったん「using System.Linq」を入れてみたのですが、以下のエラーが出てしまったので
    あきらめてしまいました。
    Linqは使いこなせれば簡潔に書けて良いと思うのですが、まだまだ使いこなすのに時間かかりそうです。

    csc.exeでのコンパイル時のエラー(FirstOrDefaultの行で出ます)
     error CS1525: '.' は無効です。
     error CS1003: 構文エラーです。':' が必要です。

    >> 初心者的なコードで恐縮ですが、以下のようにしたら256x256アイコンの取得ができました。
    >> 256x256アイコンがない場合は何も出力されないことも確認できました。
    >色数の異なる複数の 256x256 アイコンが同時に収録されている可能性がある点にも注意してください。

    >また、.exe / .dll / .icl の場合、別アイコンの 256x256 サイズ画像を
    >含んでいる可能性もあります。

    ありがとうございます。
    いろいろなファイルで試してみるようにします。

    >> icon.Icon.Save(sm);
    >保存後は再利用しないでしょうし、Dispose した方が良いかもしれません。

    >まぁ、今回は static void Main 自体が直ちに終了するようにしているので、
    >Dispose や using を使わずとも、プロセス終了と共に、
    >リソースの処分も勝手に行われるでしょうけれどね。

    すみません。Mainをすぐに抜けるので手を抜いてしまいました。
    プログラムに組み込む際は後始末をちゃんとするようにします。
解決み!
違反を報告
引用返信
■35447 / ResNo.5)  Re[5]: jumbo icon(256x256)が存在するか知る方法
□投稿者/ 魔界の仮面弁士 大御所(1551回)-(2023/06/06(Tue) 09:42:21)
  • アイコン
    No35446に返信(inunoshiさんの記事)
    > csc.exeでのコンパイル時のエラー(FirstOrDefaultの行で出ます)
    >  error CS1525: '.' は無効です。
    >  error CS1003: 構文エラーです。':' が必要です。
    
    それは LINQ の問題では無いですね。
    エラー行とエラー列を再度確認してみてください。
    
    .FirstOrDefault(〜) が失敗しているのではなく、
    その後に続く ?.Icon の部分を解釈できていないのだと思います。
    
    
    ?.Icon 構文は「null 条件演算子」といって C#6 で追加された文法です。
    csc.exe のオプションに /langversion:6 を追加してみてください。
    https://ufcpp.net/study/csharp/ap_ver6.html#null-conditional
    
    
    現状は恐らく、
     C:\Windows\Microsoft.NET\Framework\v4.0.30319\csc.exe
     C:\Windows\Microsoft.NET\Framework64\v4.0.30319\csc.exe
    を使っているのだと思いますが、これらは /langversion:5 までしか理解しませんので、
    Roslyn 世代の csc.exe を利用してください。
    
    なお、C# 6 以降に対応したコンパイラで /langversion:5 を指定した場合は、
      error CS1525: '.' は無効です。
      error CS1003: 構文エラーです。':' が必要です。
    ではなく、
      error CS8026: 機能 'Null を反映する演算子' は C# 5 では使用できません。6 以上の言語バージョンをお 使いください。
    というメッセージに変化するはずです。
    
    
    なお、
     var icon = singleIcon.FirstOrDefault(x => x.Size == size)?.Icon;
    という行を
     var iconImage = singleIcon.FirstOrDefault(x => x.Size == size);
     if (iconImage == null) { continue; }
     var icon = iconImage.Icon;
     if (icon == null) { continue; }
    に書き換えれば、文法レベルを C#3 相当まで下げることができます。

解決み!
違反を報告
引用返信
■35448 / ResNo.6)  Re[6]: jumbo icon(256x256)が存在するか知る方法
□投稿者/ inunoshi 一般人(6回)-(2023/06/06(Tue) 20:49:58)
  • アイコン本来の質問以外のところで文法の手ほどきまでしていただきありがとうございます。

    > それは LINQ の問題では無いですね。
    > エラー行とエラー列を再度確認してみてください。
    >
    > .FirstOrDefault(〜) が失敗しているのではなく、
    > その後に続く ?.Icon の部分を解釈できていないのだと思います。
    >
    >
    > ?.Icon 構文は「null 条件演算子」といって C#6 で追加された文法です。
    > csc.exe のオプションに /langversion:6 を追加してみてください。
    > https://ufcpp.net/study/csharp/ap_ver6.html#null-conditional
    > 現状は恐らく、
    >  C:\Windows\Microsoft.NET\Framework\v4.0.30319\csc.exe
    >  C:\Windows\Microsoft.NET\Framework64\v4.0.30319\csc.exe
    > を使っているのだと思いますが、これらは /langversion:5 までしか理解しませんので、
    > Roslyn 世代の csc.exe を利用してください。

    はい。
    csc.exeを以下のように使ってコンパイルしました。
    C:\Windows\Microsoft.NET\Framework\v4.0.30319\csc.exe /nologo /t:exe icon256.cs /r:iconlib.dll
    諸事情により、Windows標準のコンパイラを使いたいのでC#5の仕様までで行きたいと思っています。
    ただ、自分ではC#6以上の文法で出たコンパイルエラーを理解するのはスキル不足でした。

    Roslynは初めて知ったので、検索等して自分で勉強してみます。
    手元の環境はVSCode+.NET7.0で開発。最終コンパイルはWin11標準のcsc.exe使用です。

    > なお、
    >  var icon = singleIcon.FirstOrDefault(x => x.Size == size)?.Icon;
    > という行を
    >  var iconImage = singleIcon.FirstOrDefault(x => x.Size == size);
    >  if (iconImage == null) { continue; }
    >  var icon = iconImage.Icon;
    >  if (icon == null) { continue; }
    > に書き換えれば、文法レベルを C#3 相当まで下げることができます。

    C#3相当に書き直していただいたコードまで作ってくださりありがとうございます。
    いただいた内容そのままですが、以下のコードで、Win11標準のcsc.exeでもコンパイルできました。

    ありがとうございました。
    本来の質問以外のところでも大変勉強になりました。

    --------------------------------------------------------------------------
    using System;
    using System.Linq;

    public class Icon256
    {
      public static void Main()
      {
        string iconFilePath = @"C:\Windows\notepad.exe";

        var size = new System.Drawing.Size(256, 256);
        var multiIcon = new System.Drawing.IconLib.MultiIcon();
        multiIcon.Load(iconFilePath);
        foreach (var singleIcon in multiIcon)
        {
          //var icon = singleIcon.FirstOrDefault(x => x.Size == size)?.Icon;
          var iconImage = singleIcon.FirstOrDefault(x => x.Size == size);
          if (iconImage == null) { continue; }
          var icon = iconImage.Icon;
          if (icon == null) { continue; }
     
          if (icon != null)
          {
            string outName = string.Format(@"D:\{0}_256_{1}.ico",
              System.IO.Path.GetFileNameWithoutExtension(iconFilePath),
              singleIcon.Name
            );
            using (icon)
            using (var sm = new System.IO.FileInfo(outName).Create())
            {
              icon.Save(sm);
            }
          }
        }
      }
    }

解決み!
違反を報告
引用返信

■記事リスト / レス記事表示 → [親記事-6]



■記事リスト / ▼下のスレッド / ▲上のスレッド
■35430 / 親記事)  SpinWait()を使う理由
□投稿者/ Wan 付き人(79回)-(2023/05/31(Wed) 10:26:19)
  • アイコン環境/言語:[VisualBasic2019 Windows10 Basic Framework4.7.2] 
    分類:[.NET] 

    MicroSoftの解説に、次のようなコードが記載されています。
    
    https://learn.microsoft.com/ja-jp/dotnet/standard/parallel-programming/how-to-cancel-a-task-and-its-children
    
    この中に、次のように、SpinWait()を使っている部分があります。
    
    For i As Integer = 0 To maxIterations
      Dim sw As New SpinWait()
        For j As Integer = 0 To 100
          sw.SpinOnce()
        Next
      (・・・省略・・・)
    Next
    
    多分?少し時間稼ぎしているだけのように思えますが、ワザワザSpinWait()を使う理由ってありますか?Thread.Sleep()でもいいような?気がします。
    
    詳しい方、教えて頂けませんか?
    

違反を報告
引用返信

▽[全レス2件(ResNo.1-2 表示)]
■35431 / ResNo.1)  Re[1]: SpinWait()を使う理由
□投稿者/ Hongliang 大御所(641回)-(2023/05/31(Wed) 13:29:17)
  • アイコン' Do a bit of work. Not too much.
    とコメントにあるように、少しだけの仕事を表すダミーコードです。
    Sleep系の場合スレッドコンテキストの切り替えとかが起こるので、実際のアプリで書く「意味のあるコード」に対するサンプルコードとしての完全な代替にはなりません(完全な代替は必要ないというケースがほとんどですけども)。
違反を報告
引用返信
■35432 / ResNo.2)  Re[2]: SpinWait()を使う理由
□投稿者/ Wan 付き人(80回)-(2023/06/02(Fri) 17:36:13)
  • アイコン「スレッドコンテキストの切り替えとかが起こる」という部分など、私の理解できる
    を超えていますが、意味があって使われていることが判りました。

    ありがとうございました。

解決み!
違反を報告
引用返信

■記事リスト / レス記事表示 → [親記事-2]



■記事リスト / ▼下のスレッド / ▲上のスレッド
■35426 / 親記事)  antecedentってなんですか?
□投稿者/ Wan 付き人(77回)-(2023/05/22(Mon) 08:37:08)
  • アイコン環境/言語:[VisualBasic2019 Windows10 Basic Framework4.7.2] 
    分類:[.NET] 

    MicroSoftの解説に、次のようなものがあります。
    「継続タスクを使用したタスクの連結」
    https://learn.microsoft.com/ja-jp/dotnet/standard/parallel-programming/chaining-tasks-by-using-continuation-tasks
    この中に、次のようなコードの記載があり、taskA.ContinueWith(Sub(antecedent)の部分で、ラムダ式にantecedentという引数が渡されています。
    しかし、Main()の中に、antecedentという変数は宣言されていません。
    どこから?発生したのでしょうか?
    Imports System.Threading.Tasks
    Module Example
    Public Sub Main()
          Dim taskA As Task(Of DayOfWeek) = Task.Run(Function() DateTime.Today.DayOfWeek)
          Dim continuation As Task = taskA.ContinueWith(Sub(antecedent)
                                                              Console.WriteLine("Today is {0}.", antecedent.Result)
                                                          End Sub)
          continuation.Wait()
        End Sub
    End Module
    VisalStudioにコピペして、「antecedent」の部分にカーソルを当てると、antecedent As Task(Of DayOfWeek)となっており、
    taskAを指しているようです。
    メソッドチェンの親を指すのでしょうか?
    
    詳しい方、宜しくお願い致します。
    

違反を報告
引用返信

▽[全レス2件(ResNo.1-2 表示)]
■35427 / ResNo.1)  Re[1]: antecedentってなんですか?
□投稿者/ Hongliang 大御所(640回)-(2023/05/22(Mon) 09:50:42)
  • アイコン
    そこはいわばメソッドの引数部分なので、変数が先行していないのは当然です。
    ラムダ式ではなく、メソッドとして独立させたら分かりやすいと思います。
    ラムダ式だとtaskAをキャプチャすればいいじゃん、となって、
    ContinueWithの引数として与えられる意味がよく分からなくなるでしょうしね。
    
    Sub Main()
        Dim taskA As Task(Of DayOfWeek) = Task.Run(Function() DateTime.Today.DayOfWeek)
        Dim continuation As Task = taskA.ContinueWith(AddressOf NextAction)
        continuation.Wait()
    End Sub
    
    Sub NextAction(ByVal antecedent As Task(Of DayOfWeek))
        Console.WriteLine("Today is {0}.", antecedent.Result)
    End Sub

違反を報告
引用返信
■35428 / ResNo.2)  Re[2]: antecedentってなんですか?
□投稿者/ Wan 付き人(78回)-(2023/05/23(Tue) 08:31:05)
  • アイコンHongliang様
    御指南ありがとうございます。
    デリゲートの理解不足が原因だと分かりました。
    今一度、勉強し直します。
    大変助かっております。ありがとうございます。
解決み!
違反を報告
引用返信

■記事リスト / レス記事表示 → [親記事-2]



■記事リスト / ▼下のスレッド / ▲上のスレッド
■35422 / 親記事)  ワンタイムパスワードのサイトに自動ログインしてアクセストークンを得る
□投稿者/ けい 一般人(8回)-(2023/05/12(Fri) 19:05:52)
  • アイコン環境/言語:[Windows10、VB.NET2022] 
    分類:[.NET] 

    お世話になります。

    ヤフーのアカウントで、
    開発用のテストアカウントを設け、
    ヤフーのWebAPIを使用するのに必要な、
    「クライアントID」を割り振ってもらっています。

    また、認証を求めるWebAPIを使用するのに必要な、
    アクセストークンという認証文字列を受け取るためのURLである、
    「コールバックURL」を指定しています。

    ヤフーのアクセストークンを取得するためのアクセス先が、
    「Authorizationエンドポイント」と言い、接続先は、
    URL: https://auth.login.yahoo.co.jp/yconnect/v2/authorization
    サポートするHTTPメソッド: GET/POST
    です。

    (参照)
    Authorizationエンドポイント
    https://developer.yahoo.co.jp/yconnect/v2/authorization_code/authorization.html

    プログラムにおいては、
    Form1上のButton1をクリックすると、
    このURLに接続し、自動ログインがなされ、
    アクセストークン情報を含むJSONデータが返り、
    RichTextBox1に表示するようにしたいです。

    そこで、次のようなコードを記述しました。

    ---------------------------------------------

    Imports System.IO
    Imports System.Text

    Public Class Form1

    Private Sub Button1_Click(sender As Object, e As EventArgs)
    Handles Button1.Click

    Dim TargetURL As String

    TargetURL="https://auth.login.yahoo.co.jp/yconnect/v2/authorization?client_id=<クライアントID>&response_type=token(or code)&scope=openid&redirect_uri=<コールバックURL>&output=json"

    Using client As New System.Net.Http.HttpClient()
    Using response1 As System.Net.Http.HttpResponseMessage = client.GetAsync(TargetURL).Result

    Dim responseBody1 As String = response1.Content.ReadAsStringAsync().Result
    RichTextBox1.Text = responseBody1.ToString

    End Using
    End Using

    End Sub

    End Class

    ---------------------------------------------

    これを実行しますと、
    RichTextBox1には、JSONデータではなく、
    ヤフーのログイン画面のHTMLが返ります。
    自動ログインができていません。

    ここで、TargetURLも文字列を、ブラウザのURL欄に手動で入れて実行すると、
    ヤフーのログイン画面が表示されます。
    ヤフーのログインでは、パスワードが固定ではなく、
    ユーザーIDを入力したら、ワンタムパスワードを発行し、
    メールまたはスマホのSMSに届いたパスワードを画面に手入力して、
    ログインします。
    そうすると、指定していた「コールバックURL」のサイトがリダイレクト表示され、URL欄に、「#access_token=」とアクセストークンが表示されます。

    この一連の手続きを手動ではなく自動で行いたいので、
    次のようなコードを検討しました。

    「TargetURL=」の後ろの部分です。

    ワンタイムパスワード認証は、Basic認証ではないのかもしれませんが、
    まずは書いてみました。

    (参照)
    https://teratail.com/questions/373083
    ---------------------------------------------

    'Basic認証するユーザ名とパスワード
    Dim userName = "<ユーザーID>"
    Dim userPassword = ""

    'リクエストの生成
    Dim request = New HttpRequestMessage
    request.Method = HttpMethod.Post
    request.RequestUri = New Uri(TargetURL)

    'Basic認証ヘッダを付与する
    request.Headers.Authorization
    =
    New System.Net.Http.Headers.AuthenticationHeaderValue
    ("Basic", Convert.ToBase64String(Encoding.ASCII.GetBytes
    (String.Format("{0}:{1}", userName, userPassword))))

    'リクエストの送信
    Dim httpClient = New HttpClient()
    Dim response2 = httpClient.SendAsync(request)
    RichTextBox2.Text = response2.ToString

    ---------------------------------------------

    これを実行しますと、
    RichTextBox2には、
    次のような文字列が返ります。

    System.Runtime.CompilerServices.AsyncTaskMethodBuilder`1+AsyncStateMachineBox`1[System.Net.Http.HttpResponseMessage,System.Net.Http.HttpClient+<<SendAsync>g__Core|83_0>d]

    上記のコードでは、
    userPassword = ""
    のため、当然ログインができないのだと思いますが、
    ワンタイムパスワードをここでどのように記述すればよいのか、
    わかりませんでした。

    また、PostAsyncを使用する気もすればよい気もするのですが、
    ここでの使い方が分かりませんでした。

    (参照)
    HttpClient.PostAsync メソッド
    https://learn.microsoft.com/ja-jp/dotnet/api/system.net.http.httpclient.postasync?view=net-8.0

    WebRequestでPOSTする方法はネットに例があったのですが、
    廃止されているとのことでした。

    (参照)
    認証が必要なページをダウンロードする
    http://dobon.net/vb/dotnet/internet/usecredentials.html
    WebRequest、WebClient、ServicePoint は廃止されている
    https://learn.microsoft.com/ja-jp/dotnet/core/compatibility/networking/6.0/webrequest-deprecated

    以上、長くなってしまいましたが、
    ワンタイムパスワードを使用するサイトに自動ログインしてアクセストークンを含むJSONデータを取得するには、どのようにしたらよいか。

    可能な範囲でご指導いただきたく、どうぞよろしくお願い申し上げます。


違反を報告
引用返信

▽[全レス3件(ResNo.1-3 表示)]
■35423 / ResNo.1)  Re[1]: ワンタイムパスワードのサイトに自動ログインしてアクセストークンを得る
□投稿者/ Azulean 大御所(537回)-(2023/05/12(Fri) 21:47:13)
  • アイコン2023/05/12(Fri) 21:48:42 編集(投稿者)

    No35422に返信(けいさんの記事)
    > ワンタイムパスワードを使用するサイトに自動ログインしてアクセストークンを含むJSONデータを取得するには、どのようにしたらよいか。
    >

    結論から言えば「できません」。


    この authorization のサイトをユーザーに表示し、ユーザーがIDやパスワード、ワンタイムパスワードを入力し、アプリケーションがアクセスすることを認めるというのが認証プロセスです。
    これは自動化できません。

    通常、初回(や一定期間経過後)にこの画面を表示してユーザーに権限を求め、以降は得たアクセストークンで処理を実行するように作ります。
    いわゆる OAuth 認証に当たります。
    (アプリケーションに、IDやパスワードを晒すことなく、権限を許可できる仕組み)
違反を報告
引用返信
■35424 / ResNo.2)  Re[2]: ワンタイムパスワードのサイトに自動ログインしてアクセストークンを得る
□投稿者/ けい 一般人(9回)-(2023/05/12(Fri) 22:31:29)
  • アイコンNo35423に返信(Azuleanさんの記事)

    ありがとうございます。

    自動化できない場合、手動でログインした後の状態で、アクセストークンを、ブラウザ経由(マウスでURL表示部分のアクセストークン部分を選択、コピペ)ではなく直接取得する方法がありますでしょうか。

    ブラウザ経由の場合は、例えば、WebBrowserコントロールで画面を表示すれば、URLを取得しやすいようですが、現在このコントロールは終了の方向であるようですね。
    WebView2コントロールというものがあるようで、こちらでテストしてみます。


違反を報告
引用返信
■35425 / ResNo.3)  Re[3]: ワンタイムパスワードのサイトに自動ログインしてアクセストークンを得る
□投稿者/ けい 一般人(10回)-(2023/05/16(Tue) 17:20:49)
  • アイコンNo35423に返信(Azuleanさんの記事)

    お世話になります。

    ブラウザはEdge、コントロールはWebView2を使うことにしました。
    他のブラウザでWebView2を使う方法は調べきれていません。

    (参照)
    Microsoft Edge WebView2
    https://learn.microsoft.com/ja-jp/microsoft-edge/webview2/

    上記のTargetURLをWebView2コントロールに指定して、
    ヤフーのログイン画面を開き、
    届いたワンタイムパスワードでログインします。

    リダイレクトされたサイトのURLにアクセストークンが含まれており、
    それを取得します。

    コードは以下のようになりました。
    WebView2は初期化が必要であること、
    URLを取得する場合は、
    WebView2_NavigationCompleted=Trueになってからでないと取得できない、
    ということでした。

    -------------------------------------

    Async Sub InitializeAsync()
    Await WebView2.EnsureCoreWebView2Async(Nothing)
    End Sub

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    '初期化
    InitializeAsync()
    End Sub

    Private Sub Button1_Click(sender As Object, e As EventArgs)
    End Sub Button1.Click
    'サイトを開く
    WebView2.CoreWebView2.Navigate(TargetURL2)
    End Sub

    Module Hensu
    'パブリック変数宣言
    Public intNavigationState As Integer
    End Module

    Private Sub WebView2_NavigationStarting(sender As Object, e As CoreWebView2NavigationStartingEventArgs) Handles WebView2.NavigationStarting
    intNavigationState = 0 'サイト表示開始
    End Sub

    Private Sub WebView2_NavigationCompleted(sender As Object, e As CoreWebView2NavigationCompletedEventArgs) Handles WebView2.NavigationCompleted
    intNavigationState = 1 'サイト表示完了
    End Sub

    Private Sub Button2_Click(sender As Object, e As EventArgs)
    End Sub Button2.Click
    Dim strResponse As String
    If intNavigationState = 1 Then
    'URLを取得する。
    strResponse=WebView2.CoreWebView2.Source
    End If
    End Sub

    -------------------------------------

    ここで得られたstrResponseから、アクセストークンを抽出できました。

    ご指導ご教示を誠にありがとうございました^^。
解決み!
違反を報告
引用返信

■記事リスト / レス記事表示 → [親記事-3]



■記事リスト / ▲上のスレッド
■35416 / 親記事)  style.displayだと効率悪いから違うやり方をしたいです。
□投稿者/ えっぴー 一般人(1回)-(2023/05/11(Thu) 13:00:19)
  • アイコン環境/言語:[javascript] 
    分類:[その他] 

    style.displayだと効率悪いから違うやり方をしたいです。
    以下はhtmlです。
    なぜ効率悪いかというと、
    一つ一つ、
    セレクトごとに、
    document.getElementById('Box1').style.display = "";と、
    document.getElementById('Box1').style.display = "none";
    を書かなければならないからです。
    構文が長くなってしまい、非効率です。
    しかし、document.getElementById自体1つしか書けないのです。
    for文を使う必要があるのです。
    ご教授願えたら幸いです。
    <div class="col-auto my-1">
    <label for="sample">選択してください</label>
    </div>
    <div class="col-auto my-1">
    <select class="form-control" id="sample" onchange="viewChange();">
    <option value="select1">one</option>
    <option value="select2">two</option>
    <option value="select3">three</option>
    </select>
    </div>
    <div class="col-auto my-5">
    <div id="Box1" class="my-5">
    <p>one</p>
    </div>
    <div id="Box2" class="my-5">
    <p>two</p>
    </div>
    <div id="Box3" class="my-5">
    <p>three</p>
    </div>
    </div>
    <script>
    function viewChange(){
    if(document.getElementById('sample')){
    id = document.getElementById('sample').value;
    if(id == 'select1'){
    document.getElementById('Box1').style.display = "";
    document.getElementById('Box2').style.display = "none";
    document.getElementById('Box3').style.display = "none";
    }else if(id == 'select2'){
    document.getElementById('Box1').style.display = "none";
    document.getElementById('Box2').style.display = "";
    document.getElementById('Box3').style.display = "none";
    }
    else if(id == 'select3'){
    document.getElementById('Box1').style.display = "none";
    document.getElementById('Box2').style.display = "none";
    document.getElementById('Box3').style.display = "";
    }
    }

    window.onload = viewChange;
    }
    </script>
    javascript全文を書いていただければ幸いです。
違反を報告
引用返信

▽[全レス5件(ResNo.1-5 表示)]
■35417 / ResNo.1)  Re[1]: style.displayだと効率悪いから違うやり方をしたいです。
□投稿者/ 魔界の仮面弁士 大御所(1544回)-(2023/05/11(Thu) 13:27:36)
  • アイコン2023/05/11(Thu) 13:31:57 編集(投稿者)

    No35416に返信(えっぴーさんの記事)
    > style.displayだと効率悪いから違うやり方をしたいです。
    そもそもなぜ、style を直接操作したいのでしょうか。
    基本的には css クラスで操作する設計にするべきだと思いますが…。
    https://ja.javascript.info/styles-and-classes

    CSS や JS 向けのフレームワークを使うにせよ使わないにせよ、
    広域的操作であれば class / className で調整した方が便利かと。


    > セレクトごとに、
    > document.getElementById('Box1').style.display = "";と、
    > document.getElementById('Box1').style.display = "none";
    > を書かなければならないからです。
    短縮表記だけの話なら、
     const $id = document.getElementById;
    みたいにエイリアスを用意して、
     $id('box1').style.display = 'none';
    などとは書けますね。

    あるいは CSSStyleDeclaration オブジェクト自体をキャッシュした
     let boxStyle = document.getElementById('Box1').style;
    などを用意しておけば、以降は
     boxStyle.display = 'none';
    と書くことはできますが…いずれにせよ、style は積極的に使うべきでなく、
    基本的には CSS クラスで制御するようにし、それで処理しきれない要素に
    限定して、style の直接操作を試みた方が良いでしょう。


    > しかし、document.getElementById自体1つしか書けないのです。
    document.querySelector
    document.querySelectorAll
    を使わないのは何故ですか? (CSS セレクター指定)
    https://developer.mozilla.org/ja/docs/Web/CSS/CSS_Selectors
違反を報告
引用返信
■35418 / ResNo.2)  Re[2]: style.displayだと効率悪いから違うやり方をしたいです。
□投稿者/ えっぴー 一般人(2回)-(2023/05/11(Thu) 14:00:44)
  • アイコン全文と言いました。
    僕は天才のように、断片的な情報から組み合わせて、完成したものを作る能力はございません。
違反を報告
引用返信
■35419 / ResNo.3)  Re[3]: style.displayだと効率悪いから違うやり方をしたいです。
□投稿者/ 福ちゃん 一般人(3回)-(2023/05/11(Thu) 17:34:17)
  • アイコンもういいです。
    あなたを役立たずとみなします。
解決み!
違反を報告
引用返信
■35420 / ResNo.4)  Re[4]: style.displayだと効率悪いから違うやり方をしたいです。
□投稿者/ 魔界の仮面弁士 大御所(1545回)-(2023/05/11(Thu) 18:32:47)
  • アイコン
    No35418に返信(えっぴーさんの記事)
    > 全文と言いました。
    https://codepen.io/benshi-orator/pen/poxVZbg


    No35419に返信(福ちゃんさんの記事)
    > もういいです。
    解決済みチェックの「スレッドを閉じる目的ではチェックしないでください!」
    と書かれた赤文字を読まれましたか?

    掲示板の投稿ルールを守って利用してください。
    https://dobon.net/vb/bbs/index.html

違反を報告
引用返信
■35421 / ResNo.5)  【注意】ルールをお守りください
□投稿者/ 管理人 一般人(1回)-(2023/05/12(Fri) 03:16:45)
  • アイコンえっぴーさんの今までのご投稿(別のお名前でのご投稿もありますが)を拝見させていただくと、明らかに書き込みのルールが守られていません。

    書き込みのルールについて
    https://dobon.net/vb/bbs/index.html

    しかし、それ以前の問題として、No35419 のご投稿は、人を侮辱した内容であり、あまりにひどいです。よって、大変申し訳ありませんが、えっぴーさんのご投稿を一時的に禁止させていただきます。

    今後はルールをお守りいただけると約束していただけるのであれば、投稿禁止を解除させていただきますので、その場合は管理人へご連絡ください。

    なお、さらなる迷惑行為が行われた場合は、さらに厳しい対応をとらせていただくことになってしまうかもしれませんので、絶対にやめてください。

    以上です。よろしくお願いいたします。
違反を報告
引用返信

■記事リスト / レス記事表示 → [親記事-5]






Mode/  Pass/


- Child Tree -