PChar zu String - Beispiel ? [beginner]

[myicq]

Hallo,

ich muss eine interface zu eine DLL erweitern. Ich weiss so etwa was zu tun, aber an eine Stelle stehe ich fest.

In meine DLL Header:

Code:

// C-Style LPCSTR Array
type
   PCharArray = packed Array [0..$fff] of PChar;
type
   pPCharArray = ^PCharArray;

Function BCGetCDList_Imp():pPCharArray; external 'TBarCode11.dll' name 'BCGetCDListA';

Und jetzt möchte ich gern das Array anzeigen.

Ich mache deshalb

Code:

var
  MyCheckDigits: pPCharArray;
begin
   MyCheckDigits := BCGetCDList_Imp;
end;

Wie kann ich nun pPCharArray durchlaufen und die werte anzeigen ?
Ich bin bei PChar gestoppt und komme nicht weiter.

Hat jemand eine *einfache* Beispiel ?

[Neutral General]

einfach durchlaufen:

Delphi-Quellcode:

for i:= 0 to High(MyCheckDigits^) do
begin
  if (Assigned(MyCheckDigits^[i])) then
    ShowMessage(MyCheckDigits^[i]); // Cast auf String kann man zusätzlich machen, Delphi sollte das aber implizit konvertieren
end;