List und Combobox

[JoelH]

Delphi-Quellcode:

  case Listbox1.itemindex of
    0: Begin
         Showmessage('Du bist ein Mann');
         buttonmann.visible := true;
         buttonFrau.visible := false;
       end;
    1: begin
        showmessage('Du bist eine Frau');
        buttonmann.visible := false;
        buttonFrau.visible := true; 
       end;
  end;