|
Fair enough. Like I said, it's not going to work. I can CTRL-ALT-ESC on any PC and get the task manager, and from there run explorer, if it's been stopped ( explorer is where the menu comes from ). So, you can't do what you want.
Christian Graus
Driven to the arms of OSX by Vista.
|
|
|
|
|
Oh I see. Thanks anyway....
-----------------------------
I am a beginner
|
|
|
|
|
Christian Graus wrote: Fair enough. Like I said, it's not going to work. I can CTRL-ALT-ESC on any PC and get the task manager
For straight out of the box implementation, yes you are right. But the is a way of suppressing Ctrl+Alt+Del key sequence as well.
Microsoft has removed the Ctrl+Alt+Del key sequence out of the keyboard API and moved it to GINA. to listen to those keys, one needs to write a replacement GINA. Writing GINA is not fun and one small mistake can screw up windows logon and locks out windows. It is not fun, and I don't recommend people do it, unless there is very compelling reason to write one. What is more is, the *user* GINA is loaded by win logon through registry key entry, which can be replaced by other GINA easily. Only one GINA can run at a single time.
GINA[^]
Yusuf
Oh didn't you notice, analogous to square roots, they recently introduced rectangular, circular, and diamond roots to determine the size of the corresponding shapes when given the area. Luc Pattyn[^]
|
|
|
|
|
You see there are crap load of people who scream at the top of their tounge to get a solution for problems they have no clue for. You seem to be eager to learn and we are here to help. Next time try to articulate your question and show what you have done and what you need help. That may yeild a better response.
As far as your question it is doable. you would need to learn a bit more about windows programming. with all respect, vb is just piece of crab. if you are looking for such serious application look to C++ as your friend.
Here are couple things to look at. I am not vb programmer, and this is converted from C++. You may have to tweak it to make it work.
Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long<br />
Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long<br />
<br />
<br />
Dim return As Long<br />
<br />
'get the Window<br />
return = FindWindow("Shell_traywnd", "") <br />
<br />
'hide the taskbar<br />
ShowWindow(return , SW_HIDE);<br />
<br />
'show th taskbar<br />
ShowWindow(return , SW_RESTORE)<br />
Yusuf
Oh didn't you notice, analogous to square roots, they recently introduced rectangular, circular, and diamond roots to determine the size of the corresponding shapes when given the area. Luc Pattyn[^]
|
|
|
|
|
thnaks I will give a try with it
-----------------------------
I am a beginner
|
|
|
|
|
himangshuS wrote: To make it more clear, I am doing a small application for my friend's office. Thats whom I called as client. I never thought I need to discuss this.
Breaks my heart. Christian was right with your limited information. Even I felt the same way in C++ forum, but your reply is quite convincing. You can expect me to answer you again somewhere. But as I pointed you last time, Be crisp with your question (May be this one is okay). Like when you are making a chat application, You would have questions on Sockets/MFC/Doc/view all at the same time. You shouldn't ask them all in one go. First you should try a simple socket, then a simple Dialog & others and ask one by one. When you integrate them you'll be again left with few questions. You are welcome to ask them again. But don't flush questions in one go. Anyway good luck for your new 'requirement' 
Removing the task bar[^] Not a link to code, but another way of doing it. Requires Object-Dock appln.
He never answers anyone who replies to him. I've taken to calling him a retard, which is not fair to retards everywhere.-Christian Graus
|
|
|
|
|
thanks for your reply and suggestion. I will do that.
-----------------------------
I am a beginner
|
|
|
|
|
Stop. What you're doing is not going to work. Pick the Windows XP or Windows Vista Resource Kit. In there, there is a guide to configuring Windows for Kiosk mode, which is what you are ultimately after. Just killing off Explorer to get rid of the Start button is not going to stop the user from doing anything.
|
|
|
|
|
dear fellow programmers,
i have been trying to achieve this but it's so hard.
i am trying to say make an image and when i mouse down the image and drag it,
i want to draw a line from the initial of the image to where my mouse is.
and when i release it, the line will disappear.
is there anyway I can achieve this?
thanks all...
|
|
|
|
|
You need to draw the line in the Paint event of the form.
जय हिंद
|
|
|
|
|
There's paint program samples that will show you how to do this. You need to store the mouse position in member variables, and then do what danish said, draw them in your paint event.
Except, as you want the line to disappear when the mouse comes up, this is actually a place where the CreateGraphics method of the form is valid, it's used to create a graphics object on which to draw temporary things.
Christian Graus
Driven to the arms of OSX by Vista.
|
|
|
|
|
I am trying to update and delete ,but get this error code now, it did work before.
error code == "There is no row at position -1"
My update code
Private Sub btnUpdate_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnUpdate.Click
Dim cb As New OleDb.OleDbCommandBuilder(da)
ds.Tables("Blokkies").Rows(inc).Item(1) = TxtLuidraad.Text
ds.Tables("Blokkies").Rows(inc).Item(2) = txtA1.Text
ds.Tables("Blokkies").Rows(inc).Item(3) = txtA2.Text
ds.Tables("Blokkies").Rows(inc).Item(4) = txtA3.Text
ds.Tables("Blokkies").Rows(inc).Item(5) = txtA4.Text
ds.Tables("Blokkies").Rows(inc).Item(6) = txtA5.Text
ds.Tables("Blokkies").Rows(inc).Item(7) = txtA6.Text
ds.Tables("Blokkies").Rows(inc).Item(8) = txtA7.Text
ds.Tables("Blokkies").Rows(inc).Item(9) = txtA8.Text
ds.Tables("Blokkies").Rows(inc).Item(10) = txtA9.Text
ds.Tables("Blokkies").Rows(inc).Item(11) = txtA10.Text
ds.Tables("Blokkies").Rows(inc).Item(12) = txtA10.Text
ds.Tables("Blokkies").Rows(inc).Item(13) = txtA10.Text
da.Update(ds, "Blokkies")
MsgBox("Register verander")
End Sub
I did try to use this, but still get same error
If Not IsDBNull(ds.Tables("Blokkies").Rows(inc).Item("luidraad")) Then
ds.Tables("Blokkies").Rows(inc).Item(1) = TxtLuidraad.Text
End If
My delete code
Private Sub btnDelete_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnDelete.Click
If MessageBox.Show("Is jy seker jy wil die register verwyder?", "Delete", MessageBoxButtons.YesNo, MessageBoxIcon.Warning) = DialogResult.No Then
MsgBox("Register is nie verwyder nie")
Exit Sub
End If
Dim cb As New OleDb.OleDbCommandBuilder(da)
ds.Tables("Blokkies").Rows(inc).Delete()
maxrows = maxrows - 1
inc = 0
NavigateRecords()
da.Update(ds, "Blokkies")
End Sub
|
|
|
|
|
Check the value of the variable inc and check that the dataset is not empty.
जय हिंद
|
|
|
|
|
sorry, how do you check the value and that the daataset is not empty
|
|
|
|
|
You will need to debug the code. Then use Add Watch or quick watch to find the value.
जय हिंद
|
|
|
|
|
You don't appear to be setting the value of inc anywhere before you try to use it.
|
|
|
|
|
I am new to databse, I don't know how to set the value in the code yet.
I did try this, but it is not working
If inc <> -1 Then
ds.Tables("Blokkies").Rows(inc).Item(1) = TxtLuidraad.Text
ds.Tables("Blokkies").Rows(inc).Item(2) = txtA1.Text
ds.Tables("Blokkies").Rows(inc).Item(3) = txtA2.Text
ds.Tables("Blokkies").Rows(inc).Item(4) = txtA3.Text
ds.Tables("Blokkies").Rows(inc).Item(5) = txtA4.Text
ds.Tables("Blokkies").Rows(inc).Item(6) = txtA5.Text
ds.Tables("Blokkies").Rows(inc).Item(7) = txtA6.Text
ds.Tables("Blokkies").Rows(inc).Item(8) = txtA7.Text
ds.Tables("Blokkies").Rows(inc).Item(9) = txtA8.Text
ds.Tables("Blokkies").Rows(inc).Item(10) = txtA9.Text
ds.Tables("Blokkies").Rows(inc).Item(11) = txtA10.Text
ds.Tables("Blokkies").Rows(inc).Item(12) = txtA11.Text
ds.Tables("Blokkies").Rows(inc).Item(13) = txtA12.Text
da.Update(ds, "Blokkies")
MsgBox("Register verander")
End If
modified on Thursday, March 19, 2009 2:27 AM
|
|
|
|
|
You're entering a contest to see who can write the most illegible code ?
Christian Graus
Driven to the arms of OSX by Vista.
|
|
|
|
|
now what is the best why do wright this code, I am new and want to get this right.
|
|
|
|
|
Like I said, your best option is to let your client know you're not the right man for the job. Buy some books and read them. Learn how to program before having clients.
Christian Graus
Driven to the arms of OSX by Vista.
|
|
|
|
|
I'm sorry, I thought you were someone else.
Break it down into steps. Write code that checks that a table of that name exists, that it has rows, etc. Then step through the code in the debugger.
Christian Graus
Driven to the arms of OSX by Vista.
|
|
|
|
|
Hi,
I have a treeview within directories of all drives including checkboxes (Netframework 2.0) When I check one node the following procedure below checks all the childs of the checked node. Therefore I have called the procedure inside the Treeview1_AfterCheck event procedure. But my aim is also to also check the node which is tagged with a driver name such as (C:\, D:\ maybe E:\ or something else). When I do that I am getting stackoverflow error because of recursive calls. How could you perform both actions at once to check the main node (driver name) and the nodes under the other checked one? Somehow I have to get rid of CheckRootNode procedure. Any sample code will be appreciated.
Thanks.
'
'This procedure checks the root node of any child under it
'
Private Sub CheckRootNode(ByVal GetNode As TreeNode)
Do While Not GetNode.Parent Is Nothing
Root = GetNode.Parent
CheckRootNode(Root)
Loop
TreeView1.Nodes(Root.Index).Checked = True
End Sub
'
'This procedure checks all the child nodes of the parent
'
Private Sub CheckChildNodes(ByVal GetParentNode As TreeNode, ByVal CheckState As Boolean)
For Each xnode As TreeNode In GetParentNode.Nodes
xnode.Checked = CheckState
Next
End Sub
Private Sub TreeView1_AfterCheck(ByVal sender As Object, ByVal e As System.Windows.Forms.TreeViewEventArgs) Handles TreeView1.AfterCheck
Call CheckChildNodes(e.Node, e.Node.Checked)
Call CheckRootNode(e.Node)
End Sub
What a curious mind needs to discover knowledge is noting else than a pin-hole.
|
|
|
|
|
Your issue is that the event fired when the check state changes, is setting the check state. Add a boolean, and use it to stop the event fired in CheckChildNodes from causing CheckChildNodes to be called again from the event handler.
Christian Graus
Driven to the arms of OSX by Vista.
|
|
|
|
|
This is probably a newbie question and I am just not getting it today but... I just want to open a file directory so that the user can open a text file but I dont need to use it in the program. The main form has a button called 'LogFiles' and when the user presses it, I just want it to open the directory and do nothing else. I was using OpenFileDialog but that is stopping execution until a file is chosen. Am i missing something obvious. Thanks
|
|
|
|
|
You can use FolderBrowserDialog for this purpose
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
