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

Си:

typedef void* __stdcall _vbsqlite_callback();

unsigned int __stdcall TryCallBack(unsigned int addr){
_vbsqlite_callback *__vbsqlite_callback = (_vbsqlite_callback*)addr;
__vbsqlite_callback( 666 );
}


Вб:

Public Function Bla(ByVal a As Long)
MsgBox a
End Function

TryCallBack AddressOf Bla


Функция то вызываеться.... но параметр передаеться не верный верней функция в вб ... его не правильно берет из стека вообщем месейдж бокс выдает вообще кривое значение.... после этого программа на вб падает и все тут...

п.с: есть же АПи которые колбек используют там все нормально не знаю какая разница то... кашмар

| Сообщение посчитали полезным:

я не знаю какое соглашение о вызовах у VB, но похоже дело в нем

| Сообщение посчитали полезным:

там STDCALL как нистранно но ведь стандартный АПИ функциии виндовс... которые используют CALLBACK ... работают без ошибок... например таже EnumWindows

| Сообщение посчитали полезным:

Мда .. чуть не застрелился из ЗА СВОЕЙ ЖЕ ОШИБКИ...

Public Function Bla(ByVal a As Long)

эо же функция а я не указал что она возвращает

Public Function Bla(ByVal a As Long) As Long

=)

кашмар счас только обратил внимание.... теперь не падает извеняюсь ... за невнимательность.. и почему компилятор не ругнулся.... сатонинский язык этот VB

| Сообщение посчитали полезным:

Fallout пишет:
и почему компилятор не ругнулся
Потому что в VB функция не обязана что либо возвращать. Если тип возвращаемых данных не указан то можно либо ничего не возвращать, либо возвращать Variant

-----
Никогда не делай то, что возможно. Стремись сделать то что невозможно впринципе!

| Сообщение посчитали полезным:

Хм ну скорее всего "вариант" .... так как для ничего есть же SUB ... то бишь подпрограмма.... а вот как раз если возвращает Variant то там видемо как то хитро сделано...

| Сообщение посчитали полезным: