Dokumente lesen und dem Grid übergeben
[Visual Basic] Public Function Get_Dokumente( _
ByRef c1data As C1TrueDBGrid, _
Optional ByVal ImgList As ImageList = Nothing _
) As Object
[Visual Basic] Public Function Get_Dokumente(ByRef c1data As C1TrueDBGrid, Optional ByVal ImgList As ImageList = Nothing)
Try
dokumente.dispose()
dokumente = Nothing
Catch ex As Exception
End Try
dokumente = Dokument.Get_Dokumente(Me.iApplikationNr.Value, 3)
c1data.DataSource = dokumente
c1data.DataMember = dokumente.TableName
If Not ImgList Is Nothing Then
Set_Imagevalues(c1data, ImgList)
End If
End Function
Plattformen: Windows 98, Windows 2000 SP4, Windows Millennium Edition, Windows Server 2003, Windows XP Media Center Edition, Windows XP Professional x64 Edition, Windows XP SP2, Windows XP Starter Edition