Составные типы

[thourie]

Помогите пожалуйста! Крайняя заставила использовать в своей программе составные типы! Но видимо я разгневал небеса, и компилятор выдаёт дивную ошибку: типа я мол такого не знаю и знать не хочу!

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

Dim Vec3l() As ULong = New ULong(3) {}
Dim v As Vec3l

Помогите кто чем может! Сами мы не местные!

[MIT]

Объявить переменную таким образом невозможно.
Как вариант - создай структуру с необходимым полем.

З.Ы.: И удали вторую такую же тему, а то щас придут злые модераторы и будут ругацца

[thourie]

Собственно первую строчку я не сам придумал списал с RSDN там всё так красиво написано и похоже на правду!

[MIT]

Так и в чем проблема?

[thourie]

Проблема в том что он его в упор не видит, хотя в самом объявлении моего составного типа ошибки не выдаёт! Дословно: Ошибка Тип "Vec3l" не определен. Эта ошибка выскакивает при объявлении переменной моего типа!

[MIT]

Типы (а точнее структуры) задаются не так.
Кодом Dim Vec3l() As ULong = New ULong(3) {} ты создаешь переменную-массив типа Uint64
Что бы создать свою структуру пишем по аналогии с:

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

Public Structure SomeType
  Dim value as integer
  Dim intex as integer
  etc...
End Structure

И уже потом объявлять переменные своего типа: Dim MyVar as SomeType

[thourie]

Да, это понятно! Так можно и класс объявить или объединение! Но мне нужен именно свой тип, я за этику кода! Ведь наверняка есть в языке нужный оператор который должен работать, а иначе на фиг надо. Вся проблема в том что не знаю как его найти!

[MIT]

Но мне нужен именно свой тип

Ммм... А зачем?
Чего ты хочешь добиться?

[thourie]

Типа:

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

Num = 0..9;
m: num;

[MIT]

М-да.

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

        Dim MyArr1() As Integer = New Integer() {0, 1, 2, 3, 4, 5, 6, 7, 8, 9}

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

        Dim MyArr2(9) As Integer
        MyArr2 = New Integer() {0, 1, 2, 3, 4, 5, 6, 7, 8, 9}

Оно?

[Viper]

Типа:

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

Num = 0..9;
m: num;

Перечисление? Ключевое слово Enum.

[thourie]

Спасибо конечно, но это всё немного не то. Приведённые примеры это переменные типа Integer, а мне нужно свой тип что бы я мог объявить любое количество переменных!
Кстати, между нами девочками, перечисления это константы!

Придётся свой класс писать!

[MIT]

Приведённые примеры это переменные типа Integer, а мне нужно свой тип что бы я мог объявить любое количество переменных!

Как-то ты странно изъясняешься. Тип с любым количеством переменных я тебе, вроде как показывал:

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

Public Structure SomeType
  Dim value as integer
  Dim intex as integer
  Dim data1() as string
  Dim EVal as MySomeEmun
  etc...
End Structure
Dim MyArr() as SomeType


Если и на этот раз я не угодал, но как можно конструктивнее объясни задачу.

[thourie]

Да нет же. Я хочу сделать тип на пример хранящий только цифры! 0..9. И объявить много переменных этого типа, а не один тип со многими переменными, как структура! Understand me!

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

a, b, c As TNum

[MIT]

Надеюсь, что сейчас я тебя понял
Тебе нужен тип, в котором числовое значение может лежать в указанном диапазоне? Т.е. тип, значения которого предопределены?.. Т.е. Enum.

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

Public Emun MyEnum as integer
  1
  2
  3
  4
  5
  6
  7
  8
  9
  0
End Enum

Если я и опять не понял, то пойду убьюсь апстену.

[thourie]

Нет! Убивать себя не надо, сломаешь стену! А она может пригодиться для кого-нибудь другого, кому это действительно нужно!
Дело не в конкретной реализации конкретного кода, а в принципе: есть в Васике такая возможность (определять свои типы) или нет! Просто (да/нет) Нет ну и хрен с ним (с Васиком)!

[thourie]

Но если приспичит вот видео урок:
http://vkontakte.ru/video6199621_90931183

[iGrok]

Я правильно понимаю, что дельфя при объявлении Num: 0..9 создаёт тип "Num", после чего переменные такого типа могут принимать только значения от 0 до 9? А что происходит при присвоении такой переменной значения "a" или, к примеру, 101 ?
Компилятор ругается?

Если я всё правильно понял, тут такого нет.

[MIT]

[thourie]

А жаль! Что касается Delphi то компилятор ругаться не может (в данном случае), по скольку не знает что введут. А при вводе некорректного числа выскочит стандартный Exeption, и на валяет всем по первое, что бы повадно не было!

[iGrok]

А жаль! Что касается Delphi то компилятор ругаться не может (в данном случае), по скольку не знает что введут. А при вводе некорректного числа выскочит стандартный Exeption, и на валяет всем по первое, что бы повадно не было!

А. Тогда понятно. А потом этот самый Exception ты отлавливаешь и развлекаешься с ним как тебе вздумается?
Ну тогда, как вариант, делать проверку вручную после ввода/присвоения..

[Viper]

Аффтар, йаду пить не нада, апстену сибя убивать тоже! Но тебе надо объявить таки Enum! Это конечно не аналог дельфийской штуки, но задачу решит.
Как то так

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

Enum Num
Zero=0
One=1
Two=2
End Enum

Далее в коде ты можешь использовать этот тип (Num то есть) любым способом, то есть объявлять переменные этого типа, использовать его как аргументы или возвращаемые значения функций и так далее.

[iGrok]

...штуки, но задачу решит...

Ну я не сказал бы, что Enum так уж прямо и решит его задачу.
Enum, по сути, только облегчает труд программиста, предлагая список значений подстановки при присвоении значения переменной, или вызове функции.

А ему надо, чтобы в рантайме при присвоении переменной значения, не входящего в объявленный диапазон, валился Exception, который можно перехватить и обработать. Получается, это несколько упрощает проверку пользовательского ввода. Но без этого спокойно можно обойтись, делая проверку после ввода "руками"..

[Viper]

Так проверить значение на вхождение в диапазон можно статическим методом [Enum].IsDefined. Попроще будет, чем вручную то. Пример:

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

Enum Num
    One = 1
    Two = 2
    Three = 3
End Enum
Sub Main()
    Console.WriteLine([Enum].IsDefined(GetType(Num), 2))
    Console.WriteLine([Enum].IsDefined(GetType(Num), 6))
End Sub

[iGrok]

Так проверить значение на вхождение в диапазон можно статическим методом [Enum].IsDefined. Попроще будет, чем вручную то.

Блин, я опять не заметил в заголовке строки ".NET" =)
Ну раз так, то это задачу неплохо облегчает. )