[[Caral]]

Hola
Un poco diferente, para mi mas legible.

Código Delphi [-]
case ComboBox1.ItemIndex of
     0 : begin  //efectivo
          edit18.SetFocus; 
          edit17.Enabled:=true;
         end;
     1 : begin //targeta
          combobox2.Enabled:=true;
          edit18.Enabled:=false;
          edit17.Enabled:=false;
         end;
     2 : begin //cheke
          combobox3.Enabled:=true;
          edit18.Enabled:=false;
          edit17.Enabled:=false;
         end;

Saludos