デュアルディスプレイのセカンドモニターにＰＤＦ、動画、画像を表示。
pdfsecondmonitor/frmOperation.vb (diff)| @@ -172,6 +172,14 @@ | ||
| 172 | 172 | If fileviewinfo Is Nothing Then |
| 173 | 173 | Exit Sub |
| 174 | 174 | End If |
| 175 | + Dim path = fileviewinfo.FileName | |
| 176 | + If Not IO.File.Exists(path) Then | |
| 177 | + Dim ret = MessageBox.Show("ファイルが見つかりません。リストから削除しますか？", "ファイルがありません", MessageBoxButtons.YesNo) | |
| 178 | + If ret = DialogResult.Yes Then | |
| 179 | + lstPDFFiles.Items.Remove(fileviewinfo) | |
| 180 | + End If | |
| 181 | + Exit Sub | |
| 182 | + End If | |
| 175 | 183 | txtPDFFileName.Text = fileviewinfo.FileName |
| 176 | 184 | Dim ext = IO.Path.GetExtension(fileviewinfo.FileName) |
| 177 | 185 | If IsContain(ext, {".pdf"}) Then |
bellyoshi