NEO23
Also ich habe ein Programm gemacht, und bin damit auch recht zufrieden bis auf die Sache das es immer im Vordergrund seien soll. Also dass während das Programm läuft, ich im Hintergrund nichts anderes anklicken kann.
Ich hoffe ihr könnt mir helfen!
Saemon
| code: |
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
|
Private Const HWND_TOPMOST = -1
Private 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
Private Const HWND_NOTOPMOST = -2
Private Sub Check1_Click()
If Check1 Then
SetWindowPos Form1.hwnd, HWND_TOPMOST, Left / Screen.TwipsPerPixelX, _
Top / Screen.TwipsPerPixelY, Width / Screen.TwipsPerPixelX, _
Height / Screen.TwipsPerPixelY, SWP_SHOWWINDOW
Else
SetWindowPos Form1.hwnd, HWND_NOTOPMOST, Left / Screen.TwipsPerPixelX, _
Top / Screen.TwipsPerPixelY, Width / Screen.TwipsPerPixelX, _
Height / Screen.TwipsPerPixelY, SWP_SHOWWINDOW
End If
End Sub
|
|
Ist aus einem alten Programm von mir, bei dem man mit der Checkbox Check1 bestimmen konnte, ob es immer im Vordergrund sein sollte oder nicht. Ich hoffe, das hilft dir.
NEO23
Also wenn ich das so mache wie du es gesagt hast, dann zeigt der mir bei dem
"SetWindowPos"
in Zeile 7 immer an:
"Sub or Function not defined"
Weist du woran das liegt?
Saemon
du musst diese zeilen ganz oben in der datei einfügen, evtl hast du das vergessen.
| code: |
1:
2:
3:
|
Private Const HWND_TOPMOST = -1
Private 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
Private Const HWND_NOTOPMOST = -2 |
|
NEO23
Stimmte jetzt funktioniert es.
Aber kann man das dann auch noch so machen das man dann im Hintergrund keine anderen Sachen mehr machen kann, also Ordner öffnen oder so was?
Auch wenn du nicht weist wie es geht trotzdem vielen Dank.
daHooligan
warum willst du mit einem programm einen PC blockieren??
Das kann niemand leiden, wenn ein Programm alles andere blockiert, das ist das nervigste was es gibt
NEO23
Nein du verstehst das falsch ich will mir mal einen Passwortschutz machen.
ich habe nähmlich ziehmlich neugierige Geschwister die schnell mal an meinem PC rumspielen wenn ich mal für ne Minute nicht da bin und weil ich dann nicht immer den Pc aus machen will oder Stand By Modus wollte ich mir halt so was machen. Bitte hilf mir.
daHooligan
schonmal mit nem passwort und windowstaste + L versucht?? ist etwas einfaher
NEO23
Ah danke.
Aber kannst du mir nicht trotzdem sagen wie das mit VB geht ich will damit doch keinen Virus machen oder so nur ein bisschen spieleerei
Wolf
Das wird dir wahrscheinlich keiner glauben, wenn du sagst, dass du keinen Virus coden willst. Du hast auch gefragt, wie man ne EXE beim öffnen von ner Email automatisch startet. Und die Blockade anderer Anwendungen ist ja wohl auch eine Eigenschaft von Viren.
p-Logic
| Zitat: |
Original von NEO23
Ah danke.
Aber kannst du mir nicht trotzdem sagen wie das mit VB geht [..] |
einfach
| code: |
1:
|
rundll32.exe user32.dll,LockWorkStation |
|
ausführen...
(kannst die dll auch direkt ansprechen, wenn du willst)
Von VB hab ich keine Ahnung, musst also selbst schaun, wie du das im Endeffekt machst.
PS: Natürlich sind wir alle der Meinung, dass du nur gefährliche Vieren coden und damit die Weltherrschaft an dich reißen willst
NEO23
Natürlich will ich die Weltherrschaft.
Ich erobere das Universum mit meinen gefährlichen Killer-PC´s.
NEO23
@Wolf
Ok da ging es um nen kleinen Virus.
Hätte ihn aber nicht eingesetzt (wenn er mal funktioniert hätte)
Aber jetzt geht es wirklich nicht um einen Virus.
ThiefMaster
Und zu.
Hier ist kein Scriptkiddietreff
daHooligan
nen Virus wird er mit VB kaum hinkriegen, da sollte man schon C/++ oder Assembler nehmen