OnChange Ereigniss in eine Combobox/Listbox legen

[marabu]

Moin,

ich glaube Markus meinte in Beitrag #7 eher sowas:

Delphi-Quellcode:

procedure TDemoForm.ComboBoxChange(Sender: TObject);
begin
  case ComboBox.ItemIndex of
    0: Edit.OnKeyPress := EditKeyPressIntOnly;
    1: Edit.OnKeyPress := EditKeyPressRealOnly;
    else Edit.OnKeyPress := nil;
  end;
end;

Freundliche Grüße