IRC-Client/IdIRC/ Op Voice anzeigen

[pk910]

hallo

ich habe diesen codeschnipsel dazu gefunden:

Delphi-Quellcode:

var c,i: Integer;
str: String

//...

c:= Integer(AChannel.Names.Objects[i]);
case c of
0: str:= '';
1: str:= '@';
2: str:= '+';
3: str:= '@';
end;

//...