Hi,
das Beispiel war schon richtig. Du musst jetzt zB FLAGSTOP als 0 und FLAGPAUSE als 1, FLAGRESTART als 2 etc ansehen..
In deinem Array kannst du jedem dieser Werte 0 oder 1 zuweisen. Ein Array of boolean wäre dazu sogar noch besser geeignet, wenn du die Zahlen vorher als const definierst sieht es zudem noch schön aus:
Delphi-Quellcode:
const
FLAGRESTART: integer = 0;
FLAGPAUSE: integer = 1;
FLAGSTOP: integer = 2;
procedure Test;
var flags:array[0..10] of boolean;
c:integer;
begin
flags[FLAGRESTART]:=true; // restart auf true setzen (=1)
flags[FLAGPAUSE]:=false; // pause auf false setzen (=0)
for c:=0 to 10 do
if (flags[c]) then
ShowMessage('flag '+IntToStr(c)+' ist gesetzt')
else ShowMessage('flag '+IntToStr(c)+' ist nicht gesetzt');
end;
Eventuell solltest du dir mal ein paar Grundlagen-Tutorials ansehen
cu