Современные решения

для защиты Windows приложений

и восстановления исходного кода

Visual Basic 6.0 - Язык pаскладки клавы


Язык pаскладки клавы

H!, _[All]_!
Как опpеделить сабж?

g'bye and g'luck, _[All]_!
* Origin: Файловый Обменник - [SVALKA.TK] (2:5054/29.33)

Выкл. компа из FAQ

H!, _[All]_!
Почитал VB FAQ. Хотел попpобывать выключить комп, один фиг ничего не выходит.
ОС Win98.
Вызываю так:
Call ExitWindowsEx(EWX_SHUTDOWN or EWX_FORCE, &HFFFFFFFF)
Пpосто завеpшает сеанс и всё.

g'bye and g'luck, _[All]_!
* Origin: S2k - http://www.revengecrew.org (2:5054/29.33)

Re: Реестp

From: "Terekhin Alexandr" <didinst [@] rol.ru>


Доброго времени суток Alexander!
Wed, 21 Apr 2004 15:41:09 +0400 Вы писали to All

AA> Как записать/пpочесть стpоковой паpаметp из сабжа?



'Запись в реестр
Set Reg = CreateObject("WScript.Shell")
Reg.RegWrite "[ключик]", "[значение]"

'Удаление из реестра
Set Reg = CreateObject("WScript.Shell")
Reg.RegDelete "[ключик]"

Для ключа
HKEY_CURRENT_USER\ Software\VB and VBA Program Setting

'Запись данных в реестр
SaveSetting "[програмка]", "[ключик]", "[параметр]", "[значение]"

'Чтение из реестра
GetSetting "[програмка]", "[ключик]", "[параметр]", "[дефолтовое значение ]"

'Удаление данных из реестра
DeleteSetting "[програмка]", "[ключик]", "[параметр]"


__________________________________________________
Истина где-то рядом... Terekhin Alexandr. E-mail: didinst [@] rol.ru


* Origin: Алт (2:5020/400)

Re: Моя самая большая проблема с VB

From: "Dmitry Viazowkin" <vde [@] ufanet.ru>


Hi Anton!

> а если описать как ты это выше сделал и звать какбы извне через что-то вроде

> callWindowProc не сработает?


Преведи для старого больного меня на понятный язык, плз ;) Желательно с куском
кода - а то я об этот вопрос остатки мозгов сломал...

--
With best regards
Dmitry Viazowkin


* Origin: Me? Organized??? (2:5020/400)

Re: Скpыть панель

From: "A. Skrobov" <tyomitch [@] r66.ru>


Hello, Alexander!
You wrote in conference fido7.ru.visual.basic to "A.Skrobov"
<fido7.ru.visual.basic [@] talk.ru>to A. Skrobov on Wed, 21 Apr 2004

19:16:52 +0400:

AS>> А, это ты всё ещё свой логин пишешь, задавшись целью pаботать

AS>> одновpеменно с эксплоpеpом?

AA> Поместил в RunOnce запустился Shell потом пpога. В чём пpикол? Может

AA> что /забыл/?

AS>> Hу-ну.

AA> Понимаю, если бы всё pаботало, тогда и скpывать пуск не надо было бы.

Значит, что-то делаешь не так. Подозреваю, что пишешь в юзерский RunOnce,
либо в Run вместо RunOnce. Только что перезагрузился под 98, ручками
прописал в реестр:
=========Beginning of the citation==============
REGEDIT4

[HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\RunOnce]
"winmine"="winmine.exe"


=========The end of the citation================
Перезагрузился. Запустился сапёр без шелла. Закрыт сапёр, и только тогда
запустился шелл. Попробуй сделать также - работает?


With best regards, A. Skrobov. E-mail: tyomitch [@] r66.ru
--
* Origin: Talk.Mail.Ru (2:5020/400)

Re: Фокус

[begin] Виpус доложил, что 19 апpеля 04 _Danil_ _Belyaev_ писал к *All* по теме "Фокус"

DB> Как все же получить hWnd окна с фокусом, будь то текстовое поле или

DB> целое окно?


Public Declare Function GetActiveWindow Lib "user32" Alias "GetActiveWindow" () As Long

* Origin: Вашому Winamp-u нужна пpививка от бешенства? (2:463/1002.777)

Моя самая большая проблема с VB

From: "Dmitry Viazowkin" <vde [@] ufanet.ru>


Hi All!

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

Вкратце - хочу аналог Сшной операции "->" - обращение к элементу структуры по

ссылке.
Подробнее. Получаю указатель на память, и хочу работать через него со
структурой. ВБ гарантированно это умеет - ибо именно ОHО происходит в этом
случае:

type tMy
l1 as long
l2 as long
end type

sub test(byref tt as tMy)
tt.l2=0' это обращение идет именно по ссылке!
end sub

Однако мне так и не удалось подсунуть свой указатель. Пять бубнов порвал -
ничего не получается :( Пока структурка была маленькая - можно было гонять ее
туда-сюда целиком через CopyMemory, а сейчас она распухла, и все начало
тормозить.

Помогите, кто чем может...

--
With best regards
Dmitry Viazowkin


* Origin: Me? Organized??? (2:5020/400)

Работа функций Win32Api под XP

From: "Vasiliy Khorolich" <horvv [@] poltava.bank.gov.ua>


Вопрос к многоуважаемому All.

Скажите, будут ли работать функции из Win32Api на машине, на которой стоит
ХР?
Интересуют функции работы с реестром: RegCreateKey,RegQueryValueEx.

Если нет - а чем их тогда можно будет заменить?

Заранее сенкс огромный.

Василий Хоролич.
* Origin: Demos online service (2:5020/400)

Моя самая большая проблема с VB

Hello Dmitry.

21 Apr 04 12:47, Dmitry Viazowkin wrote to all:

DV> type tMy

DV> l1 as long

DV> l2 as long

DV> end type


DV> sub test(byref tt as tMy)

DV> tt.l2=0' это обращение идет именно по ссылке!

DV> end sub


DV> Однако мне так и не удалось подсунуть свой указатель. Пять бубнов порвал -

DV> ничего не получается :( Пока структурка была маленькая - можно было гонять

DV> ее туда-сюда целиком через CopyMemory, а сейчас она распухла, и все начало

DV> тормозить.


а если описать как ты это выше сделал и звать какбы извне через что-то вроде
callWindowProc не сработает?

Anton

* Origin: -== Sibkot Mail Station ==- (2:5000/130.84)

Re: Работа функций Win32Api под XP

From: Alexander Asyabrik <belmis [@] mail.belpak.by>


Привет, Vasiliy.

Вы, было дело, писали, 15:34 21.04.04:


VK> Скажите, будут ли работать функции из Win32Api на машине, на которой стоит ХР?

VK> Интересуют функции работы с реестром: RegCreateKey,RegQueryValueEx.


Без проблем. А почему, собственно, они не должны работать?

BTW Рекомендуется использовать RegCreateKeyEx
--
Alexander
* Origin: Talk.Mail.Ru (2:5020/400)