From VB6 in VB5

[Dummiel]

По определенным причинами нужно прогу, написанную на VB6 перевести и скомпилировать в VB5.
А как? Это сильно сложно?

[Antonariy]

Нет. Просто создай новый проект в VB5 и перенеси все модули. По идее можно и новый проект не создавать, достаточно в *.vbp стереть пару строк, которые не понимает 5й, но я не помню каких. Помню, они находятся в конце файла. Структуры форм, классов и т.п. одинаковые. Некоторые стандартные функции в 5м отсутствуют, например Replace. Вобщем, скомпилируй, и сам все увидишь.

[alibek]

Replace это фигня.
А вот отсуствие AddressOf и невозможность юзать публичные типы это гораздо хуже.

[Dummiel]

Спасибо, попробую.
Пректик у меня без наворотов, так что, думаю, получится.

[GB826]

Retained=0
удалить, кажется

[tyomitch]

Replace это фигня.
А вот отсуствие AddressOf и невозможность юзать публичные типы это гораздо хуже.

И AddressOf, и возможность юзать публичные типы в VB5 были. Ты с VB4 не путаешь?

[Viper]

В VB5 результ действия AddressOf нельзя было присвоить переменной, а только передать в API-функцию

[alibek]

Ее и в VB6 нельзя передать в переменную, только использовать обертку типа FnPtr. Я с VB5 общался довольно давно, может быть и ошибаюсь. Но вот насчет публичных типов только пару недель назад кто-то с подобной проблемой писал на форум, у него не получалось публичные типы использовать.

[Antonariy]

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

[Antonariy]

GB826, точно, Retained. Оно относится к ActiveX EXE, которые 5й не умеет создавать.

[tyomitch]

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

Он пытался объявлять, а не использовать. Объявлять, значит, было нельзя.

GB826, точно, Retained. Оно относится к ActiveX EXE, которые 5й не умеет создавать.

Умеет. Чесслово

[Viper]

Ее и в VB6 нельзя передать в переменную, только использовать обертку типа FnPtr. Я с VB5 общался довольно давно, может быть и ошибаюсь.

Вернее так. В VB5 результат AddressOf можно было передать только в API-функцию, а а в VB6 можно в свою функцию-обертку

[tyomitch]

Ее и в VB6 нельзя передать в переменную, только использовать обертку типа FnPtr. Я с VB5 общался довольно давно, может быть и ошибаюсь.

Вернее так. В VB5 результат AddressOf можно было передать только в API-функцию, а а в VB6 можно в свою функцию-обертку

В VB5 тоже можно было в обёртку.
С чего вы вообще взяли, что семантика AddressOf как-то поменялась?

[Viper]

VB5 бы найти щас, но что-то с AddressOf при переходе от VB5 к VB6 поменялось. Что поменялось помню, а вот что?

[tyomitch]

Только что поставил VB5 и проверил:

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

Option Explicit

Sub Main()
MsgBox f(AddressOf f)
End Sub

Function f(ByVal l As Long)
f = l
End Function


Работает.

ActiveX EXE есть. Могу приаттачить

UDT из TLB читаются -- они есть, например, в stdole.

Ещё возражения?

[Antonariy]

Как сейчас помню - части проектов в вб5 не хватало. Хотя может это были шаблоны?