Nur leider ist die TStringList, bzw. alle Strings-Nachfahren, beim Input, nur auf einen einzelnen String ausgelegt und keine C-Stringliste.
Delphi-Quellcode:
procedure CStringArrayToStringList(const StringArray: String; SL: TStrings);
var
P: PChar;
begin
SL.BeginUpdate;
try
SL.Clear;
P := PChar(StringArray);
if (P^ <> #0) or ((P + 1)^ <> #0) then
repeat
SL.Add(P);
Inc(P, StrLen(P) + 1);
until P = #0;
finally
SL.EndUpdate;
end;
end;
[unnützes Wissen]
die ResourceStrings werden auch so verwaltet ... jeweils 16 in einem solchen StringArray
komisch, bekomme ERROR: Unknown type: 'PChar'
Also wie ich sehe geht es nicht auf diese weise.
Hab versucht mit Pos() gibt auch 0 aus
Ist es möglich alle #0 im string zu löschen? oder auf was anderes zu verändern?