タイトル : Dockについて 投稿日 : 2008/09/19(Fri) 12:00 投稿者 : タロ
いつもお世話になっています。 Dockについて質問です。 SplitContainer1.Panel1の中にPanelで囲んだテキストやラベルをDockプロパティ:TOPで画面作成しています。 ある位置から、Panelで囲んだテキスト等を自動配置するようにしているのですが、Dock =System.Windows.Forms.DockStyle.TopとするとSplitContainer1.Panel1の一番上に表示されてしまいます。 どのように対処すればよいのでしょうか。 Private field_txt() As System.Windows.Forms.TextBox Private field_pnl() As System.Windows.Forms.Panel Private field_dtp() As System.Windows.Forms.DateTimePicker For iRows = start_row To end_row Me.field_pnl(iRows - 1) = New System.Windows.Forms.Panel With Me.field_pnl(iRows - 1) 'プロパティ設定 .Name = iRows.ToString() .Location = New System.Drawing.Point(0, 279 + 85 * (iRows - 1)) '.Dock = System.Windows.Forms.DockStyle.Top .BorderStyle = BorderStyle.FixedSingle .Size = New System.Drawing.Size(503, 86) End With Me.field_txt(iRows - 1) = New System.Windows.Forms.TextBox With Me.field_txt(iRows - 1) 'プロパティ設定 .Name = "txt_KIROKU" + iRows.ToString() .Dock = System.Windows.Forms.DockStyle.Fill .Location = New System.Drawing.Point(118, 0) .Multiline = True .Size = New Point(385, 86) End With Me.field_dtp(iRows - 1) = New System.Windows.Forms.DateTimePicker With Me.field_dtp(iRows - 1) 'プロパティ設定 .Name = "dtp_KIROKU" + iRows.ToString() .Dock = System.Windows.Forms.DockStyle.Left .Location = New System.Drawing.Point(0, 0) .Size = New System.Drawing.Size(118, 19) .Format = System.Windows.Forms.DateTimePickerFormat.[Short] End With SplitContainer1.Panel1.Controls.Add(Me.field_pnl(iRows - 1)) field_pnl(iRows - 1).Dock = System.Windows.Forms.DockStyle.Top field_pnl(iRows - 1).Controls.Add(field_txt(iRows - 1)) field_pnl(iRows - 1).Controls.Add(field_dtp(iRows - 1)) Next 環境:VB2008 よろしくお願い致します。 |