다음처럼 해보세요.
RunQuery.Open;
     SystemComboBox.DropDownCount := RunQuery.RecordCount;
     try
        RunQuery.First;
        while not RunQuery.EOF do
        begin
             SystemComboBox.Items.Add(RunQuery.FieldByName('SERVERCODE').Value);
             RunQuery.Next;
        end;
     finally
        RunQuery.Close;
     end;
     SystemComboBox.ItemIndex := 0;
     SystemComboBox.Text := SystemComboBox.Items[SystemComboBox.ItemIndex];
이것은 제가 사용했던 소스의 일부분입니다...
좋은 프로그램 되시길...