Ergebnis der Suchanfrage

• Forum: Win32/Win64 API (native code)

  AW: TDirectory.GetLogicalDrives

   
    by hoika, 18. Nov 2020
  Hallo,
  mir ging es eher um das StrEnd statt StrLen.
  Ich glaube der Buffer entspricht nicht Vorgaben.
  Aber mit einer lokalen Variable für StrLen ähnlich dem JEDI-Code sollte das rauszufinden sein.
  Und wenn das noch schön reproduzierbar ist, sollte der Fehler schnell zu finden sein.
  
  PS: Mein JEDI ist schon ziemlich alt.
  Viell. wurdeder String-TypeCastbschon gefixt, falls es ein Fehler...
• Forum: Win32/Win64 API (native code)

  AW: TDirectory.GetLogicalDrives

   
    by hoika, 17. Nov 2020
  Halo,
  ich poste hier mal den JEDI-Code.
  
  procedure MultiSzToStrings(const Dest: TAnsiStrings; const Source: PMultiSz);
  var
  P: PMultiSz;
  begin
  Assert(Dest <> nil);
  Dest.BeginUpdate;
  try