Wie funktionieren bestimmte API's richtig?

Xiantrius · 18. Mai 2022, 19:34

Den Vorgänger Code hab ich auch mal gepostet in Post 39 .

Da siehst du was ich eigentlich für ein Ziel habe.
Es wird ja gesagt mit Enumchild könnte es funktionieren das man das noch besser hinbekommt.

Die nexte aufgabe würde dann sein herauszufinden wie man das noch besser mit den Fullscreen auslesen hinbekommt, so das jedes Spiel erfolgreich ausgelesen werden kann ob es in Vollbild ist, oder nicht.

Muss auch gestehen mit Datagridview hab ich sehr wenig gearbeitet da hab ich nur 1 Projekt amsonsten nie.

Ok hab es verbessert.
Was ist der unterschied zwischen ....

VB.NET-Quellcode

'DataTable
dt.clear
'und
dt.Rows.Clear()
'???

Habe auch mit solchen variable noch nie gearbeitet
wie DataTable und DataView.

VB.NET-Quellcode

Public dt As New DataTable
Public dv As New DataView(dt)

FormFollowsFunction · 18. Mai 2022, 22:40

Laut Microsoft-code-convention sollten die API-Methoden in eine NativeMethods-Klasse gepackt werden.
docs.microsoft.com/de-de/dotne…ysis/quality-rules/ca1060

Xiantrius · 19. Mai 2022, 05:39

Guten morgen zusammen.
Nicht zwangsläufig, man kann auch für API's, funktionen,subs usw... für ein beliebigen Modul/Class Name verwenden.
Habe noch nie erlebt das es eine bestimmte Klasse gebraucht wird um die funktion zu gewährleisten.
Wenn ich ehrlich sein soll mag ich Modul lieber als Class.
Der Vorteil ist man muss sie nicht deklarieren und wird Automatisch erkannt.
@Panter hat es anscheinend raus editiert, hab es aber gestern gelesen nur ein Beispiel. Er wunderte sich, dass die funktionen die zuvor bei der Forms Anwendung drin waren jetzt bei Modul drin sind und sogar funktionieren.
Man kann auch alles bei Windows Forms direkt rein packen. Das beeinträchtigt die Funktion auf keiner weise.
Ich wüsste jetzt keine Einzelfälle wo das anders ist.
Bei den meisten API zb. sollte der Name zb. Sendmessage nicht geändert werden, weil die user32.dll das nicht unterstützt und rum meckert sobald die API dann mit veränderten namen zum einsatz kommen soll.
Sollte es doch ein, oder mehrere fälle geben wo es genauso ist das man genau den festen Classname, oder Modulnamen brauch, um die funktion zu gewährleisten, dann hatte ich das bisher noch nicht erlebt.
Was Microsoft meint ist denke ich ein vorgeschlagener Name.
Könnte natürlich auch sein das bei C# und C++ verpflichtend ist bestimmte Namen zu nehmen, damit die Funktion gewährleistet bleibt.
Habe selbst noch nie mit C# und C++ wirklich gearbeitet und kann es deshalb nicht sagen ob das tatsächlich so ist.

mfg.
Xiantrius

Panter · 19. Mai 2022, 06:08

Hallo zusammen

Beim Datatable (ist zwar auch eine Referenz) sind die Daten gespeichert. Das Dataview greift auf das Datatable zurück und wird mit dem Datagrid gebunden. - man kann dort die Daten sortieren und filtern. Daher reicht es, wenn eben die Daten aus dem Datatable gelöscht werden. Das Datagrid und das Dataview haben dann automatisch keine Daten mehr. Ob du dt.Rows.Clear() oder dt.Clear() verwendest ist schnuppe, bitte einfach den Rest weglassen.

Mein Ding sind halt Datenbanken, dort werden diese Typen verwendet.

mfg

Xiantrius · 19. Mai 2022, 06:21

Das hab ich nicht gewusst.
Das heist um das jetzt mal umzudenken ist Datagridview1 zb. sowas wie eine Verknüpfung.
Wird DataTable mit Datagridview verknüpft werden die Daten Sichtbar im Datagridview und deshalb heist es dann...

VB.NET-Quellcode

'Heist dann DataSource ist fast so als wenn eine Verknüfung angelegt wird.
Datagridview1.DataSource = Datatable
'Ach deshalb funktioniert
Datagridview1.Rows.Clear
'nicht.
'Man muss dann entweder den Quelleninhalt löschen.
Datatable.clear
'oder
Datatable.Rows.clear
' Oder die Quellverbindung mit der Verknüpfung beenden in den man Datagridview1.
'problem ist die Daten bleiben in Datatable dann erhalten und würden den Eintrag verdoppeln um das zu vermeiden müsste man gleich die Quelle löschen.
Datagridview1.DataSource = Nothing
'anwendet.

Hab ich das so in etwa richtig verstanden?

RodFromGermany · 19. Mai 2022, 06:30

Xiantrius schrieb:

Hab ich das so in etwa richtig verstanden?

Du musst nicht das DataGridView bedienen, das machst Du doch über die DataTable, die an das DGV gebunden ist.
Datagridview1.Rows.Clear() ist nicht erdforderlich.

BitBrösel · 19. Mai 2022, 07:38

Xiantrius schrieb:

Bei den meisten API zb. sollte der Name zb. Sendmessage nicht geändert werden, weil die user32.dll das nicht unterstützt und rum meckert sobald die API dann mit veränderten namen zum einsatz kommen soll.

Wenn der Name sich nicht mit dem des Originalen deckt, teile den EntryPoint mit, dann kannst du jede API-Funktion nennen wie du Lust und Laune hast, auch SendMessage. Aber, sowas sollte man nicht tun, mit den richtigen oder nur leicht geänderten Namen, ist sofort zu sehen, welche Funktion es ist.

VB.NET-Quellcode

<DllImport("user32.dll", CharSet:=CharSet.Ansi, EntryPoint:="GetWindowTextA")>
Public Shared Function HerMitDemTextVomFenster(hwnd As IntPtr, <MarshalAs(UnmanagedType.LPStr)> lpString As StringBuilder, nMaxCount As Integer) As Integer
End Function

Xiantrius · 19. Mai 2022, 07:41

Ach so geht das also auch na dann hab ich mich an den Punkt geirrt.

Mfg.
Xiantrius

Panter · 19. Mai 2022, 07:43

Hallo zusammen

Mein Freund Google meinte, dass Dir vielleicht ein weiteres API, das GetWindowPlacement Lib, was bringt..
Betreffend dem Datatable: Du darst das gerne auch unbauen in eine Listbox, welche Du ja besser kennst.

Sorry - ich habe erst jetzt gesehen, dass Du diese API ja schon benützt...

VB.NET-Quellcode

Imports System.Diagnostics
Imports Microsoft.VisualBasic
Public Class form2
Dim dt As New DataTable
Dim dv As New DataView(dt)
Dim Parent_Handle As IntPtr
Private Sub Aktives_Fenster_Load(sender As Object, e As EventArgs) Handles MyBase.Load
With dt.Columns
.Add("Handle", Type.GetType("System.Int64"))
.Add("Handle_child", Type.GetType("System.Int64"))
.Add("ClassName", Type.GetType("System.String"))
.Add("MainWindowTitle", Type.GetType("System.String"))
.Add("FensterStatus", Type.GetType("System.String"))
End With
DataGridView1.DataSource = dv
Call neu_einlesen()
End Sub
Public Sub neu_einlesen()
dt.Clear()
' alle Prozesse durchlaufen
For Each oProcess As Process In Process.GetProcesses
If oProcess.MainWindowHandle <> IntPtr.Zero Then
Dim windowHandle As IntPtr = oProcess.MainWindowHandle
Dim row As DataRow = dt.NewRow()
row!Handle = windowHandle.ToString
row!MainWindowTitle = GetActiveWindowText(windowHandle) 'oProcess.MainWindowTitle.ToString
row!ClassName = ClassName(windowHandle)
row!FensterStatus = FensterStatus(windowHandle)
dt.Rows.Add(row)
Parent_Handle = windowHandle
GetChild(windowHandle)
End If
Next
dv.Sort = "Handle ASC"
End Sub
Public Function Enumerate(hWnd As IntPtr, lParam As IntPtr) As Boolean
Dim row As DataRow = dt.NewRow()
row!Handle = Parent_Handle.ToInt64
row!Handle_child = CInt(hWnd.ToString)
row!Classname = ClassName(hWnd)
row!MainWindowTitle = GetActiveWindowText(hWnd)
row!FensterStatus = FensterStatus(hWnd)
dt.Rows.Add(row)
Return True
End Function
Public Function GetChild(hwnd As IntPtr) As Boolean
Dim x As Boolean
x = EnumChildWindows(hwnd, AddressOf Enumerate, CType(0, IntPtr))
Return True
End Function
Private Sub bt_neu_einlesen_Click(sender As Object, e As EventArgs) Handles bt_neu_einlesen.Click
Call neu_einlesen()
End Sub
End Class

VB.NET-Quellcode

Imports System.Runtime.InteropServices
Imports System.Text
Module Module1
<DllImport("user32.dll", SetLastError:=True)>
Private Function GetForegroundWindow() As IntPtr
End Function
<DllImport("user32.dll", SetLastError:=True, CharSet:=CharSet.Auto)>
Private Function GetWindowText(ByVal hwnd As IntPtr, ByVal lpString As StringBuilder, ByVal cch As Integer) As Integer
End Function
<DllImport("user32.dll", SetLastError:=True, CharSet:=CharSet.Auto)>
Private Function GetWindowTextLength(ByVal hwnd As IntPtr) As Integer
End Function
'no specific Charset APIs
<DllImport("user32.dll", SetLastError:=True)>
Public Function EnumChildWindows(hWndParent As IntPtr, lpEnumFunc As EnumWindowsProc, lParam As IntPtr) As Boolean
End Function
Public Delegate Function EnumWindowsProc(hWnd As IntPtr, lParam As IntPtr) As Boolean
<Runtime.InteropServices.DllImport("user32.dll", CharSet:=Runtime.InteropServices.CharSet.Auto)>
Public Function GetClassName(ByVal hWnd As System.IntPtr, ByVal lpClassName As System.Text.StringBuilder, ByVal nMaxCount As Integer) As Integer
End Function
Public Function ClassName(hwnd As IntPtr) As String
Dim sClassName As New StringBuilder("", 256)
'pass in the handle of the object for which to get
'the class name; for example, the form's handle
Call GetClassName(hwnd, sClassName, 256)
Return sClassName.ToString
End Function
Public Function GetActiveWindowText(hWnd As IntPtr) As String
Dim length As Integer ', hWnd As IntPtr = GetForegroundWindow()
If hWnd.ToInt32 = 0 Then
Return Nothing
End If
length = GetWindowTextLength(hWnd)
If length = 0 Then
Return Nothing
End If
Dim sb As New System.Text.StringBuilder("", length)
GetWindowText(hWnd, sb, sb.Capacity + 1)
Return sb.ToString()
End Function
Private Declare Function GetWindowPlacement Lib "user32" (ByVal hwnd As IntPtr, ByRef lpwndpl As WINDOWPLACEMENT) As Integer
Private Structure POINTAPI
Public x As Integer
Public y As Integer
End Structure
Private Structure RECT
Public Left As Integer
Public Top As Integer
Public Right As Integer
Public Bottom As Integer
End Structure
Private Structure WINDOWPLACEMENT
Public Length As Integer
Public flags As Integer
Public showCmd As Integer
Public ptMinPosition As POINTAPI
Public ptMaxPosition As POINTAPI
Public rcNormalPosition As RECT
End Structure
Public Function FensterStatus(hwnd As IntPtr) As String
Dim intRet As Integer
Dim wpTemp As WINDOWPLACEMENT
wpTemp.Length = System.Runtime.InteropServices.Marshal.SizeOf(hwnd)
intRet = GetWindowPlacement(hwnd, wpTemp)
Select Case wpTemp.showCmd
Case 1
Return "Normal"
Case 2
Return "minimiert"
Case 3
Return "maximiert"
Case Else
Return "unbekannt"
End Select
End Function
End Module

Xiantrius · 19. Mai 2022, 08:26

Denk dran maximiert und Vollbild ist nicht das gleiche.
Bei maximiert passt sich die Form nur an Desktop an.
Während Form mit Vollbild unabhängig von Desktop agiert. Der Monitor visiert die Form an anstatt den Desktop. Sollte die Auflösung und/oder Hz-Frequenz anders sein wird beim um switchen zwischen Desktop und Vollbild einer Form Rechenzeit benötigt.

Hoffe hab das richtig erklärt.

Mein Hauptziel:
Das will ich vermeiden in dem der Desktop sich die Auflösung der Form anpasst bis der Prozess der gewählt wurde beendet wird der Desktop nimmt die Auflösung und Hz-Frequenz wieder die vor den Start des Prozesses angewendet wurde.
Das soll nur dann geschehen sobald sich die Anwendung tatsächlich in Vollbild befindet.
Leider funktioniert das mit mein Code nicht bei jeden Prozess.

BitBrösel · 19. Mai 2022, 08:36

Xiantrius schrieb:

Habe noch nie erlebt das es eine bestimmte Klasse gebraucht wird um die funktion zu gewährleisten.

Ich schon, wenn ich eine Klasse aus meinem Projekt lösche, wird das wohl nicht mehr kompilierfähig sein.

Ob die API-Deklarationen in einer Form-Klasse oder Module sind, ist für die Funktionalität der Funktionen nicht entscheidend, genauso wenig der Name der Klasse/ des Modules. Aber wenn sich jeder an die Richtlinie welche @FormFollowsFunction verlinkt hält, sieht jeder Entwickler selbst wenn er das Projekt nicht kennt sofort dort ist das API-Zeugs und muss nicht das ganze Projekt durchsuchen um diese zu finden. Win32 ist auch verräterisch, so nenn ich diese bei mir, aber der Name ist auch nicht die beste Idee, weil es gibt einen Namespace mit dem Namen Win32(Microsoft.Win32).

Xiantrius · 19. Mai 2022, 08:43

Natürlich wenn die Wichtigen Funktionen in der Class waren ist das nur logisch.

Panter · 19. Mai 2022, 14:08

Hallo

Vielleicht könntest Du die Fensterposition man verwenden, das Vollbildfenster sollte ja dann auch grösser sein als ein maximiertes Fenster..
Ich habe leider keine Spiele zum Testen, vielleicht fällt Dir ja was auf..
Ich habe den Code mal aktualisiert

Spoiler anzeigen

VB.NET-Quellcode

Imports System.Runtime.InteropServices
Imports System.Text
Module Module1
<DllImport("user32.dll", SetLastError:=True)>
Private Function GetForegroundWindow() As IntPtr
End Function
<DllImport("user32.dll", SetLastError:=True, CharSet:=CharSet.Auto)>
Private Function GetWindowText(ByVal hwnd As IntPtr, ByVal lpString As StringBuilder, ByVal cch As Integer) As Integer
End Function
<DllImport("user32.dll", SetLastError:=True, CharSet:=CharSet.Auto)>
Private Function GetWindowTextLength(ByVal hwnd As IntPtr) As Integer
End Function
'no specific Charset APIs
<DllImport("user32.dll", SetLastError:=True)>
Public Function EnumChildWindows(hWndParent As IntPtr, lpEnumFunc As EnumWindowsProc, lParam As IntPtr) As Boolean
End Function
Public Delegate Function EnumWindowsProc(hWnd As IntPtr, lParam As IntPtr) As Boolean
<Runtime.InteropServices.DllImport("user32.dll", CharSet:=Runtime.InteropServices.CharSet.Auto)>
Public Function GetClassName(ByVal hWnd As System.IntPtr, ByVal lpClassName As System.Text.StringBuilder, ByVal nMaxCount As Integer) As Integer
End Function
Public Function ClassName(hwnd As IntPtr) As String
Dim sClassName As New StringBuilder("", 256)
'pass in the handle of the object for which to get
'the class name; for example, the form's handle
Call GetClassName(hwnd, sClassName, 256)
Return sClassName.ToString
End Function
Public Function GetActiveWindowText(hWnd As IntPtr) As String
Dim length As Integer ', hWnd As IntPtr = GetForegroundWindow()
If hWnd.ToInt32 = 0 Then
Return Nothing
End If
length = GetWindowTextLength(hWnd)
If length = 0 Then
Return Nothing
End If
Dim sb As New System.Text.StringBuilder("", length)
GetWindowText(hWnd, sb, sb.Capacity + 1)
Return sb.ToString()
End Function
Private Declare Function GetWindowPlacement Lib "user32" (ByVal hwnd As IntPtr, ByRef lpwndpl As WINDOWPLACEMENT) As Integer
' BOOL GetWindowRect(
' [in] HWND hWnd,
' [out] LPRECT lpRect
' );
' typedef struct tagRECT {
' Long left;
' Long top;
' Long right;
' Long bottom;
'} RECT, *PRECT, *NPRECT, *LPRECT;
Declare Function GetWindowRect Lib "user32.dll" (ByVal hwnd As IntPtr, ByRef lpRect As LpRect) As Int32
Public Structure LpRect
Public left As Int32
Public top As Int32
Public right As Int32
Public bottom As Int32
End Structure
Private Structure POINTAPI
Public x As Integer
Public y As Integer
End Structure
Private Structure RECT
Public Left As Integer
Public Top As Integer
Public Right As Integer
Public Bottom As Integer
End Structure
Private Structure WINDOWPLACEMENT
Public Length As Integer
Public flags As Integer
Public showCmd As Integer
Public ptMinPosition As POINTAPI
Public ptMaxPosition As POINTAPI
Public rcNormalPosition As RECT
End Structure
Public Function FensterStatus(hwnd As IntPtr) As String
Dim intRet As Integer
Dim wpTemp As WINDOWPLACEMENT
wpTemp.Length = System.Runtime.InteropServices.Marshal.SizeOf(hwnd)
intRet = GetWindowPlacement(hwnd, wpTemp)
Select Case wpTemp.showCmd
Case 1
Return "Normal"
Case 2
Return "minimiert"
Case 3
Return "maximiert"
Case Else
Return "unbekannt"
End Select
End Function
End Module

VB.NET-Quellcode

Imports System.Diagnostics
Imports Microsoft.VisualBasic
Public Class form2
Dim dt As New DataTable
Dim dv As New DataView(dt)
Dim Parent_Handle As IntPtr
Private Sub Aktives_Fenster_Load(sender As Object, e As EventArgs) Handles MyBase.Load
With dt.Columns
.Add("Handle", Type.GetType("System.Int64"))
.Add("Handle_child", Type.GetType("System.Int64"))
.Add("ClassName", Type.GetType("System.String"))
.Add("MainWindowTitle", Type.GetType("System.String"))
.Add("FensterStatus", Type.GetType("System.String"))
.Add("top", Type.GetType("System.Int64"))
.Add("left", Type.GetType("System.Int64"))
.Add("right", Type.GetType("System.Int64"))
.Add("bottom", Type.GetType("System.Int64"))
End With
DataGridView1.DataSource = dv
Call neu_einlesen()
End Sub
Public Sub neu_einlesen()
Dim Fensterpos As LpRect
Dim Y As Boolean
dt.Clear()
' alle Prozesse durchlaufen
For Each oProcess As Process In Process.GetProcesses
If oProcess.MainWindowHandle <> IntPtr.Zero Then
Dim windowHandle As IntPtr = oProcess.MainWindowHandle
Y = GetWindowRect(windowHandle, Fensterpos)
Dim row As DataRow = dt.NewRow()
row!Handle = windowHandle.ToString
row!MainWindowTitle = GetActiveWindowText(windowHandle) 'oProcess.MainWindowTitle.ToString
row!ClassName = ClassName(windowHandle)
row!FensterStatus = FensterStatus(windowHandle)
row!top = Fensterpos.top
row!left = Fensterpos.left
row!right = Fensterpos.right
row!bottom = Fensterpos.bottom
dt.Rows.Add(row)
Parent_Handle = windowHandle
GetChild(windowHandle)
End If
Next
dv.Sort = "Handle ASC"
End Sub
Public Function Enumerate(hWnd As IntPtr, lParam As IntPtr) As Boolean
Dim row As DataRow = dt.NewRow()
Dim Fensterpos As LpRect
Dim Y As Boolean
Y = GetWindowRect(hWnd, Fensterpos)
row!Handle = Parent_Handle.ToInt64
row!Handle_child = CInt(hWnd.ToString)
row!Classname = ClassName(hWnd)
row!MainWindowTitle = GetActiveWindowText(hWnd)
row!FensterStatus = FensterStatus(hWnd)
row!top = Fensterpos.top
row!left = Fensterpos.left
row!right = Fensterpos.right
row!bottom = Fensterpos.bottom
dt.Rows.Add(row)
Return True
End Function
Public Function GetChild(hwnd As IntPtr) As Boolean
Dim x As Boolean
x = EnumChildWindows(hwnd, AddressOf Enumerate, CType(0, IntPtr))
Return True
End Function
Private Sub bt_neu_einlesen_Click(sender As Object, e As EventArgs) Handles bt_neu_einlesen.Click
Call neu_einlesen()
End Sub
End Class

Xiantrius · 19. Mai 2022, 14:39

Habe auch spiele die auf 640x480 Vollbild nutzen.
Bin gerade auf derArbeit.

So hab nochmal alles durch gecheckt und muss etwas peinliches feststellen...
Die Spiele die ich dachte die nicht greifen gehen werden doch als Vollbildmodus gewertet, habe nicht bedacht, dass manche Spiele offenbar key blockieren in Windows solange sie in Vordergrund sind.
Das heist ich hatte ein Bedienungsfehler gemacht ohne es zu wollen, tut mir wirklich leid, aber umsonst war es ja nicht.
War mir schon die ganze Zeit schleierhaft warum die Spiele dann immer als minimiert gezählt wurden obwohl ich in vollbild die richtigen tasten kombi gedrückt habe und manche war das problemlos.
Bin soooo......... so blöd.
Hab dann eine abfrage einfach gemacht, wenn Vollbild registriert wird in Timer soll er Timer anhalten und Msgbox dazu ausgeben um es zu bestätigen hab den Timer hinterher mit ein Button wieder gestartet für den nexten Test. Alles funktionierte...
Sollte es mal ein Spiel geben wo es wirklich nicht greift, werde ich mich nochmal melden deswegen.
Das bedeutet der Post 51 mein Code hat funktioniert ohne probleme und das nur weil ich jetzt mein Fehler erkannt habe.

Dennoch gibt es 1 Positiven effekt, man kann ja Enumchild für was anderes einsetzen.
Vielleicht kann man Enumchild und alle API's die dazugehören wirklich mal gut gebrauchen.
Bisher hat es heute jedes Spiel das in Vollbild Modus lief erfolgreich getestet ohne das ich Enumchild API brauche.
Naja trotz allem gab es noch kniffe wie man Datagridview durch Datatable anwendet und Datasource weis ich das es so eine art verknüpfung dazu erzeugt von der tatsächlichen tabelle in die Verknüpfung Datagridview usw...
Also waren unsere Zeiten nicht ganz umsonst in gewisser weise.

Aber das Thread ist ja nicht zuende deswegen. Man könnte noch andere API's anschauen die interessant wären.
Ihr könnt euch auch untereinander wenn es um dieses Thema geht austauschen.

FormFollowsFunction · 19. Mai 2022, 20:27

@Xiantrius, Du solltest die beiden, von mir verlinkten Seiten mal lesen, "NativeMethods" ist nicht einfach nur nen sexi Name.

Regelbeschreibung
Plattformaufrufmethoden, beispielsweise Methoden, die mit dem System.Runtime.InteropServices.DllImportAttribute-Attribut gekennzeichnet sind, oder Methoden, die in Visual Basic mithilfe des Declare-Schlüsselworts
definiert wurden, greifen auf nicht verwalteten Code zu. Diese Methoden
sollten in einer der folgenden Klassen vorhanden sein:

NativeMethods: Diese Klasse unterdrückt keine Stackwalks für die nicht verwaltete Codeberechtigung. (System.Security.SuppressUnmanagedCodeSecurityAttribute
darf nicht auf diese Klasse angewendet werden.) Diese Klasse eignet
sich für Methoden, die überall verwendet werden können, da ein Stackwalk
ausgeführt wird.

SafeNativeMethods: Diese Klasse unterdrückt Stackwalks für die nicht verwaltete Codeberechtigung. (System.Security.SuppressUnmanagedCodeSecurityAttribute
wird auf diese Klasse angewendet.) Diese Klasse eignet sich für
Methoden, die für jeden aufzurufenden Benutzer sicher sind. Aufrufer
dieser Methoden müssen keine vollständige Sicherheitsüberprüfung
durchführen, um sicherzustellen, dass die Nutzung sicher ist, da die
Methoden für jeden Aufrufer harmlos sind.

UnsafeNativeMethods: Diese Klasse unterdrückt Stackwalks für die nicht verwaltete Codeberechtigung. (System.Security.SuppressUnmanagedCodeSecurityAttribute
wird auf diese Klasse angewendet.) Diese Klasse eignet sich für
Methoden, die potenziell gefährlich sind. Alle Aufrufer dieser Methoden
müssen eine vollständige Sicherheitsüberprüfung durchführen, um
sicherzustellen, dass die Nutzung sicher ist, da kein Stackwalk
durchgeführt wird.

Xiantrius · 19. Mai 2022, 20:50

Klingt interessant... aber was wäre so schlimm ein Class Name zu nehmen der nicht der vorgegebenen Anforderung entspricht, oder was ist wenn ich Modul statt Class bevorzuge? Ist ja auch tatsächlich der fall.

FormFollowsFunction · 19. Mai 2022, 20:55

Lies es nochmal, dort steht die Antwort.

Xiantrius · 20. Mai 2022, 06:41

Guten morgen zusammen,

Ich hab gelesen das

VB.NET-Quellcode

SuppressUnmanagedCodeSecurityAttribute

die Laufzeit verbessert und Leistungseinsparung gibt.
Wie verwende ich das?
Ausserdem lese ich grade was interessantes docs.microsoft.com/de-de/dotne…ityattribute?view=net-6.0

Wichtig:
Teilweise vertrauenswürdiger Code wird nicht mehr unterstützt. Dieses Attribut hat keinen Effekt in .NET Core.

Achtung:
Verwenden Sie dieses Attribut mit extremer Sorgfalt. Falsche Verwendung kann Sicherheitsschwächen schaffen.

Ok so wendet man es also an...

VB.NET-Quellcode

<System.AttributeUsage(System.AttributeTargets.[Class] Or System.AttributeTargets.[Delegate] Or System.AttributeTargets.[Interface] Or System.AttributeTargets.Method, AllowMultiple:=True, Inherited:=False)>
Public NotInheritable Class SuppressUnmanagedCodeSecurityAttribute
Inherits Attribute
Private Sub Test123(value As Int32)
For i As Integer = 0 to value
'Irgendwas soll passieren
Next
End Sub
End Class

Wie funktionieren bestimmte API's richtig?

VB.NET-Quellcode

VB.NET-Quellcode

VB.NET-Quellcode

Xiantrius schrieb:

Xiantrius schrieb:

VB.NET-Quellcode

VB.NET-Quellcode

VB.NET-Quellcode

Xiantrius schrieb:

VB.NET-Quellcode

VB.NET-Quellcode

VB.NET-Quellcode

VB.NET-Quellcode

Ähnliche Themen

7 Benutzer haben hier geschrieben