Ответить

А вот к стати, тут в PB пример есть:
C:\PBWin70\Samples\VB32\Sort VB Array

Ответить

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

Ответить

Ответить

Незнаю, работал только в С (слегка) и в VB, дык в C строки это двумерный массив байт Тут же вообще непойми что... Ладно, может потом сам дойду

Ответить

To CyRax : Не думаю, что развратил меня VB. Не успел ещё. Я полгода назад ещё не знал, как инсталлировать программы на комп, потому что никогда им до этого не пользовался. Если интересно, посмотри, когда было моё первое сообщение на форуме VBNet. И мне действительно непонятно, почему вот такой код в DLL отправляет IDE к некоторой матери:
FUNCTION SortArrDescend ALIAS "SortArrDescend" _
    (MyArray AS LONG, BYVAL ArrLen AS LONG) EXPORT AS LONG
    DIM xPtr AS LONG POINTER
    DIM i AS LONG
    DIM sss&
    MSGBOX STR$(ArrLen&
    FOR i& = 0 TO ArrLen& - 1
        sss& = sss& + @xPtr[i&]
    NEXT
    MSGBOX STR$(i&
    'FUNCTION = 1
END FUNCTION
Причём, ОБА msgbox'а отрабатывают. После второго ничего нет. Почему она не возвращается? Хотя вчера она же возвращалась без проблем. Вызывается из IDE так:
Private Declare Function SortArrDescend Lib "A.dll" (MyArray As Long, ByVal ArrLen As Long) As Long
Dim Arr() as Long
Redim Arr(1 To 1000)
For i = 1 To 1000
Arr(i)=RND*1000
Next i
SortArrDescend Arr(1), ByVal UBound(Arr())

To Sne: Да, я видел этот пример. А строковая ф-ция там вызывается и сортирует нормально, я пробовал, сделал так и сортируется по алфавиту:
   For x = 1 To 12
      a(x) = MonthName(x)
   Next x
   SortString a()

Ответить

Ответить

Нет, еще не разобрался, попросту я вот тут думаю либо ctl создать на VB или dll на PB... Ну для свойств выпадающих, если знать как строковые значения пересылать, то можно бб и на PB такую штуку сотворить... Тем более что имеется пример прорисовки ListBox...

Ответить

Ответить

cresta, если ты не заметил, то это я и оставлял:

C:\PBWin70\Samples\VB32\Sort VB Array

А туды я конечно же заглянул, но мне не очень то понравилось использовать для этого сторонние АПИ, если можно средствами PB все это сделать... Ну очень хочется

Ответить

Ответить

К сожалению из за несовместимости способов хранения строк ты не сможешь этого сделать без АПИ.

А то что написано в Help'е и есть средства PB. Я думаю разработчики BP потратили много времени что бы упростить работу с одним из главных типов данных - строкой. Не забывай что ПБ - компилятор и никакая интерпитация неуместна.

Чем они тебе не нравятся. Просто стиль написания или то что это делается через API?

Ответить

Обидно... Ладно, теперь можно переходить к UserType массивам

Будем работать через АПИ, попросту хотелось встроеными функциями...

Ответить

2 sne

Почему это они вдруг сторонние. Там же в заголовке написано

'  Copyright (C) 1997,1999,2002 PowerBASIC, Inc.
'  Some portions Copyright (C) 1994 Microsoft Corporation

Ответить

Да не в том дело, сторонние, не сторонние, поставлен там КопиРайт, аль нет его, попросту ведь в VB есть функция MsgBox, и все пользуют ее, а не декларируют MessageBoxA, вот и мне попросту хотелось использовать встроеные функции языка... Ну да ладно, я посмотрел, те АПИ есть уже с 95-го... Хотя если честно, такие названия вижу впервые

Ответить