ComboBox mit mehreren Spalten?

[SirThornberry]

so Legt man ein (bzw. 3) Item(s) mit dazugehöriger PersonalNummer an

Delphi-Quellcode:

var LPersonalnummer: String;
begin
  LPersonalnummer := 'Personalnummer 3094d';
  Combobox1.Items.AddObject('Hansmüller', TObject(LPersonalnummer));

  LPersonalnummer := 'Personalnummer 394d0';
  Combobox1.Items.AddObject('Fritz walter', TObject(LPersonalnummer));

  LPersonalnummer := 'Personalnummer 08173';
  Combobox1.Items.AddObject('Max mustermann', TObject(LPersonalnummer));

Uns so lässt du dir die personalnummer von dem ausgewählten Item anzeigen
  showmessage(String(Combobox1.Items.Objects[ComboBox1.ItemIndex]));