условное компилирование в перечислении

[HiMik2003]

Что означает сие:

Код: Выделить всё

Public Enum eCompare
    Lesser = -1&
    Equal = 0&
    Greater = 1&
    #If False Then
        Dim Lesser, Equal, Greater
    #End If
End Enum

Будет ли когда-то выполнятся инструкция Dim ...


Найдено в хорошем примере сортировки здесь (http://www.Planet-Source-Code.com/vb/sc ... 1&lngWId=1)

[Konst_One]

Код: Выделить всё

#Const MyFalse=-1

    #If MyFalse Then
        Dim Lesser as Boolean, Equal as Boolean, Greater  as Boolean
    #else
Public Enum eCompare
    Lesser = -1&
    Equal = 0&
    Greater = 1&
End Enum
    #End If

[Viper]

1. Выполнятся Dim в ентом коде никогда не будет
2. И хорошо, что не будет, а то Dim внутри перечисления выглядит по меньшей мере странно
3. Возможно тот, кто писал сей исходний имел ввиду то что написал Konst_One, а может и нет... Кто знает ход чьих то мыслей... Возможно здесь условная компиляция была использована вместо комментариев... мало ли

[hCORe]

Пару раз где-то видел... Это такой ловкий трюк для сохранения регистра названий внутри Enum.

Возьмем для примера такой Enum:

Код: Выделить всё

Private Enum eSys
    sysWindows = 1
    sysLinux
End Enum

Допишем код:

Код: Выделить всё

Public Sub Main()
    Dim f As eSys
    f = sysWINDOWS
End Sub

В итоге IDE поступит "умно":

Код: Выделить всё

Private Enum eSys
    sysWINDOWS = 1
    sysLinux
End Enum

Такую глупость можно убрать при помощи трюка из 1 поста.

[Konst_One]

прикольно, однако
никогда не заморачивался на эту тему

[hCORe]

Я тоже, но особо извращенных эстетов коробит

[HiMik2003]

Большое спасибо за ответы
Теперь понятно. Интересно, что после убирания условной конструкции IDE (до перезагрузки проекта) "помнит" о ней и препятствует изменению регистра в названии константы перечисления...
Похоже, инструкция "Dim" учитывается только при редактировании в IDE и, конечно, игнорируется при интерпретации/компиляции.(т.к. "If False" - никогда не сработает)

Вообщем, фишка полезная. Хотя лично я крайне редко указываю константы перечисления, набивая их с клавы.