Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как понять из кода что я в VB-среде а не в EXE / 5 сообщений из 5, страница 1 из 1
05.05.2010, 17:07
    #36613461
Дмитрий77
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как понять из кода что я в VB-среде а не в EXE
Как понять из кода что я в VB-среде а не в EXE?
Ну т.е. что прога запущена из среды разработки?
IF (IDE)
подними правую руку
IF (exe)
подними левую руку

?
...
Рейтинг: 0 / 0
05.05.2010, 17:11
    #36613479
AndrF
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как понять из кода что я в VB-среде а не в EXE
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Private Declare Function GetModuleFileNameA Lib "kernel32" (ByVal hModule As Long, ByVal lpFileName As String, ByVal nSize As Long) As Long

Public Function IsIDEApp() As Boolean
    Dim s As String *  255 , i As Long
    i = GetModuleFileNameA(App.hInstance, s,  255 )
    IsIDEApp = ( 0  = StrComp(Mid$(s, i -  6 ,  7 ), "Vb6.exe", vbTextCompare))
End Sub
...
Рейтинг: 0 / 0
05.05.2010, 17:39
    #36613577
Как понять из кода что я в VB-среде а не в EXE
Дмитрий77,

Обычно люди пользовались чем-то вроде описанного здесь как "Way 1".
...
Рейтинг: 0 / 0
05.05.2010, 17:46
    #36613593
Дмитрий77
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как понять из кода что я в VB-среде а не в EXE
13-й квартал,
функция выше меня вполне устроит, главно дело чтоб оно случайно не решило что в IDE, когда в exe.
...
Рейтинг: 0 / 0
05.05.2010, 17:47
    #36613599
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как понять из кода что я в VB-среде а не в EXE
уже много раз обсуждали
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как понять из кода что я в VB-среде а не в EXE / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]