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:
Código:
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