lpDependencies in QUERY_SERVICE_CONFIG

[Dalai]

Ein freundliches Hallo in die Runde ,

leider hab ich schon wieder ein Problem. Diesmal geht's um die Deklaration der Datenstruktur QUERY_SERVICE_CONFIG. Dort gibt es lpDependencies als LPTSTR (PChar in Delphi), das laut MS null-separierte Elemente enthalten kann/soll:

Zitat:

A pointer to an array of null-separated names of services or load ordering groups that must start before this service. The array is doubly null-terminated.

Wie kommt man an die Elemente nach dem ersten ran, wenn doch nach dem ersten Nullbyte aufgehört wird, zu lesen? Auf dieser Seite wird die Sache für VB6 beleuchtet, was ich aber leider mangels Kenntnissen in VB nicht so wirklich verarbeiten kann.

Kann mich jemand erleuchten?

MfG Dalai

[himitsu]

Indem man keine Kopierfunktion benutzt, welche beim #0 aufhört.
Einige APIs arbeiten mit einem zusätzlichen Parameter für die Länge,
oder man greift Zeichen für Zeichen darauf zu und verwendet dabei ebenfalls eine Längenangabe und nicht die #0 für's Ende.

[Dalai]

Zitat von himitsu:

Einige APIs arbeiten mit einem zusätzlichen Parameter für die Länge,

Und welche Länge sollte ich deiner Meinung nach benutzen? Ich kenne sie doch vorher nicht.

MfG Dalai

[himitsu]

Im Grunde steht alles in der Beschreibung.

Zitat:

A pointer to an array of null-separated names of services or load ordering groups that must start before this service. The array is doubly null-terminated

Es gibt da jetzt mehrere Wege das auszulesen.
Entweder man sucht die Doppel-0 (#0#0 ), oder man such den "leeren" String ('' ).

• #0#0 suchen und bis dahin auslesen
• einen String nach dem Anderem auslesen (jeweils bei #0 aufhören)
  und der letzte String ist demnach leer, da sofort wieder die entgültig abschließende #0 kommt.

[Dalai]

OK, also ist der Weg, den ich in diesem niederländischen Forum gefunden habe, gar nicht so verkehrt.

Momentan benutze ich dies:

Delphi-Quellcode:

var Buffer: PQueryServiceConfig;
    deplist: PChar;

deplist:= Buffer^.lpDependencies;
if Assigned(deplist) then
begin
  while deplist[0] <> #0 do
  begin
    if deplist <> '' then
      FDependencies.Add(deplist);
    Inc(deplist, StrLen(deplist) + 1)
  end;
end;

FDependencies ist eine TStringList.

Aber wie ist die Situation mit PWideChar (Buffer: PQueryServiceConfigW; ) und Aufruf der entsprechenden Funktion QueryServiceConfigW? Werden die PWideChars nicht bereits mit doppeltem #0 abgeschlossen? Nicht dass ich das im Delphi 5 brauchen würde, ich frag nur interessehalber.

MfG Dalai