procedure TForm1.ComboBox1KeyDown(Sender: TObject;
var Key: Word;
Shift: TShiftState);
begin
abort;
end;
procedure TForm1.ComboBox1KeyPress(Sender: TObject;
var Key: Char);
begin
abort;
end;
procedure TForm1.ComboBox1KeyUp(Sender: TObject;
var Key: Word;
Shift: TShiftState);
begin
abort;
end;
