Ergebnis der Suchanfrage

• Forum: Win32/Win64 API (native code)

  AW: Live Stichwortsuche

    Delphi
    by DeddyH, 27. Feb 2014
  Da war noch ein anderer Denkfehler drin: mehrere Trennzeichen hintereinander oder nur Trennzeichen im String sollten IMO ignoriert werden. Das sieht nun so aus:
  type
  TDynStringArray = array of string;
  
  function StrToArray(const InputStr: string): TDynStringArray;
  var
  PLast, PCurrent: PChar;
  s: string;
  ArrayIndex: integer;
  begin
• Forum: Win32/Win64 API (native code)

  AW: Live Stichwortsuche

    Delphi
    by DeddyH, 26. Feb 2014
  Ähnlich habe ich das auch gerade umgesetzt (nur ohne Generics):
  type
  TDynStringArray = array of string;
  
  function StrToArray(const InputStr: string): TDynStringArray;
  var
  PLast, PCurrent: PChar;
  s: string;
  ArrayIndex: integer;
  begin
• Forum: Win32/Win64 API (native code)

  AW: Live Stichwortsuche

    Delphi
    by DeddyH, 24. Feb 2014
  Und Du wirst schon 2 Stringlisten brauchen, wenn Du nicht nach jedem Verkleinern des Filters alles neu abrufen willst. Ich denke da an so etwas (Sir Rufos Vorschlag gleich mit übernommen):
  procedure FilterItems(const SrcList, DestList: TStrings; const substr: array of string);
  var
  Line, SearchwordIndex: integer;
  Containing: Boolean;
  begin
  Assert(Assigned(SrcList), 'Keine gültige...