Hi!
I become back the error that the size of my Array is to big...
How can i fit it?
Here is the Array with the Problem:
<StructLayout(LayoutKind.Sequential)> Public Structure VBSATZFREITEXTSUCHE
' *******************************************************************************************************
' Such Tabelle (max. 100 Spalten)
<MarshalAs(UnmanagedType.ByValArray, SizeConst:=100)> Public SuchArray() As WPFStandardSuchTabelle<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=10)> Public SuchAnzahl As String<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=81)> Public SuchHinweis As String<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=10)> Public SuchNummer1 As String<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=257)> Public SuchKopf1 As String<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=257)> Public SuchKopf2 As String<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=257)> Public SuchKopf3 As String<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=257)> Public SuchKopf4 As String<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=257)> Public SuchKopf5 As String<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=257)> Public SuchKopf6 As String<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=257)> Public SuchKopf7 As String<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=257)> Public SuchKopf8 As String<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=257)> Public SuchKopf9 As String<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=257)> Public SuchKopf10 As String<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=257)> Public SuchKopf11 As String<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=257)> Public SuchKopf12 As String<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=257)> Public SuchKopf13 As String<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=257)> Public SuchKopf14 As String<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=257)> Public SuchKopf15 As String<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=257)> Public SuchKopf16 As String<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=257)> Public SuchKopf17 As String<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=257)> Public SuchDatei As String
' *******************************************************************************************************
End Structure
' *******************************************************************************************************
' Such-Tabelle mit Feldlänge
<StructLayout(LayoutKind.Sequential)> Public Structure WPFStandardSuchTabelle<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=101)> Public SuchWas As String<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=11)> Public SuchAufDatum As String<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=2)> Public SuchFehlerKZ As String<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=257)> Public SuchBeschreibung As String<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=257)> Public SuchImage As String<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=27)> Public SuchMitarbeiter As String<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=11)> Public SuchErledigenBisDatum As String<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=2)> Public SuchErledigtKZ As String<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=11)> Public SuchErledigtDatum As String<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=257)> Public SuchWasGemacht As String<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=31)> Public SuchText9 As String<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=31)> Public SuchText10 As String<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=31)> Public SuchText11 As String<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=31)> Public SuchText12 As String<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=31)> Public SuchText13 As String<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=31)> Public SuchText14 As String<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=31)> Public SuchText15 As String
End Structure
Now the Call...
Declare Function QSLISTECALL Lib "QSLISTE.dll" (ByRef VBSATZ1 As VBSATZ01, ByRef VBSATZ4 As VBSATZFREITEXTSUCHE) As Integer
CblStatus = QSLISTECALL(VBSATZ001, VBSATZFreitextSuche)
Have anyone an idea without cutting fields?
Best Regards
Bernd