.NET (Core and Framework)

Re: GDI+ drawing - invalidate big rectangle in one user control then invalidate another user control (problem with big rectangle)

27-Oct-09 22:36

Yes I see. I removed it from another thread copy/past and that causes that it lost formating.

freakyit27-Oct-09 21:35

Re: GDI+ drawing - invalidate big rectangle in one user control then invalidate another user control (problem with big rectangle)

27-Oct-09 21:35

cheers,

first of all i'm wondering why you create your own graphics object at each run of OnPaint, beware because you need to destroy your created object with graph.Dispose().. and the PaintEventArgs already gives you the Graphic object!! graph = e.Graphics!!

second the OnPaint Method will run if your Form or Control you are overriding the OnPaint will repaint.
To draw an image of the Grid do not use the OnPaint method on the Form! here you would paint something for the grid and not for subcontrols.. Create a Function GetGridImage() or some like.. that you will call if you want to get an net image of the grid..

third in the Scroll.OnPaint you can call Invalidate for the Owner Control to force the re-draw, please take a look at some usercontrols created from other users here to understand how to use the OnPaint methods.. in your Case the OnPaint will nothing paint on the grid so this is nesty! the function will be called every time you move your mouse or the owner control will be repainted.

hope i could help!

bless

rudozkv_new27-Oct-09 22:35

Re: GDI+ drawing - invalidate big rectangle in one user control then invalidate another user control (problem with big rectangle)

27-Oct-09 22:35

So I will answer also in points.
For first:
I tried to draw with double buffer method. I found on internet something like this. I added dispose for bmp and grap objects. Doesn't help.

For second:
I am not sure if I understand what did you write. I try to explain it one more time. I have grid control (with its own drawing function). Later grid control will also draw some other objects, like text boxes, etc... So the main form uses its own OnPaint (without overwriting or handling, ruler and grid have its own overwritten OnPaint method).

For third:
I replaced two Invalidate (for each control) with one invalidate(true) for owner form. Doesn't help. Can you give me some good example of how to use overwriting of usercontrol OnPaint ?

From my point of view it looks like ctrGrid control receive an event to repaint itself. Meanwhile (lets say in same time) ctrlRuler receive an event to repaint itself.
Re-painting of grid (due drawing huge rectangles) takes longer time. During this time will come another request to repaint both controls. And it happens that, the only grid control is repainted.
I don't know why grid control has bigger cadence of of re-painting, maybe it was added to owner form first. Confused | :confused:

I also hope you will help.

freakyit27-Oct-09 23:01

Re: GDI+ drawing - invalidate big rectangle in one user control then invalidate another user control (problem with big rectangle)

27-Oct-09 23:01

aaalllriiiight i did not see the dispose in your code sorry Smile | :)

now i can read it much better ^^

in case your paper has a size of 2000x1000 but your controlsize is only 200x100 you draw the created bitmap on the control, so every time the OnPaint is called you will draw the hole paper (2000x1000) instead of only a region of the hole paper (size of 200x100, at Location.Y=1200, Location.X=1500) this needs a lot of time and the result will not be displayed..

i would need to see the hole project to understand your code logic and to face out why paint events will be raised too much..

rudozkv_new27-Oct-09 23:18

Re: GDI+ drawing - invalidate big rectangle in one user control then invalidate another user control (problem with big rectangle)

27-Oct-09 23:18

In fact repainting is slow just when I call

graph.Clear(Color.DarkGray)

Grid size: 803x442
Parent size: 853x508

Where can I send an email ?

freakyit27-Oct-09 23:34

Re: GDI+ drawing - invalidate big rectangle in one user control then invalidate another user control (problem with big rectangle)

27-Oct-09 23:34

hmm i would apprechiate if you would upload to codeproject or some else and send me a link to download the file..

try to use FillRectanlge(graph rect, color.darkgray) instead of clear this might be a lot faster. your graphic object is empty and i think clear performs more than setting the color..

greetz

rudozkv_new28-Oct-09 3:16

Re: GDI+ drawing - invalidate big rectangle in one user control then invalidate another user control (problem with big rectangle)

28-Oct-09 3:16

I think to upload code here, I need to create an article.
So I created another simple example.
I have Form1.vb and UserControl1.vb.
Form1 size is 980x700.
On Form1 are two UserControl1 Picture1 (300x600) and Picture2(600x600).

Code for Form1:

Public Class Form1
    'Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
    '    Invalidate(True)
    'End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        HScrollBar1.Minimum = 1
        HScrollBar1.Maximum = Me.ClientSize.Width
        HScrollBar1.LargeChange = 100
    End Sub

    Private Sub MyScroll(ByVal sender As System.Object, ByVal e As System.Windows.Forms.ScrollEventArgs) Handles HScrollBar1.Scroll    
        'Static t_start As DateTime = Now
        'Dim t_span As TimeSpan
        'Debug.Print("Elapsed time: " && t_span.Milliseconds)
        't_start = Now
        Invalidate(True)
    End Sub
End Class

For usercontrol1

Public Class UserControl1

    Private Sub OnPaintPic1(ByVal sender As System.Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
        Dim rcPaper = Me.ClientRectangle
        Dim time_start As DateTime = Now
        Dim t_span As TimeSpan

        Dim bmp As New Bitmap(Me.ClientSize.Width, Me.ClientSize.Height)
        Dim graph As Graphics
        graph = Graphics.FromImage(bmp)
        'Graphics* graph = Graphics::FromImage(&bmp);
        ' Draw paper
        rcPaper.Location = rcPaper.Location '+ ptScrollOffset
        graph.Clear(Color.DarkGray)
        'Debug.Print("Grid size: " & Me.ClientSize.Width & "x" & Me.ClientSize.Height)
        'Debug.Print("Parent size: " & Parent.ClientSize.Width & "x" & Parent.ClientSize.Height)
        'graph.FillRectangle(Brushes.White, rcPaper)
        graph.DrawRectangle(Pens.Black, rcPaper)
        ' Draw the grid.
        ' If bShowGrid Then
        For x As Integer = 0 To bmp.Width Step 10
            For y As Integer = 0 To bmp.Height Step 10
                graph.DrawLine(Pens.Azure, x, y, x + 0.5F, y + 0.5F)
            Next y
        Next x
        'End If
        e.Graphics.DrawImage(bmp, 0, 0)
        t_span = Now - time_start
        bmp.Dispose()
        graph.Dispose()
        Debug.Print("OnPaint: " && Me.Name && " elapsed time: " && t_span.Milliseconds)
    End Sub
End Class

From this example I know this:
Elapsed time for scroll message is about 0 milliseconds.

Elapsed time for draw usercontrol is about 30 ms.

When I call invalidate from timer with 100ms period immediate window shows something like this:
OnPaint: Picture1 elapsed time: 15
OnPaint: Picture2 elapsed time: 15
OnPaint: Picture1 elapsed time: 15
OnPaint: Picture2 elapsed time: 15
OnPaint: Picture1 elapsed time: 15
OnPaint: Picture2 elapsed time: 15
OnPaint: Picture1 elapsed time: 15
OnPaint: Picture2 elapsed time: 15
OnPaint: Picture1 elapsed time: 15
OnPaint: Picture2 elapsed time: 15
OnPaint: Picture1 elapsed time: 15

When I disable timer and repaint from scroll event it looks like this:
OnPaint: Picture2 elapsed time: 31
OnPaint: Picture2 elapsed time: 15
OnPaint: Picture2 elapsed time: 31
OnPaint: Picture2 elapsed time: 15
OnPaint: Picture2 elapsed time: 31
OnPaint: Picture2 elapsed time: 15
OnPaint: Picture1 elapsed time: 15
OnPaint: Picture2 elapsed time: 46
OnPaint: Picture1 elapsed time: 31
OnPaint: Picture2 elapsed time: 15
OnPaint: Picture1 elapsed time: 15
OnPaint: Picture2 elapsed time: 31
OnPaint: Picture2 elapsed time: 15
OnPaint: Picture2 elapsed time: 15
OnPaint: Picture2 elapsed time: 15
OnPaint: Picture2 elapsed time: 31
OnPaint: Picture2 elapsed time: 15
OnPaint: Picture2 elapsed time: 31
OnPaint: Picture2 elapsed time: 15
OnPaint: Picture2 elapsed time: 31
OnPaint: Picture2 elapsed time: 15
OnPaint: Picture2 elapsed time: 31
OnPaint: Picture2 elapsed time: 15

From these results I think I need somehow to reduce OnScroll events or call another set of repaints after previous set of repaint has finished.

freakyit29-Oct-09 1:13

Re: GDI+ drawing - invalidate big rectangle in one user control then invalidate another user control (problem with big rectangle)

29-Oct-09 1:13

hi,

now try to add a Panel to the Form1 with Property AutoScroll to true.
than dock you Usercontrol1 into the Panel with DockStyle.Fill;

in your Usercontrol1 i don't understand why you are creating a bitmap to show the result on the usercontrol instead of painting directly to the usercontrol.

try this example do not print debugger output because this could be an indicator why its a slowly painting..

Private Sub OnPaintPic1(ByVal sender As System.Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
        Dim rcPaper = Me.ClientRectangle
        Dim time_start As DateTime = Now
        Dim t_span As TimeSpan

        e.Graphics.FillRectangle(Brushes.DarkGray, rcPaper)
        e.Graphics.DrawRectangle(Pens.Black, rcPaper)
        ' Draw the grid.
        ' If bShowGrid Then
        For x As Integer = 0 To rcPaper.Width Step 10
            For y As Integer = 0 To rcPaper.Height Step 10
                e.Graphics.DrawLine(Pens.Azure, x, y, x + 0.5F, y + 0.5F)
            Next y
        Next x
        'End If
        
        t_span = Now - time_start

    End Sub

rudozkv_new28-Oct-09 23:09

28-Oct-09 23:09

Just for an information how have I deal with this issue. I don't know if it is much clever, but it seems to work.

I added declaration of event into UserControl1:

Public Event DrawFinished(ByVal sControlName As String)

In Form1.vb code I added counter for items to draw nDrawItems, I added handling of DrawFinished event for both events and I modify Scroll event.
It looks something like this:

Public Class Form1
    Private nDrawItems As Integer = 0
...
    Private Sub Picture1_DrawFinished(ByVal sName As String) Handles Picture1.DrawFinished
        If nDrawItems = 0 Then Exit Sub
        nDrawItems = nDrawItems - 1
    End Sub

    Private Sub Picture2_DrawFinished(ByVal sName As String) Handles Picture2.DrawFinished
        If nDrawItems = 0 Then Exit Sub
        nDrawItems = nDrawItems - 1
    End Sub
...
Private Sub MyScroll(ByVal sender As Object, ByVal e As System.EventArgs) Handles HScrollBar1.ValueChanged
        If nDrawItems > 0 Then Exit Sub

        nDrawItems = 2
        Invalidate(True)
        While nDrawItems > 0
            'Threading.Thread.Sleep(5)
            Application.DoEvents()
        End While
    End Sub

Now I have in Immediate window text like this:
OnPaint: Picture2 elapsed time: 31
OnPaint: Picture1 elapsed time: 15
OnPaint: Picture2 elapsed time: 31
OnPaint: Picture1 elapsed time: 15
OnPaint: Picture2 elapsed time: 15
OnPaint: Picture1 elapsed time: 15
OnPaint: Picture2 elapsed time: 31
OnPaint: Picture1 elapsed time: 15
OnPaint: Picture2 elapsed time: 31
OnPaint: Picture1 elapsed time: 15

c#.net

Amit Spadez26-Oct-09 23:38

26-Oct-09 23:38

I have made a login form in c#.net in windows based application.
An error comes "instance failure" when i run and login info...

Shameel26-Oct-09 23:59

Shameel

26-Oct-09 23:59

Please post your code and the compiler/runtime error messages.

Amit Spadez27-Oct-09 0:03

27-Oct-09 0:03

When i run tje application, it executes successfully but after entering the login info..there generates an error "Instance Failure"

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Text;
using System.Windows.Forms;
using System.Configuration;
using System.Data.SqlClient;

namespace Ads_Sertrack_System
{
public partial class frmLogin : Form
{
public frmLogin()
{
InitializeComponent();
this.MaximizeBox = false;
this.MinimizeBox = false;
this.StartPosition = FormStartPosition.CenterScreen;
this.WindowState = FormWindowState.Normal;
this.AutoSizeMode = AutoSizeMode.GrowOnly;
this.AutoSize = true;
}
SqlConnection conAdSertrack = new SqlConnection();
string strQry;
SqlCommand cmdLogin;
SqlDataReader dtrLogin;
public static int intLogInId;
public static string strUserName;
public static string strUserRole;

private void frmLogin_Load(object sender, EventArgs e)
{
try
{
conAdSertrack.ConnectionString = ConfigurationManager.ConnectionStrings["con"].ToString();
}
catch (Exception expMsg)
{
MessageBox.Show(expMsg.Message.ToString(), "Alpha Net Technologies Pvt. Ltd: Message Service", MessageBoxButtons.OK, MessageBoxIcon.Error);
}
}

private void btnLogin_Click(object sender, EventArgs e)
{
try
{
errProvider.Clear();
if (txtUserName.Text == "")
{
errProvider.SetError(txtUserName, "Please Enter User Name");
MessageBox.Show("Please Enter User Name", "Alpha Net Technologies Pvt. Ltd: Message Service", MessageBoxButtons.OK, MessageBoxIcon.Exclamation);
txtUserName.Focus();
}
else if (txtPassword.Text == "")
{
errProvider.SetError(txtPassword, "Please Enter Password");
MessageBox.Show("Please Enter Password", "Alpha Net Technologies Pvt. Ltd: Message Service", MessageBoxButtons.OK, MessageBoxIcon.Exclamation);
txtPassword.Focus();
}
else
{
strQry = "select userid,username,userrole" +
" from tblusermaster where username = @paramUNm and pwd = @paramPwd";
cmdLogin = new SqlCommand(strQry, conAdSertrack);

cmdLogin.Parameters.Add("@paramUNm", SqlDbType.VarChar, 30).Value = txtUserName.Text;
cmdLogin.Parameters.Add("@paramPwd", SqlDbType.VarChar, 30).Value = txtPassword.Text;
if (conAdSertrack.State == ConnectionState.Closed)
{
conAdSertrack.Open();
}
dtrLogin = cmdLogin.ExecuteReader();
if (dtrLogin.HasRows)
{
dtrLogin.Read();

intLogInId = Convert.ToInt32(dtrLogin[0].ToString().Trim());
strUserName = Convert.ToString(dtrLogin[1].ToString().Trim());
strUserRole = Convert.ToString(dtrLogin[2].ToString().Trim());

frmMDI formMdi = new frmMDI();
formMdi.Show();
this.txtPassword.Text = "";
this.txtUserName.Text = "";

this.Hide();
}
else
{
MessageBox.Show("InValid User Name & Password", "Alpha Net Technologies Pvt. Ltd: Message Service", MessageBoxButtons.OK, MessageBoxIcon.Exclamation);
txtUserName.Text = "";
txtPassword.Text = "";
txtUserName.Focus();
}
dtrLogin.Close();
conAdSertrack.Close();
}
}
catch (Exception expMsg)
{
MessageBox.Show(expMsg.Message.ToString(), "Innor Solutions Pvt. Ltd", MessageBoxButtons.OK, MessageBoxIcon.Error);
}
}

private void btnCancel_Click(object sender, EventArgs e)
{
try
{
Application.Exit();
}
catch (Exception expMsg)
{
MessageBox.Show(expMsg.Message.ToString(), "Alpha Net Technologies Pvt. Ltd: Message Service", MessageBoxButtons.OK, MessageBoxIcon.Error);
}
}

private void frmLogin_FormClosing(object sender, FormClosingEventArgs e)
{
try
{
Application.Exit();
}
catch (Exception expMsg)
{
MessageBox.Show(expMsg.Message.ToString(), "Alpha Net Technologies Pvt. Ltd: Message Service", MessageBoxButtons.OK, MessageBoxIcon.Error);
}
}

private void txtUserName_TextChanged(object sender, EventArgs e)
{
try
{
errProvider.Clear();
}
catch (Exception expMsg)
{
MessageBox.Show(expMsg.Message.ToString(), "Alpha Net Technologies Pvt. Ltd: Message Service", MessageBoxButtons.OK, MessageBoxIcon.Error);
}
}

private void txtPassword_TextChanged(object sender, EventArgs e)
{
try
{
errProvider.Clear();
}
catch (Exception expMsg)
{
MessageBox.Show(expMsg.Message.ToString(), "Alpha Net Technologies Pvt. Ltd: Message Service", MessageBoxButtons.OK, MessageBoxIcon.Error);
}
}
}
}

Covean27-Oct-09 0:16

Covean

27-Oct-09 0:16

Can you please post your connectionstring and what database do you use (maybe SQL-Server Express 2005?).

Amit Spadez27-Oct-09 0:17

27-Oct-09 0:17

<?xml version="1.0" encoding="utf-8" ?>
<configuration>
<connectionStrings>
<add name="con" connectionString="Server=.\\sqlexpress;Integrated Security=true; Initial Catalog=AdSertrack_WinPrj;User Instance=false;"/>
</connectionStrings>
</configuration>

Covean27-Oct-09 0:20

Covean

27-Oct-09 0:20

Try server=.\SQLExpress. (only one \)

Amit Spadez27-Oct-09 0:24

27-Oct-09 0:24

thanks man ..i got it..

Tabbed ListBox in a Web Page

Covean27-Oct-09 0:34

Covean

27-Oct-09 0:34

No problem.

And if I may say so, its not the best way to execute sql-queries directly in your UI.

MarkyMark196126-Oct-09 8:21

26-Oct-09 8:21

I am trying to create a Tabbed List Box in a web page. I have done it in a windows application and it worked perfectly, but I can't find one little tiny piece of information and need some help.

I am trying to use SendMessage with the ListBox and all the examples I see say to use this:

SendMessage(List1.hWnd, LB_SETTABSTOPS, ListBoxTabs.Length, ref ListBoxTabs[0]);

However! There is no hWnd property for the ListBox control. In the windows app it's List1.Handle, however, there is no such property for that in the web control either! Can someone explain to me how to find the hWnd property of a web ListBox?

Thanks in advance for any help you can give.

Not Active26-Oct-09 8:31

Not Active

26-Oct-09 8:31

MarkyMark1961 wrote:
Can someone explain to me how to find the hWnd property of a web ListBox?

There isn't one. You need to spend some time reading up on how to create server controls for ASP.NET before proceeding.

only two letters away from being an asset

MarkyMark196126-Oct-09 8:41

26-Oct-09 8:41

Then why are there examples showing that there is?

Not Active26-Oct-09 8:52

Not Active

26-Oct-09 8:52

You are most likely confused. Show these sources.

only two letters away from being an asset

MarkyMark196126-Oct-09 9:00

26-Oct-09 9:00

try this one it shows exactly what I was saying among others...

http://www.vb-helper.com/howto_listbox_tabs.html

Not Active26-Oct-09 9:05

Not Active

26-Oct-09 9:05

Yes, you are very confused.

One, this is for a Windows application. As we have told you SendMessage is not available in ASP.NET.
Two, you are using VB

only two letters away from being an asset

MarkyMark196126-Oct-09 9:09

26-Oct-09 9:09

You're absolutely right! You ARE only two letters away from being an asset!

MarkyMark196126-Oct-09 9:04