Динамические Массивы

[Wild VB Code for Food]

Вот такой вопрос....возможно ламерский....возможно нет

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

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

Private Type client
    idM As Long
    idT As Long
    file As Long
    filename As String
    sessionId As Long
    remoteip As String
    mode As state
    length As Long
    received As Long
    packets As Long
End Type

Private Enum state
     none = 0
     connected = 1
     sesid = -1
     hello = 2
     start = 3
     datastart = 4
     dataend = 5
     endheader = 6
End Enum

   
Dim Clients() As client


скажем какой-то юзер завершил свои тёмные дела, и ушёл.. сокеты отсоеденились. мне надо стереть элемент в массиве, которому соответствует этот пользователь, так чтобы idы сдивинулись вниз

те:
был clients(3), он ушёл, надо стереть(выгрузить из памяти) и сдвинуть вниз, те живого clients(4) сдвинуть на clients(3).....давно мучаюсь с этим. Просто сильно приспичело..

[GSerg]

Коллекцию возьми и перестань мучаться...

[Wild VB Code for Food]

А когда на другой язык портировать буду, мне пальцы грызть?

[Sirik]

исаползуй колекцию или так:
i-номер юзера, котрого надо удалить

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

for j=i to Ubound(Clients)-1
      Clients(i)=Clients(i+1)
next
ReDim Preserve Clients(Ubound(Clients)-1)


[alibek]

Если заменишь filename и remoteip на String*n, можно будет использовать CopyMemory для переноса элементов. Но лучше используй коллекцию.

[Wild VB Code for Food]

Sirik
спасибо, тольк должно быть так.

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

for j=i to Ubound(Clients)-1
      Clients([b]j[/b])=Clients([b]j[/b]+1)
next
ReDim Preserve Clients(Ubound(Clients)-1)


[Хакер]

Видимо под словом "коллекция" он понимает MSDN.

Доказательства:

Коллекцию возьми и перестань мучаться...

На что была такая реакция:

MSDN? есть у меня, там этого нету

Либо он противник ООП.

[Sirik]

если колекцию использовать как массив, то это жалкое подобие ООП

[Wild VB Code for Food]

Хакер
Немного ступил, просто любят на форуме посылать RTFM читать, или в поиск.

Да признаюсь, мне легче массивы использовать чем коллекцию (Collection), хотя я о ней знаю.

Просто я пишу сервер, на ВБ, и не использую для хранения всякие Вбшные примочки потомучто, когда буду переписывать ( на CPP или PB), прийдётся долго головой о стол бится.

Ну, да я сторонник двумерностей.

[Sirik]

я сам колекции использую только для работы с классами
не знаю првильно ли, но мне так удобнее

[Matew]

http://vbstreets.ru/VB/Articles/66160.aspx

[Хакер]

Тогда ясно. А мне по душе коллекция. Вот я например писал сетевую проги и был класс клиента, и в классе были объявлены все функции для работы с клиентом и процие полезности.

А в теле User-Defined Type кроме переменных ничего не определить...

[alibek]

А в теле User-Defined Type кроме переменных ничего не определить...

Вообще-то там можно определить Variant. И все, что из этого следует.

[Sirik]

2 alibek:
насколько я знаю тип Variant в .NET не поддерживаеться, поэтому если писать, то желательно, не используя этот тип
вдруг прийдётся переписывать под net

[Хакер]

А в теле User-Defined Type кроме переменных ничего не определить...

Вообще-то там можно определить Variant. И все, что из этого следует.

Я в смысле

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


Type SP_CLIENT
  ClientName as String
  ClientPID as String
  Client_rIP as string
  Client_rHostName as String
  Client_SocketHandle as Long
  Client_QueryCounter as Long
  Client_ErrorCounter as Long

  Sub Disconnect
    GetSocket(.......
    .......
    ......
  End Sub
End Type


Так вот такого не получится, потому что это не класс а структура. И я говорю о преимуществе класса перед структурой. А ты мне говоришь про Variant

[Amed]

Поправка, чтобы быть точным в определениях. Не структура, а тип.

[Wild VB Code for Food]

Хакер
Эко захотел!
Как ты думаешь, зачем придумали классы, а?

А ты хочешь всё в Ю-Д типы запихать.

[Хакер]

Так вот я ему про Фому, а он мне про ... Variant

Классы рулят! Хотя структуры, т.е. типы очень помогают, когда надо чего-нибудь в файл записать.