Registriert seit: 27. Nov 2017
2.490 Beiträge
Delphi 7 Professional
|
AW: einen Datensatzmitgliedsnamen dynamisch zuweisen
6. Jul 2022, 19:47
Ginge es eventuell auch so?
Delphi-Quellcode:
var
ini : TBasicSettings;
begin
case group of
'A' : ini := ini.basic.A;
'B' : ini := ini.basic.B;
end;
case AnsiIndexText(pars[0], ['path', 'first_frame', 'end_frame', 'first_filename', 'check_if_files_exist']) of
// Wenn pars[0] immer in Kleinbuchstaben vorliegt, ginge auch
// case AnsiIndexStr(pars[0], ['path', 'first_frame', 'end_frame', 'first_filename', 'check_if_files_exist']) of
// das spart dann auch noch die Verpflichtung,
// beim Vergleich nicht zwischen Groß- und Kleinschreibung zu unterscheiden.
0: ini.path := pars[1];
1: ini.first := pars[1];
2: ini.last := pars[1];
3: ini.start_name := pars[1];
4: ini.check_files_exist := true;
end;
end;
|
|
Zitat
|