Forum: Object-Pascal / Delphi-Language
Delphi
by s.h.a.r.k,
9. Apr 2009
das wird wohl nicht funktionieren, da man ja auch folgendes machen kann:
// copy & paste =)
type
TFontStyle = (fsBold=0, fsItalic=1, fsStrikeOut=6, fsUnderline=7);
Forum: Object-Pascal / Delphi-Language
Delphi
by s.h.a.r.k,
8. Apr 2009
soweit ich weiß sind ja max. 256 elemente möglich, aber das bringt uns hierbei auch nur bedingt weiter.
eine möglichkeit wäre es, eigenständig darüber zu iterrieren und von mir aus einen counter zu erhöhen, aber das klingt mir eher nach einer quick & dirty variante...
procedure Test(const Styles: TFontStyles);
var
i : Integer;
len : Integer;
begin
{ ... }