String zu Cardinal

[Dani]

Delphi-Quellcode:

case Combobox1.ItemIndex of
 0: LogBrush.lbStyle := BS_SOLID;
 1: LogBrush.lbStyle := BS_CLEAR; 
 2: LogBrush.lbStyle := BS_IRGENDWAS;
 {...}
 else
  {...};
end;

Mit StrToInt kannst du nicht die vom Editor verwendeten Namen von Konstanten in die entsprechenden Werte umwandeln. StrToInt liefert nur Integers aus Hexwert-Strings (z.B. '$AAF02') und Zahlen-Strings (z.B. '1234567').

Du könntest natürlich auch eine Komponente von TCombobox ableiten, die mit den Items verknüpfte Cardinal-Werte als Eigenschaft besitzt.