[marto]

Con todos los respetos, pero creo que declarar una clase que hereda de TComboBox en la unit para poder acceder al método protected Selectitem, no es, precisamente demsiado "metódico "*. Máxime, cuando emularlo desde fuera es tan sencillo como:

var 
  i: Integer;
begin
  i := 0;
  while (i < Combo.Items.Count) and (Copy(Combo.Items[i], 1, 3) <> ValorABuscar) do
	Inc(i);
  if (i < Combo.Items.Count) then
	Combo.ItemIndex := i;
end;

Este código, no lo he probado porque no tengo aquí el Delphi, pero juraría que funciona "tal cual".


*Por supuesto que lo que es o no metódico es totalmente subjetivo