Statt
Delphi-Quellcode:
var i:integer;
begin
for I := integer(Low(tDockopt_UA)) to integer(High(tDockopt_UA)) do
begin
if tDockopt_UA(i) in opts then
würde ich eine passend typisierte Schleifenvariable nehmen, also:
Delphi-Quellcode:
var
opt: tDockopt_UA;
begin
for opt := Low(tDockopt_UA) to High(tDockopt_UA) do
begin
if opt in opts then