PChar Structure in PureBasic

[Green Snake]

Hab mal diesen Code geschrieben...So richtig?

[Edit]
Hab ich PChar richtig interpretiert?
[/Edit]

Code: Alles auswählen

Structure DiskInfo
  FirmwareRev.l
  SerialNumber.l
  ModalNumber.l
  ECCByte.l
  Heads.l
  Sectors.l
  LBASector.l
  Bytes_Sector.l
EndStructure

If OpenLibrary(0,"getide.dll")
  Prototype.l pt_Info(Drive.b,*Disk.DiskInfo) 
  Global Info.pt_Info = GetFunction(0,"info")
EndIf

Define Disk.DiskInfo

Info(0,@Disk)
Debug PeekS(Disk\FirmwareRev)
Debug PeekS(Disk\SerialNumber)
Debug PeekS(Disk\ModalNumber)
Debug PeekS(Disk\ECCByte)
Debug PeekS(Disk\Heads)
Debug PeekS(Disk\Sectors)
Debug PeekS(Disk\LBASector)
Debug PeekS(Disk\Bytes_Sector)

[edel]

So gehts bei mir :

Code: Alles auswählen

Structure DiskInfo
  FirmwareRev.s
  SerialNumber.s
  ModalNumber.s
  ECCByte.s
  Heads.s
  Sectors.s
  LBASector.s
  Bytes_Sector.s
EndStructure 

Prototype info(drive.b,*info)
OpenLibrary(0,"getide.dll")

Info.info = GetFunction(0,"info")

di.DiskInfo
info(0,di)

Debug di\FirmwareRev.s      
Debug di\SerialNumber.s
Debug di\ModalNumber.s
Debug di\ECCByte.s
Debug di\Heads.s
Debug di\Sectors.s
Debug di\LBASector.s
Debug di\Bytes_Sector.s

UZ100-03
S0BKJ1GYC01637
SAMSUNG SP1634N
4
16
63
268435455
554

[Green Snake]

Warum muss ich immer den komplizierteren Weg einschlagen?

[Kaeru Gaman]

öh...
importiert er denn bei dir die string korrekt?
reserviert er speicher?
wenn ich nur longs reserviere, kann er zwar die pointer reinpacken,
aber verwaltet er auch die strings, die dazugehören?

[legion]

Mit dem direkten Aufruf der Dll funktioniert es !
Danke ! ! ! ! ! !

Warum es mit der importierten Lib nicht funktioniert kann ich auch schon sagen. Das Schlüsselwort "Info_" ist von einer anderen Lib bereits belegt.
Das bedeutet, dass eine andere Lib dabei aufgerufen wird und die hat naturlich andere Parameter !

Fragt sich nur, wie ändert man den Aufruf in einer Dll ?