Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by marabu,
17. Aug 2006
Hallo Onkelrossie,
für mich hast du immer noch ein Gruppenwechselproblem. Ich habe meinen Code aus Beitrag #2 etwas verallgemeinert, so dass er auch mehrstufige Gruppenwechsel erkennen kann:
function GroupStr(li: TListItem; wda: array of Word): String;
var
i: Integer;
begin
with TStringList.Create do
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by marabu,
13. Aug 2006
Guten Morgen,
vielleicht musst du noch eine Kleinigkeit anpassen, aber vom Prinzip her sollte es so funktionieren:
procedure ExtractGroups(li: TListItems; index: Word; s: TStrings);
var
i: Integer;
sGroup, sTest: String;
begin