DoboWiki
Top
> .NETプログラミング研究/38 をテンプレートにして作成
.NETプログラミング研究/38 をテンプレートにして作成
開始行:
#title(.NETプログラミング研究 第38号)
#navi(.NETプログラミング研究)
#contents
*.NETプログラミング研究 第38号 [#j72cc90d]
**.NET質問箱 [#geb96bff]
「.NET質問箱」では、「どぼん!のプログラミング掲示板」に...
-[[どぼん!のプログラミング掲示板>https://dobon.net/vb/bb...
***Microsoft Officeでコピーした図をPictureBoxに表示するに...
#column(注意){{
この記事の最新版は「[[Microsoft Officeでコピーした図をPic...
}}
''【質問】''
Microsoft Office Wordなどで作成した図をクリップボードにコ...
#code(vbnet){{
Dim data As IDataObject = Clipboard.GetDataObject()
'クリップボードにあるデータが拡張メタファイル形式か調べる
If data.GetDataPresent(DataFormats.EnhancedMetafile) Then
'拡張メタファイル形式でデータを取得する
PictureBox1.Image = _
CType(data.GetData(DataFormats.EnhancedMetafile),...
End If
}}
#code(csharp){{
IDataObject data = Clipboard.GetDataObject();
//クリップボードにあるデータが拡張メタファイル形式か調べる
if (data.GetDataPresent(DataFormats.EnhancedMetafile))
{
//拡張メタファイル形式でデータを取得する
PictureBox1.Image =
(Image) data.GetData(DataFormats.EnhancedMetafile);
}
}}
''【回答】''
この問題の解決法は、DOBON.NET掲示板へのピラルクさんの投稿...
-[[microsoft.public.dotnet.general | RE: Paste Word graph...
Lion Shiさんの投稿によると、Microsoft Officeの図をクリッ...
クリップボードにコピーされたデータは、EnhancedMetafile形...
つまり、Microsoft Officeでコピーした図を、例えばPNG形式で...
#code(vbnet){{
Dim data As IDataObject = Clipboard.GetDataObject()
'クリップボードにあるデータがPNG形式か調べる
If data.GetDataPresent("PNG") Then
'PNG形式でデータをMemoryStreamとして取得する
Dim ms As MemoryStream = CType(data.GetData("PNG"), M...
'Imageオブジェクトに変換する
PictureBox1.Image = Image.FromStream(ms)
End If
}}
#code(csharp){{
IDataObject data = Clipboard.GetDataObject();
//クリップボードにあるデータがPNG形式か調べる
if (data.GetDataPresent("PNG"))
{
//PNG形式でデータをMemoryStreamとして取得する
MemoryStream ms = (MemoryStream) data.GetData("PNG");
//Imageオブジェクトに変換する
PictureBox1.Image = Image.FromStream(ms);
}
}}
"PNG"以外の形式を試してみたところ、上記のコードで"PNG"の...
#pre{{
"PNG+Office Art"
"JFIF+Office Art"
"GIF+Office Art"
"JFIF"
"GIF"
}}
○この記事の基になった掲示板のスレッド
-[[クリップボードからの画像の取り込みについて: 投稿者(敬...
***用紙のサイズをコンボボックスに表示して、選択して印刷す...
#column(注意){{
この記事の最新版は「[[用紙のサイズをコンボボックスに表示...
}}
''【質問】''
PrintDocumentクラスを使って印刷する際に、プリンタで印刷可...
''【回答】''
プリンタでサポートされている用紙サイズは、PrintDocumentオ...
フォームにPrintDocumentオブジェクト"PrintDocument1"とコン...
#code(vbnet){{
'ComboBox1の項目をクリアする
ComboBox1.Items.Clear()
'表示するプロパティをPaperNameとする
ComboBox1.DisplayMember = "PaperName"
'PaperSizeをComboBox1に追加していく
Dim ps As System.Drawing.Printing.PaperSize
For Each ps In PrintDocument1.PrinterSettings.PaperSizes
ComboBox1.Items.Add(ps)
Next ps
}}
#code(csharp){{
//ComboBox1の項目をクリアする
ComboBox1.Items.Clear();
//表示するプロパティをPaperNameとする
ComboBox1.DisplayMember = "PaperName";
//PaperSizeをComboBox1に追加していく
foreach (System.Drawing.Printing.PaperSize ps
in PrintDocument1.PrinterSettings.PaperSizes)
{
ComboBox1.Items.Add(ps);
}
}}
ComboBox1で選択された用紙サイズで印刷するには、次のように...
-[[DOBON.NET .NET Tips - 印刷する>https://dobon.net/vb/do...
#code(vbnet){{
'用紙サイズをComboBox1で選択されているサイズにする
PrintDocument1.DefaultPageSettings.PaperSize = _
CType(ComboBox1.SelectedItem, System.Drawing.Printing...
'印刷する
PrintDocument1.Print()
}}
#code(csharp){{
//用紙サイズをComboBox1で選択されているサイズにする
PrintDocument1.DefaultPageSettings.PaperSize =
(System.Drawing.Printing.PaperSize) ComboBox1.SelectedIt...
//印刷する
PrintDocument1.Print();
}}
○この記事の基になった掲示板のスレッド
-[[紙サイズの得取: 投稿者(敬称略) star76, 管理人>https://...
***FileSystemWatcherでファイル名が小文字になる [#z6775086]
#column(注意){{
この記事の最新版は「[[FileSystemWatcherでファイル名が小文...
}}
''【質問】''
ファイルの変更を監視するためにFileSystemWatcherクラスを使...
''【回答】''
これは.NET Frameworkのバグのようです(.NET Framework 1.1...
このような小文字のファイル名から正しいファイル名を取得す...
-[[Newsgroups:microsoft.public.dotnet.framework | RE: Fil...
この記事によると、ルートフォルダから順番にDirectoryInfoク...
上に紹介した記事にコードもありますが、私なりに書いたもの...
#code(vbnet){{
''' <summary>
''' 短いファイル名から長いファイル名を取得する
''' </summary>
''' <param name="path">短いファイル名(フルパス)</param>
''' <returns>長いファイル名</returns>
Public Shared Function GetLongPath(ByVal path As String) ...
'ルートディレクトリを取得
Dim root As String = System.IO.Path.GetPathRoot(path)
'ルートディレクトリ以降を'\'で分割
Dim folders As String() = path.Substring(root.Length)...
Split(System.IO.Path.DirectorySeparatorChar)
Dim res As String = root
Dim name As String
For Each name In folders
Dim di = New DirectoryInfo(res)
'ディレクトリ(またはファイル)を探す
Dim fsi As System.IO.FileSystemInfo() = _
di.GetFileSystemInfos(name)
If fsi.Length = 1 Then
res = fsi(0).FullName
Else
Throw New Exception("ERROR")
End If
Next name
Return res
End Function
}}
#code(csharp){{
/// <summary>
/// 短いファイル名から長いファイル名を取得する
/// </summary>
/// <param name="path">短いファイル名(フルパス)</param>
/// <returns>長いファイル名</returns>
public static string GetLongPath(string path)
{
//ルートディレクトリを取得
string root = System.IO.Path.GetPathRoot(path);
//ルートディレクトリ以降を'\'で分割
string[] folders = path.Substring(root.Length)
.Split(System.IO.Path.DirectorySeparatorChar);
string res = root;
foreach (string name in folders)
{
System.IO.DirectoryInfo di = new DirectoryInfo(res);
//ディレクトリ(またはファイル)を探す
System.IO.FileSystemInfo[] fsi = di.GetFileSystemInfos(...
if (fsi.Length == 1)
res = fsi[0].FullName;
else
throw new Exception("ERROR");
}
return res;
}
}}
○この記事の基になった掲示板のスレッド
-[[FileSystemWatcherのイベントで得られるファイル名のアル...
**コンピュータ雑学 [#ied6dc4a]
ここでは、話すと人に嫌われるなまぬるいコンピュータに関す...
***BASICの歴史とMicrosoftの誕生 [#pc25563d]
BASIC(Beginner's All-purpose Symbolic Instruction Code)は...
1974年、Popular Electronics誌で、世界初のパーソナルコンピ...
Harvard大学の学生であったBill GatesとHoneywellの社員だっ...
Bill GatesとPaul Allenは1975年7月11日にMITS社とBASICのラ...
-[[BASIC programming language - Wikipedia, the free encyc...
-[[William H. Gates IV Page>http://voteview.uh.edu/gates....
**コメント [#tfe618ba]
#comment
//これより下は編集しないでください
#pageinfo([[:Category/.NET]],2004-07-27 (火) 06:00:00,DOB...
終了行:
#title(.NETプログラミング研究 第38号)
#navi(.NETプログラミング研究)
#contents
*.NETプログラミング研究 第38号 [#j72cc90d]
**.NET質問箱 [#geb96bff]
「.NET質問箱」では、「どぼん!のプログラミング掲示板」に...
-[[どぼん!のプログラミング掲示板>https://dobon.net/vb/bb...
***Microsoft Officeでコピーした図をPictureBoxに表示するに...
#column(注意){{
この記事の最新版は「[[Microsoft Officeでコピーした図をPic...
}}
''【質問】''
Microsoft Office Wordなどで作成した図をクリップボードにコ...
#code(vbnet){{
Dim data As IDataObject = Clipboard.GetDataObject()
'クリップボードにあるデータが拡張メタファイル形式か調べる
If data.GetDataPresent(DataFormats.EnhancedMetafile) Then
'拡張メタファイル形式でデータを取得する
PictureBox1.Image = _
CType(data.GetData(DataFormats.EnhancedMetafile),...
End If
}}
#code(csharp){{
IDataObject data = Clipboard.GetDataObject();
//クリップボードにあるデータが拡張メタファイル形式か調べる
if (data.GetDataPresent(DataFormats.EnhancedMetafile))
{
//拡張メタファイル形式でデータを取得する
PictureBox1.Image =
(Image) data.GetData(DataFormats.EnhancedMetafile);
}
}}
''【回答】''
この問題の解決法は、DOBON.NET掲示板へのピラルクさんの投稿...
-[[microsoft.public.dotnet.general | RE: Paste Word graph...
Lion Shiさんの投稿によると、Microsoft Officeの図をクリッ...
クリップボードにコピーされたデータは、EnhancedMetafile形...
つまり、Microsoft Officeでコピーした図を、例えばPNG形式で...
#code(vbnet){{
Dim data As IDataObject = Clipboard.GetDataObject()
'クリップボードにあるデータがPNG形式か調べる
If data.GetDataPresent("PNG") Then
'PNG形式でデータをMemoryStreamとして取得する
Dim ms As MemoryStream = CType(data.GetData("PNG"), M...
'Imageオブジェクトに変換する
PictureBox1.Image = Image.FromStream(ms)
End If
}}
#code(csharp){{
IDataObject data = Clipboard.GetDataObject();
//クリップボードにあるデータがPNG形式か調べる
if (data.GetDataPresent("PNG"))
{
//PNG形式でデータをMemoryStreamとして取得する
MemoryStream ms = (MemoryStream) data.GetData("PNG");
//Imageオブジェクトに変換する
PictureBox1.Image = Image.FromStream(ms);
}
}}
"PNG"以外の形式を試してみたところ、上記のコードで"PNG"の...
#pre{{
"PNG+Office Art"
"JFIF+Office Art"
"GIF+Office Art"
"JFIF"
"GIF"
}}
○この記事の基になった掲示板のスレッド
-[[クリップボードからの画像の取り込みについて: 投稿者(敬...
***用紙のサイズをコンボボックスに表示して、選択して印刷す...
#column(注意){{
この記事の最新版は「[[用紙のサイズをコンボボックスに表示...
}}
''【質問】''
PrintDocumentクラスを使って印刷する際に、プリンタで印刷可...
''【回答】''
プリンタでサポートされている用紙サイズは、PrintDocumentオ...
フォームにPrintDocumentオブジェクト"PrintDocument1"とコン...
#code(vbnet){{
'ComboBox1の項目をクリアする
ComboBox1.Items.Clear()
'表示するプロパティをPaperNameとする
ComboBox1.DisplayMember = "PaperName"
'PaperSizeをComboBox1に追加していく
Dim ps As System.Drawing.Printing.PaperSize
For Each ps In PrintDocument1.PrinterSettings.PaperSizes
ComboBox1.Items.Add(ps)
Next ps
}}
#code(csharp){{
//ComboBox1の項目をクリアする
ComboBox1.Items.Clear();
//表示するプロパティをPaperNameとする
ComboBox1.DisplayMember = "PaperName";
//PaperSizeをComboBox1に追加していく
foreach (System.Drawing.Printing.PaperSize ps
in PrintDocument1.PrinterSettings.PaperSizes)
{
ComboBox1.Items.Add(ps);
}
}}
ComboBox1で選択された用紙サイズで印刷するには、次のように...
-[[DOBON.NET .NET Tips - 印刷する>https://dobon.net/vb/do...
#code(vbnet){{
'用紙サイズをComboBox1で選択されているサイズにする
PrintDocument1.DefaultPageSettings.PaperSize = _
CType(ComboBox1.SelectedItem, System.Drawing.Printing...
'印刷する
PrintDocument1.Print()
}}
#code(csharp){{
//用紙サイズをComboBox1で選択されているサイズにする
PrintDocument1.DefaultPageSettings.PaperSize =
(System.Drawing.Printing.PaperSize) ComboBox1.SelectedIt...
//印刷する
PrintDocument1.Print();
}}
○この記事の基になった掲示板のスレッド
-[[紙サイズの得取: 投稿者(敬称略) star76, 管理人>https://...
***FileSystemWatcherでファイル名が小文字になる [#z6775086]
#column(注意){{
この記事の最新版は「[[FileSystemWatcherでファイル名が小文...
}}
''【質問】''
ファイルの変更を監視するためにFileSystemWatcherクラスを使...
''【回答】''
これは.NET Frameworkのバグのようです(.NET Framework 1.1...
このような小文字のファイル名から正しいファイル名を取得す...
-[[Newsgroups:microsoft.public.dotnet.framework | RE: Fil...
この記事によると、ルートフォルダから順番にDirectoryInfoク...
上に紹介した記事にコードもありますが、私なりに書いたもの...
#code(vbnet){{
''' <summary>
''' 短いファイル名から長いファイル名を取得する
''' </summary>
''' <param name="path">短いファイル名(フルパス)</param>
''' <returns>長いファイル名</returns>
Public Shared Function GetLongPath(ByVal path As String) ...
'ルートディレクトリを取得
Dim root As String = System.IO.Path.GetPathRoot(path)
'ルートディレクトリ以降を'\'で分割
Dim folders As String() = path.Substring(root.Length)...
Split(System.IO.Path.DirectorySeparatorChar)
Dim res As String = root
Dim name As String
For Each name In folders
Dim di = New DirectoryInfo(res)
'ディレクトリ(またはファイル)を探す
Dim fsi As System.IO.FileSystemInfo() = _
di.GetFileSystemInfos(name)
If fsi.Length = 1 Then
res = fsi(0).FullName
Else
Throw New Exception("ERROR")
End If
Next name
Return res
End Function
}}
#code(csharp){{
/// <summary>
/// 短いファイル名から長いファイル名を取得する
/// </summary>
/// <param name="path">短いファイル名(フルパス)</param>
/// <returns>長いファイル名</returns>
public static string GetLongPath(string path)
{
//ルートディレクトリを取得
string root = System.IO.Path.GetPathRoot(path);
//ルートディレクトリ以降を'\'で分割
string[] folders = path.Substring(root.Length)
.Split(System.IO.Path.DirectorySeparatorChar);
string res = root;
foreach (string name in folders)
{
System.IO.DirectoryInfo di = new DirectoryInfo(res);
//ディレクトリ(またはファイル)を探す
System.IO.FileSystemInfo[] fsi = di.GetFileSystemInfos(...
if (fsi.Length == 1)
res = fsi[0].FullName;
else
throw new Exception("ERROR");
}
return res;
}
}}
○この記事の基になった掲示板のスレッド
-[[FileSystemWatcherのイベントで得られるファイル名のアル...
**コンピュータ雑学 [#ied6dc4a]
ここでは、話すと人に嫌われるなまぬるいコンピュータに関す...
***BASICの歴史とMicrosoftの誕生 [#pc25563d]
BASIC(Beginner's All-purpose Symbolic Instruction Code)は...
1974年、Popular Electronics誌で、世界初のパーソナルコンピ...
Harvard大学の学生であったBill GatesとHoneywellの社員だっ...
Bill GatesとPaul Allenは1975年7月11日にMITS社とBASICのラ...
-[[BASIC programming language - Wikipedia, the free encyc...
-[[William H. Gates IV Page>http://voteview.uh.edu/gates....
**コメント [#tfe618ba]
#comment
//これより下は編集しないでください
#pageinfo([[:Category/.NET]],2004-07-27 (火) 06:00:00,DOB...
ページ名:
▲
▼
[
トップ
] [
新規
|
子ページ作成
|
一覧
|
単語検索
|
最終更新
|
ヘルプ
]