vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
vb@rchiv Offline-Reader - exklusiv auf der vb@rchiv CD Vol.4  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

VB & Windows API
syslistview32 eines anderen Programms auslesen probleme 
Autor: Maddin73
Datum: 30.11.03 22:51

Hallo,
ich möchte ein syslistview32 eines anderen Programms auslesen,
diese liste hat 5 spalten und 0 bis 20 zeilen.

bisher habe ich es geschaft die anzahl der Items auszulesen,
wenn ich das item auslese bekom ich nichts zurück,
und wenn ich den itemtext auslese stürtzt das programm ab welches ich auslese.

ich hoffe mir kann jemand helfen, ich komm einfach nichht weiter.


ich poste mal den wichtigsten teil des Programms:

Private Function CopyExListToList(sourcehWnd As Long, target As ListBox) As Long

Dim c As Long
Const LVM_FIRST = &H1000
Const WC_LISTVIEWW = "SysListView32"
Const WC_LISTVIEW = WC_LISTVIEWW
Const LVM_GETITEMCOUNT = (LVM_FIRST + 4)
Const LVM_GETITEM = (LVM_FIRST + 75)
Const LVM_GETITEM95 = (LVM_FIRST + 5) ' soll für win95 sein ?? ich brauch es für nt
'Const LVM_GETITEMTEXTW = (LVM_FIRST + 115) 'ich habe mehrere gefunden ??
'Const LVM_GETITEMTEXT = LVM_GETITEMTEXTW
Const LVM_GETITEMTEXTA = (LVM_FIRST + 45)
Const LVM_GETITEMTEXT = LVM_GETITEMTEXTA

Dim numitems As Long
Dim sItemText As String * 255

'get the number of items in the source list
numitems = SendMessage(sourcehWnd, LVM_GETITEMCOUNT, 0&, ByVal 0&)

'if it has contents, copy the items
If numitems > 0 Then

For c = 0 To numitems - 1
'Call SendMessage(sourcehWnd, LVM_GETITEM, c, ByVal sItemText) 'kommt nix zurück
Call SendMessage(sourcehWnd, LVM_GETITEMTEXT, c, ByVal sItemText) 'stürtzt das ziehlprogramm ab
Call SendMessage(target.hWnd, LB_ADDSTRING, 0&, ByVal sItemText)
Next

End If

'get the number of items in the target list
'and return that as the function value
numitems = SendMessage(target.hWnd, LB_GETCOUNT, 0&, ByVal 0&)

CopyExListToList = numitems

End Function
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
syslistview32 eines anderen Programms auslesen probleme8.007Maddin7330.11.03 22:51
Re: syslistview32 eines anderen Programms auslesen probleme3.606Jojo17.01.04 09:21
Re: syslistview32 eines anderen Programms auslesen probleme4.028Jojo23.01.04 18:59
Re: syslistview32 eines anderen Programms auslesen probleme3.530Maddin7325.01.04 13:39
Re: syslistview32 eines anderen Programms auslesen prob...5.000Jojo25.01.04 09:59
Re: Re: syslistview32 eines anderen Programms auslesen ...3.776MathImagics26.02.04 21:09

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

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 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