| |
VB.NET - Ein- und UmsteigerRe: SystemMenüDelete | | | Autor: MeikMiller | Datum: 22.10.06 12:00 |
| So ist das. Du hast voll Recht.
Vielen Dank. | |
SystemMenüDelete | | | Autor: MeikMiller | Datum: 22.10.06 11:11 |
| Ich möchte teilweise System Menü löschen (bleiben mussen "Verschieben und Schließen"). Ich habe auch ein API- Funktion gefunden, aber scheint funktioniert nicht ganz gut?... Wenn jemand weisst die andere Code, bitte posten.
Meine Code:
Public Declare Function GetSystemMenu Lib "user32" (ByVal hwnd As Integer, _
ByVal bRevert As Integer) As Integer
Dim Handle_Renamed As Integer
Public Const MF_BYPOSITION As Integer = &H400
Declare Function DeleteMenu Lib "user32" (ByVal hMenu As Integer, ByVal _
nPosition As Integer, ByVal wFlags As Integer) As Integer Handle_Renamed = GetSystemMenu(Handle.ToInt32, False)
DeleteMenu(Handle_Renamed, 0, MF_BYPOSITION)
DeleteMenu(Handle_Renamed, 2, MF_BYPOSITION)
DeleteMenu(Handle_Renamed, 3, MF_BYPOSITION)
DeleteMenu(Handle_Renamed, 4, MF_BYPOSITION) Aus mir unbekannten Grunden bleiben ungelöscht "Größe Ändern und Maximieren" | |
Re: SystemMenüDelete | | | Autor: wincnc | Datum: 22.10.06 11:55 |
| Hallo
Das liegt wahrscheinlich daran, dass nach dem Löschen der Position 0 die Position 1 zu Position 0 wird u.s.w. Das musst Du beachten. Ich würde verusuchen die letzte Position zuerst zu löschen.
DeleteMenu(Handle_Renamed, 4, MF_BYPOSITION)
DeleteMenu(Handle_Renamed, 3, MF_BYPOSITION)
DeleteMenu(Handle_Renamed, 2, MF_BYPOSITION)
DeleteMenu(Handle_Renamed, 0, MF_BYPOSITION) | |
| Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.
Einloggen | Neu registrieren |
|
|
sevZIP40 Pro DLL
Zippen und Unzippen wie die Profis!
Mit nur wenigen Zeilen Code statten Sie Ihre Anwendungen ab sofort mit schnellen Zip- und Unzip-Funktionen aus. Hierbei lassen sich entweder einzelnen Dateien oder auch gesamte Ordner zippen bzw. entpacken. Weitere InfosTipp des Monats Access-Tools Vol.1
Über 400 MByte Inhalt
Mehr als 250 Access-Beispiele, 25 Add-Ins und ActiveX-Komponenten, 16 VB-Projekt inkl. Source, mehr als 320 Tipps & Tricks für Access und VB
Nur 24,95 EURWeitere Infos
|
|
|
Copyright ©2000-2024 vb@rchiv Dieter Otter Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.
Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel
|
|