C# と VB.NET の質問掲示板

ASP.NET、C++/CLI、Java 何でもどうぞ

ログ内検索

キーワードを複数指定する場合は半角スペースで区切ってください。
検索条件は、(AND)=[A かつ B] (OR)=[A または B] となっています。
[返信]をクリックすると返信ページへ移動します。

キーワード	/	検索条件	/
検索範囲	/	強調表示	/ ON (自動リンクOFF)
結果表示件数	/	記事No検索	/ ON
大文字と小文字を区別する

全過去ログを検索

ヒット / 304件

過去ログ4からさらに検索→

<< 0 | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 | 11 | 12 | 13 | 14 | 15 >>

■3435

　Re[3]: .NET2.0でのMicrosoft.mshtml.dllの動作について

□投稿者/ あちゃ -(2006/05/06(Sat) 11:54:13)

分類:[C#]　

すいません、以下のように試してみたのですが、うまくいきませんでした。
（Microsoft.mshtml.dllは8M近くあるので、VS2003の自動生成ラッパーだと思います）

１．開発環境が入っていないPCで、Microsoft.mshtml.dll を削除してアプリ実行
→ Microsoft.mshtml.dllが見つからない旨の例外発生。
→ 削除前は「System.NullReferenceException: オブジェクト参照がオブジェクトインスタンスに設定されていません。」という例外が発生していました。

２．アプリプロジェクトの参照設定から、Microsoft.mshtml.dll を削除
→ ビルドエラー「名前空間 'mshtml'が見つかりません・・・」
→ Microsoft.mshtml.dll に代わる参照設定が必要なのでしょうか？

以下ソースコードです。

using mshtml;

private void CreateHtmlDocument()
{
HTMLDocumentClass parentDocument = new HTMLDocumentClass();
IHTMLDocument2 doc2 = parentDocument;
IHTMLDocument4 doc4 = parentDocument;
doc2.write("<html></html>");
doc2.close();

HTMLDocumentClass htmlDocument =
doc4.createDocumentFromUrl("XXX.html", null) as HTMLDocumentClass;

int i = 0;
while (htmlDocument.readyState != "complete")
{
if (++i > 50)
{
// タイムアウト処理
}
System.Threading.Thread.Sleep(70);
System.Windows.Forms.Application.DoEvents();
}
}

上記コードで、.NET Framework 1.1のときはアプリと同じフォルダに Microsoft.mshtml.dll をおくことにより動作していました。
私の勉強不足かと思いますが、今一度アドバイスお願いいたします。

長くなってしまいましたが、よろしくお願いいたします。

記事No.3418 のレス /0過去ログ3より / 関連記事表示
削除チェック/

■3395

　String.Formatで電話番号など

□投稿者/ たろ -(2006/05/01(Mon) 13:58:26)

分類:[C#]　

分類:[C#]　

string str = "0344447777";

str = string.Format("{0:00-0000-0000}", str);

MessageBox.Show(str);

としてもそのまま"0344447777"が返ってきてしまいます。
"03-4444-7777"にFormatするにはどしたら良いのでしょうか？
よろしくお願いします。

親記事 /0過去ログ3より / 関連記事表示
削除チェック/

■3399

　Re[1]: DataGridView のセル取得

□投稿者/ なおこ(・∀・) -(2006/05/01(Mon) 18:31:36)

分類:[VB.NET]　

選択されたセルのうち、一番最初を扱うんであればこんな感じでしょうか。

Public Class Form1

　　Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
　　　　Me.DataGridView1.Columns.Add("Field1", "Field1")
　　　　Me.DataGridView1.Columns.Add("Field2", "Field2")
　　　　Me.DataGridView1.Columns.Add("Field3", "Field3")
　　　　Me.DataGridView1.Rows.Add("nakanonaka", "jeannne", "jitta")
　　　　Me.DataGridView1.Rows.Add("tocchann", "mnow", "o??")
　　End Sub

　　Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
　　　　If Me.DataGridView1.SelectedCells.Count < 1 Then Return
　　　　Dim selectedValue As Object = Me.DataGridView1.SelectedCells(0).Value
　　　　If IsDBNull(selectedValue) Then Return
　　　　Dim strSelectedValue As String = selectedValue.ToString()
　　　　MessageBox.Show(strSelectedValue + "が選択されてますね")
　　End Sub
End Class

記事No.3393 のレス /0過去ログ3より / 関連記事表示
削除チェック/

■3393

　DataGridView のセル取得

□投稿者/ 子羊 -(2006/05/01(Mon) 13:17:16)

分類:[VB.NET]　

分類:[VB.NET]　

DataGridViewのセルに貼り付ける時、以下のようにやっています。
DataGridView1.Rows.Add(a,b,c)

そして、DataGridView のセルの内容をString型の変数に入れたいのですが、
どのようにすればよいでしょうか？
ヒントだけでも貰えると助かります。

親記事 /0過去ログ3より / 関連記事表示
削除チェック/

■3372

　Ｃ＃とＣＯＭ

□投稿者/ ヨン -(2006/04/30(Sun) 15:47:10)

分類:[C#]　

分類:[C#]　

ＶＳ２００３のＣ＃とＣ＋＋を使って下記のコードを実行すると
一般保護違反が出てしまって正常に実行することができません。
どのように解決したらいいのでしょうか？
（Ｃ＃の方はＣＯＭで、Ｃ＋＋はクライアントです。）

[C#]
public int Test( object name)
{
byte [] byArray = (byte[])name; // ここでエラー
Console.WriteLine("Test, {0}!", byArray);
return 0;
}

[C++]
int main(int argc, char* argv[])
{
char sz[300];
ZeroMemory( sz, 300 );
sz[0] = 0x41;
sz[1] = 0x42;
sz[2] = 0x43;
sz[3] = 0x00;
cpi->Test(sz); // cpiはインターフェイス
}
以上よろしくお願いします。

親記事 /0過去ログ3より / 関連記事表示
削除チェック/

■3376

　Re[2]: FTP転送での日本語について

□投稿者/ Okumin -(2006/04/30(Sun) 20:19:25)

分類:[C#]　

テストで Infoseek（楽天）で借りた無料サーバ（isweb）を使っています。
その詳しい内容（設定）についてはすぐに解らないのですが…。

"Shift-JIS" の所を色々と変えてやってみたのですが、いずれも２バイト文字だった所が表示されないか、
０１２３→OPQR、あいうえ→????、アイウエ→ACEG といった感じで（Encode方式により多少異なる）、
転送後に１バイト文字へ化けています。
試したエンコーディングは次の通りです。

　シフトJIS　　　　　(コード・ページ値 0, 932)
　Unicode　　　　　　(同1200)
　Unicode Big-Endian (1201)
　EUC-JP　　　　　　 (20932, 51932)
　JIS　　　　　　　　(50220～50222)
　utf-7　　　　　　　(65000)
　utf-8　　　　　　　(65001)

エンコードしてbyte配列に入れて送るという処理はあまりきれいではないような気がするのですが、
エンコードせずにそのまま送る（？）方法などは何かあるのでしょうか。
（例えばjpeg画像などを送る場合は上のやり方ではちょっと変だと思います…）
不勉強で申し訳ございませんが、何かヒントのようなものを頂ければと思います。
よろしくお願いします。

記事No.3369 のレス /0過去ログ3より / 関連記事表示
削除チェック/

■3369

　FTP転送での日本語について

□投稿者/ Okumin -(2006/04/30(Sun) 14:01:18)

分類:[C#]　

分類:[C#]　

C#の超初心者です。
見よう見まねでファイルをFTPサーバーへアップロードするものを作りました。
以下のようなコードで、PCの C:＼01.txt をサーバーに転送することはできたのですが、
01.txtの中に日本語が混ざると、そこだけ文字化けしたり文字が削除されたりします。
ASCII文字だけの場合は問題なく転送されます。
（暗号化については考慮していません）

using System.Net
…
Try
{
　　FtpWebRequest request = (FtpWebRequest)WebRequest.Create _
　　　　"ftp://ftp.….co.jp/01.txt");
　　request.Method = WebRequestMethods.Ftp.UploadFile;
　　request.UseBinary = false;
　　request.Credentials = new NetworkCredential("ID…", "PW…");

　　//カレントディレクトリの設定
　　System.IO.Directory.SetCurrentDirectory(@"C:＼");
　　StreamReader sourceStream = new StreamReader("01.txt");

　　//byte配列に入れる
　　byte[] fileContents = System.Text.Encoding.GetEncoding _
　　　　　　　　　　　　　　("Shift_JIS").GetBytes(sourceStream.ReadToEnd());
　　sourceStream.Close();

　　//転送
　　Stream requestStream = request.GetRequestStream();
　　requestStream.Write(fileContents, 0, fileContents.Length);
　　requestStream.Close();

　　//状態取得
　　FtpWebResponse response = (FtpWebResponse)request.GetResponse();
　　MessageBox.Show("Upload Completed");
　　response.Close();
} …

byte配列に入れている所に問題があると思うのですが、色々調べても有効な
解決策が見つかりませんでした。
文字化けせずに送る方法をご存知でしたら教えて頂けないでしょうか。
初歩的なことで申し訳ございませんが、よろしくお願い致します。

親記事 /0過去ログ3より / 関連記事表示
削除チェック/

■3342

　構造体ポインタのキャスト

□投稿者/ ぽこぶび＠ -(2006/04/28(Fri) 18:51:21)

分類:[C#]　

分類:[C#]　

ＶＳ２００３のＣ＃で下記のコードをコンパイルしようとすると
fixed ステートメントの初期化子内の fixed でないステートメントのアドレスのみを取得できます。
というエラーになってコンパイルを完了することができません。
どのようにコードを変更したらよいのでしょうか？

// ------------------------------------
public struct TESTSTRUCT
{
public byte str1;
public byte str2;
}

private void Form1_MouseDown(object sender, System.Windows.Forms.MouseEventArgs e)
{
unsafe
{
byte [] byBuf = new byte[10];
byte byteBuf;

TESTSTRUCT *pTestStruct = (TESTSTRUCT *)byteBuf;
TESTSTRUCT *pTestStruct2 = (TESTSTRUCT *)&byBuf[0]; // ここでエラー

}
}
// ------------------------------------

以上どうかよろしくお願いいたします。

親記事 /0過去ログ3より / 関連記事表示
削除チェック/

■3330

　Re[13]: 日付の間隔の取得

□投稿者/ Jitta -(2006/04/27(Thu) 22:38:51)

分類:[VB.NET]　

SQL で何とかしようとすると、こうなる。。。
select days, hours, minutes, floor(stops * 60) as seconds from
(select days, hours, floor(stops * 60) as minutes, (stops - floor(stops * 60)/60)*60 as stops from
(select days, floor(stops * 24) as hours, (stops - floor(stops * 24)/24)*24 as stops from
(select floor(stops) as days, stops - floor(stops) as stops from
(select sysdate - "投入日時" as stops from AXIS."DK_TBL_ロット仕掛"))))

大きい方から順に、元の数値のと差を保存しながら、求める。

　あと、オブジェクト名に ANSI コード以外のコードを使う場合は二重引用符で“囲まなければならない”ので、注意。なくても動くが、あくまで“たまたま動いている”ことに留意。

未確認：
select systdate as nowTime, "投入時間" from ...

として、DataColumn に型を TimeSpan、 Expression を "nowTime - 投入時間" とした列を追加してもいけそうな？

記事No.3233 のレス /0過去ログ3より / 関連記事表示
削除チェック/

■3290

　Re[12]: 日付の間隔の取得

□投稿者/ JT ＠ -(2006/04/27(Thu) 13:27:31)

分類:[VB.NET]　

> (sysdate - 投入日時) * 24 * 60 * 60
> とすれば、秒単位で結果が返るはずです。ここから時、分、秒の３つの部分を求め、それら３つを文字列連結させて時間差の文字列を得ます。
> 文字列ですので、.NET側ではstring型として特に何もせずに表示されるはずです。

長時間にわたりお付き合いしていただき有り難うございます。

trapemiya様のアドバイスどおり処理をしたら、秒数で表示がでました。
sqldata = "SELECT ロットNO,マークロットNO,製品名,装置名,工程名,作業名,ロットタイプ,作業状態,ホールド状態,仕掛数量,投入日時,出荷予定日,備考,((sysdate - 投入日時) * 24 * 60 * 60) AS 停滞時間 " & _
"FROM AXIS.DK_TBL_ロット仕掛 " & _
やはり小数点は消えない。。。
３つの文字列を連結？難しいですねぇ。調べてみます。

記事No.3233 のレス /0過去ログ3より / 関連記事表示
削除チェック/

■3259

　Re[9]: 日付の間隔の取得

□投稿者/ JT ＠ -(2006/04/26(Wed) 17:38:27)

分類:[VB.NET]　

ご返信が遅れまして申し訳ございません。
ご回答有り難うございます。

to ronals様
qldata = "SELECT ロットNO,マークロットNO,製品名,装置名,工程名,作業名,ロットタイプ,作業状態,ホールド状態,仕掛数量,投入日時,出荷予定日,備考,Now.Subtract([投入日時]).ToString AS 停滞時間 " & _
"FROM AXIS.DK_TBL_ロット仕掛 " & _
で試してみたのですが、式がありませんというエラーが返されました。

to trapemiya様
試してみたのですが、エラーが出てしまいました。

Oracleでは僕が求めようとしていることはできないのでしょうか？
インターネット調べてるんですが、関数がないような。。。

記事No.3233 のレス /0過去ログ3より / 関連記事表示
削除チェック/

■3242

　Re[7]: 日付の間隔の取得

□投稿者/ JT ＠ -(2006/04/26(Wed) 13:10:18)

分類:[VB.NET]　

みなさま、ご返答有り難うございます。

to trapemiya様

sqldata = "SELECT ロットNO,マークロットNO,製品名,装置名,工程名,作業名,ロットタイプ,作業状態,ホールド状態,仕掛数量,投入日時,出荷予定日,備考,getdate() - 投入日時 AS 停滞時間 " & _
"FROM AXIS.DK_TBL_ロット仕掛 "
で試してみたのですが、列名は無効というエラーが出てしまいます。

to ronals様
書き方がわかりません…。
初心者のもので。。勉強します。

記事No.3233 のレス /0過去ログ3より / 関連記事表示
削除チェック/

■3239

　Re[4]: 日付の間隔の取得

□投稿者/ trapemiya ＠ -(2006/04/26(Wed) 11:52:36)

分類:[VB.NET]　

sqldata = "SELECT ロットNO,マークロットNO,製品名,装置名,工程名,作業名,ロットタイプ,作業状態,ホールド状態,仕掛数量,投入日時,出荷予定日,備考,getdate('" & Now & "','yyyy/mm/dd hh24:mi:ss') - 投入日時 AS 停滞時間 " & _

ではなくて、

sqldata = "SELECT ロットNO,マークロットNO,製品名,装置名,工程名,作業名,ロットタイプ,作業状態,ホールド状態,仕掛数量,投入日時,出荷予定日,備考,getdate() - 投入日時 AS 停滞時間 " & _
"FROM AXIS.DK_TBL_ロット仕掛 "

のような感じです。

記事No.3233 のレス /0過去ログ3より / 関連記事表示
削除チェック/

■3235

　Re[2]: 日付の間隔の取得

□投稿者/ JT ＠ -(2006/04/26(Wed) 10:34:28)

分類:[VB.NET]　

ご回答有り難うございます。
下記の処理で挑戦してみました。しかし、列名が無効というエラーではじかれてしまいます。書き方がおかしいのでしょうか。

sqldata = "SELECT ロットNO,マークロットNO,製品名,装置名,工程名,作業名,ロットタイプ,作業状態,ホールド状態,仕掛数量,投入日時,出荷予定日,備考,getdate('" & Now & "','yyyy/mm/dd hh24:mi:ss') - 投入日時 AS 停滞時間 " & _
"FROM AXIS.DK_TBL_ロット仕掛 " & _
"WHERE ロットNO Like '" & Trim(Me.TextLotNo1.Text) & "%' " & _
"AND マークロットNO Like '" & Me.TextMarkLotNo1.Text & "%' " & _
"AND 工程名 Like '" & Me.TextLocName1.Text & "%' " & _
"AND 製品名 Like '" & Me.TextManName1.Text & "%' " & _
"AND 製品名 = 'CXD2971GB'"

記事No.3233 のレス /0過去ログ3より / 関連記事表示
削除チェック/

■3233

　日付の間隔の取得

□投稿者/ JT ＠ -(2006/04/26(Wed) 09:37:48)

分類:[VB.NET]　

分類:[VB.NET]　

おはようございます。

早速ですが、現在わからないことがありまして悩んでいます。
データを登録した日付時間から現在の時刻を差し引いたデータを表示させたいのですがうまくいきません。計算としては簡単なのですがDataGridに表示されるときに
小数点で表示されてしまいます。
SQL文の処理がおかしいのでしょうか。
どなたか良い案があれば頂けないでしょうか。
要求事項なのでなんとか応えたいと思っています。

Private Sub Form_03_07_SLTロット仕掛実績参照_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim tblStyle1 As DataGridTableStyle
Dim tblStyle2 As DataGridTableStyle
Dim clmStyle(24) As DataGridTextBoxColumn
Dim intRow As Integer

'フォーカス設定
Me.ComboSerchClass.Focus()

'DataGridデザイン変更
Me.DataGrid1.RowHeaderWidth = 10
Me.DataGrid1.ReadOnly = True
Me.DataGrid2.RowHeaderWidth = 10
Me.DataGrid2.ReadOnly = True

'DataGridスタイル設定
tblStyle1 = New DataGridTableStyle
tblStyle1.MappingName = "get"
tblStyle2 = New DataGridTableStyle
tblStyle2.MappingName = "get2"

Me.DataGrid1.TableStyles.Add(tblStyle1)
Me.DataGrid2.TableStyles.Add(tblStyle2)
For intRow = 0 To 24
clmStyle(intRow) = New DataGridTextBoxColumn
Next
clmStyle(0).HeaderText = "作業開始日時"
clmStyle(0).MappingName = "作業開始日時"
clmStyle(0).Width = "115"
clmStyle(0).Format = "yyyy/MM/dd HH:mm:ss"
clmStyle(1).HeaderText = "作業終了日時"
clmStyle(1).MappingName = "作業終了日時"
clmStyle(1).Width = "115"
clmStyle(1).Format = "yyyy/MM/dd HH:mm:ss"
'clmStyle(0).Format = "yyyy/MM/dd HH:mm:ss"
'clmStyle(1).Format = "yyyy/MM/dd HH:mm:ss"
clmStyle(2).HeaderText = "製品名"
clmStyle(2).MappingName = "製品名"
clmStyle(2).Width = "100"
clmStyle(3).HeaderText = "ロットNO"
clmStyle(3).MappingName = "ロットNO"
clmStyle(3).Width = "100"
clmStyle(4).HeaderText = "マークロットNO"
clmStyle(4).MappingName = "マークロットNO"
clmStyle(4).Width = "100"
clmStyle(5).HeaderText = "工程名"
clmStyle(5).MappingName = "工程名"
clmStyle(5).Width = "40"
clmStyle(6).HeaderText = "作業名"
clmStyle(6).MappingName = "作業名"
clmStyle(6).Width = "40"
clmStyle(7).HeaderText = "装置名"
clmStyle(7).MappingName = "装置名"
clmStyle(7).Width = "60"
clmStyle(8).HeaderText = "良品数量"
clmStyle(8).MappingName = "良品数量"
clmStyle(8).Width = "40"
clmStyle(9).HeaderText = "不良数量"
clmStyle(9).MappingName = "不良数量"
clmStyle(9).Width = "40"
clmStyle(10).HeaderText = "更新者ID"
clmStyle(10).MappingName = "更新者ID"
clmStyle(10).Width = "100"
clmStyle(11).HeaderText = "ロットNO"
clmStyle(11).MappingName = "ロットNO"
clmStyle(11).Width = "100"
clmStyle(12).HeaderText = "マークロットNO"
clmStyle(12).MappingName = "マークロットNO"
clmStyle(12).Width = "50"
clmStyle(13).HeaderText = "製品名"
clmStyle(13).MappingName = "製品名"
clmStyle(13).Width = "100"
clmStyle(14).HeaderText = "装置名"
clmStyle(14).MappingName = "装置名"
clmStyle(14).Width = "50"
clmStyle(15).HeaderText = "工程名"
clmStyle(15).MappingName = "工程名"
clmStyle(15).Width = "50"
clmStyle(16).HeaderText = "作業名"
clmStyle(16).MappingName = "作業名"
clmStyle(16).Width = "50"
clmStyle(17).HeaderText = "ロットタイプ"
clmStyle(17).MappingName = "ロットタイプ"
clmStyle(17).Width = "70"
clmStyle(18).HeaderText = "作業状態"
clmStyle(18).MappingName = "作業状態"
clmStyle(18).Width = "60"
clmStyle(19).HeaderText = "ホールド状態"
clmStyle(19).MappingName = "ホールド状態"
clmStyle(19).Width = "50"
clmStyle(20).HeaderText = "仕掛数量"
clmStyle(20).MappingName = "仕掛数量"
clmStyle(20).Width = "50"
clmStyle(21).HeaderText = "投入日時"
clmStyle(21).MappingName = "投入日時"
clmStyle(21).Width = "115"
clmStyle(21).Format = "yyyy/MM/dd HH:mm:ss"
clmStyle(22).HeaderText = "出荷予定日"
clmStyle(22).MappingName = "出荷予定日"
clmStyle(22).Width = "80"
clmStyle(23).HeaderText = "備考"
clmStyle(23).MappingName = "備考"
clmStyle(23).Width = "70"
clmStyle(24).HeaderText = "停滞時間"
clmStyle(24).MappingName = "停滞時間"
clmStyle(24).Width = "100"

For intRow = 0 To 10
tblStyle2.GridColumnStyles.Add(clmStyle(intRow))
Next
For intRow = 11 To 24
tblStyle1.GridColumnStyles.Add(clmStyle(intRow))
Next
End Sub
'検索対象選択
Private Sub ComboSerchClass_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles ComboSerchClass.SelectedIndexChanged

Select Case Me.ComboSerchClass.Text
Case "仕掛情報"
Me.SerchGroup1.Visible = True
Case "実績情報"
Me.SerchGroup2.Visible = True
End Select
Me.Label03.Visible = True
Me.CmdButtonOK.Visible = True
Me.CmdButtonCancel.Visible = True
Me.ComboSerchClass.Enabled = False

End Sub
'検索処理
Private Sub CmdButtonOK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdButtonOK.Click

On Error GoTo Err_Label

Dim dt1 As Date = Now()

Select Case Me.ComboSerchClass.Text
Case "仕掛情報"
sqldata = "SELECT ロットNO,マークロットNO,製品名,装置名,工程名,作業名,ロットタイプ,作業状態,ホールド状態,仕掛数量,投入日時,出荷予定日,備考,to_date('" & Now & "','yyyy/mm/dd hh24:mi:ss') - 投入日時 AS 停滞時間 " & _
"FROM AXIS.DK_TBL_ロット仕掛 " & _
"WHERE ロットNO Like '" & Trim(Me.TextLotNo1.Text) & "%' " & _
"AND マークロットNO Like '" & Me.TextMarkLotNo1.Text & "%' " & _
"AND 工程名 Like '" & Me.TextLocName1.Text & "%' " & _
"AND 製品名 Like '" & Me.TextManName1.Text & "%' " & _
"AND 製品名 = 'CXD2971GB'"

どなたかアドバイス宜しくお願い致します。

親記事 /0過去ログ3より / 関連記事表示
削除チェック/

■3332

　Re[7]: 保存について

□投稿者/ Blue -(2006/04/27(Thu) 23:11:07)

分類:[C#]　

> あとは色だけです。
って十分ヒント出したつもりなんですが。。。

> pictureBox1のBackColorでpictureBox1.Imageを塗りつぶしたりしないと
private void Form1_Load(object sender, EventArgs e)
{
    this.pictureBox1.Image = new Bitmap(this.pictureBox1.Width, this.pictureBox1.Height);
    this.grfx = Graphics.FromImage(this.pictureBox1.Image);

    SolidBrush b = new SolidBrush(this.pictureBox1.BackColor);
    this.grfx.FillRectangle(b, 0, 0, this.pictureBox1.Width, this.pictureBox1.Height);
    b.Dispose();
}

記事No.3227 のレス /0過去ログ3より / 関連記事表示
削除チェック/

■3312

　Re[6]: 保存について

□投稿者/ cova -(2006/04/27(Thu) 17:05:05)

分類:[C#]　

■No3308に返信(Blueさんの記事)
>>pictureBox1.Image.Size
> は
> Form1_Loadで
>
> pictureBox1.Image = new Bitmap(Screen.PrimaryScreen.WorkingArea.Width,
> Screen.PrimaryScreen.WorkingArea.Height) ;
>
> と、スクリーンの大きさで作成しています。(1024×738なんでしょうか？)
> pictureBox1の大きさでつくりたい場合はここを変えないとダメです。

　とりあえず、大きさ変更しての保存はうまくいきました。あとは色だけです。

> 色も、pictureBox1のBackColorでpictureBox1.Imageを塗りつぶしたりしないとだめなんじゃないかなぁ。(微妙)

記事No.3227 のレス /0過去ログ3より / 関連記事表示
削除チェック/

■3308

　Re[5]: 保存について

□投稿者/ Blue -(2006/04/27(Thu) 16:44:35)

分類:[C#]　

> pictureBox1.Image.Size
は
Form1_Loadで

pictureBox1.Image = new Bitmap(Screen.PrimaryScreen.WorkingArea.Width,
Screen.PrimaryScreen.WorkingArea.Height) ;

と、スクリーンの大きさで作成しています。(1024×738なんでしょうか？)
pictureBox1の大きさでつくりたい場合はここを変えないとダメです。

色も、pictureBox1のBackColorでpictureBox1.Imageを塗りつぶしたりしないとだめなんじゃないかなぁ。(微妙)

記事No.3227 のレス /0過去ログ3より / 関連記事表示
削除チェック/

■3305

　Re[4]: 保存について

□投稿者/ cova -(2006/04/27(Thu) 16:22:03)

分類:[C#]　

■No3294に返信(中博俊さんの記事)
> 全部はいらないよー(>-<)
>
> pictureBox1.Image.Size
> を調べてください。本当に500x400ですか？
>
> 背景を黄色で塗っている部分はどこですか？
> 塗っていますか？
>
this.pictureBox1.Size = new System.Drawing.Size(448, 328);
や
this.pictureBox1.BackColor = System.Drawing.Color.Black;

は、いろいろ試していたので、今回の質問とは多少違ってはいます。始めの質問の状態にしてもうまくいきません

記事No.3227 のレス /0過去ログ3より / 関連記事表示
削除チェック/

■3198

　テキストファイルからの読み込み

□投稿者/ KEN ＠ -(2006/04/21(Fri) 16:19:08)

分類:[VB.NET]　

分類:[VB.NET]　

テキストファイルからの読み込みなんですが・・・
エラーをキャッチしちゃうんです・・
どなたかご返答ください・・
dim　sttaget as streamreader

While (stTarget.Peek() >= 0)　　←この部分でエラー落ちしちゃうんです・・・
Console.WriteLine(Path.GetFileNameWithoutExtension(Path.Combine(Path.Combine(Exe_CurrentDir, "data"), CSV_FILES_NAME(i))))
stTarget = New StreamReader(CType(datafiles(i), String))
stTarget.ReadLine()
count = count + 1
If count >= 2 Then
Exit While
End If
End While

親記事 /0過去ログ3より / 関連記事表示
削除チェック/

＜前の20件 | 次の20件＞

<< 0 | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 | 11 | 12 | 13 | 14 | 15 >>

ヒット件数が多いので過去ログ1～3 までの検索結果 / 過去ログ4からさらに検索→

パスワード/

- Child Tree -