WVB_GetEon1 = aflist1 sagt dir ob der aufruf Erfolgreich war.
Nicht mehr und nicht weniger.
Er gibt dir also BOOL zurück oder ?
Ist der aufruf erfolgreich dann bekommst du über die 'var' Parameter
die eigenschaften (werte) zurückgeliefert.
Von diesen
Delphi-Quellcode:
pieon1 = tpieon1
ptyeon1 = tptyeon1
taeon1 = ttaeon1
pseon1 = Left(pseontemp, 8)
deshalb sind sie ja auch als var declariert.
EDIT:
Deaktiviere doch einfach mal im VB Sample die schleife dann wirst sehn ob es noch funktioniert.
gruss Emil