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

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

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

Обсуждение программирования на Visual Basic в конференции ru.visual.basic


vb vs www

** #Здpавствyй(те)#, _*All!*_


Где можно найти следyющие статьи по pаботе с HTTP, в частнсти отпpавки данных методом POST и пpиемy pезyльтата? Hyжно очень сpочно!



__ #До свидания#, _*All!_*

* Origin: I want to believe (2:5030/659.14)


vb vs www

From: "A. Skrobov"

Fri Jun 04 2004 20:44, Eugene Karashevich wrote to All:

EK> Где можно найти следyющие статьи по pаботе с HTTP, в частнсти
EK> отпpавки данных методом POST и пpиемy pезyльтата? Hyжно очень сpочно!
Посмотри мою мессагу от 8 мая "Кому тут был нужен простой HTTP-сервер, с
обработкой GET и POST?" Там есть код приёма результата. Вот парсер принятой
строки:
Public Function Process(Data As String) As String
Dim Params As Variant, Param As Variant, Parts As Variant
Params = Split(Data, "&")
For Each Param In Params
Parts = Split(Param, "=")
'Имя параметра: Unescape(CStr(Parts(0)))
'Значение параметра: Unescape(CStr(Parts(1)))
Next
End Function

Private Function Unescape(Data As String) As String
Dim chr As String, Result As String, code As Byte
While Len(Data) > 0
chr = Left$(Data, 1): Data = Mid$(Data, 2)
If chr = "%" Then
chr = Left$(Data, 2): Data = Mid$(Data, 3)
code = Val("&H" & chr)
Result = Result & VBA.chr$(code)
ElseIf chr = "+" Then
Result = Result & " "
Else
Result = Result & chr
End If
Wend
Unescape = Result
End Function
Отправка совершенно аналогичная.

* Origin: FidoNet Online (2:5020/175.2)


Странно почему не этот вопрос в FAQ

From: "A. Skrobov"

Sat Jun 05 2004 00:25, Alexander Belinsky wrote to All:

AB> Вот столкнулся с необходимостью поместить форму поверх всех окон,
AB> HО ТОЛЬКО ДАHHОГО ПРИЛОЖЕHИЯ. Как например в графических программах в
AB> правой половине экрана болтаются всякие инструменты для работы. И еще
AB> одно "HО" - форма должна сворачиваться вместе с материнской MDI сама
AB> MDI-child не являясь. А то если запущены несколько экземпляров приложения
AB> и формы эти налазят друг на друга такое начинается...
Если показывать форму с указанием овнера (Form.Show vbModeless, Me), то она
свернётся при его сворачивании. По-видимому (не проверял), если сделать такое
owned окно поверх всех, то оно будет перекрывать только своих родителей.

* Origin: FidoNet Online (2:5020/175.2)


Странно почему не этот вопрос в FAQ

||*()*|| Ах это вы, A ? А я вас не узнал без санитара...

05 июн 04 года ты писал(а) к мне:

AB>> Вот столкнулся с необходимостью поместить форму поверх
AB>> всех окон, HО ТОЛЬКО ДАHHОГО ПРИЛОЖЕHИЯ. Как например в
AB>> графических программах в правой половине экрана болтаются всякие
AB>> инструменты для работы. И еще одно "HО" - форма должна
AB>> сворачиваться вместе с материнской MDI сама MDI-child не являясь.
AB>> А то если запущены несколько экземпляров приложения и формы эти
AB>> налазят друг на друга такое начинается...
AS> Если показывать форму с указанием овнера (Form.Show vbModeless, Me),
AS> то она свернётся при его сворачивании. По-видимому (не проверял), если
AS> сделать такое owned окно поверх всех, то оно будет перекрывать только
AS> своих родителей.

Думаешь я так не пытался?

Only one MDI Form allowed - и все. :-(

I'll be back, A. !
www.caligari.zp.ua - реальная психологическая и психиатрическая помощь. Анонимно. Пока бесплатно.

* Origin: Иисус изменил вашу жизнь. Сохранить? [Y/N] (2:4641/500.99)


Re: Странно почему не этот вопрос в FAQ

From: "A. Skrobov"

Hello, Alexander!
You wrote in conference fido7.ru.visual.basic to "A.Skrobov"
to A. Skrobov on Sat, 05 Jun 2004 08:08:11
+0400:

AB>>> Вот столкнулся с необходимостью поместить форму поверх
AB>>> всех окон, HО ТОЛЬКО ДАHHОГО ПРИЛОЖЕHИЯ. Как например в
AB>>> графических программах в правой половине экрана болтаются всякие
AB>>> инструменты для работы. И еще одно "HО" - форма должна
AB>>> сворачиваться вместе с материнской MDI сама MDI-child не являясь.
AB>>> А то если запущены несколько экземпляров приложения и формы эти
AB>>> налазят друг на друга такое начинается...
AS>> Если показывать форму с указанием овнера (Form.Show vbModeless, Me),
AS>> то она свернётся при его сворачивании. По-видимому (не проверял), если
AS>> сделать такое owned окно поверх всех, то оно будет перекрывать только
AS>> своих родителей.
AB> Думаешь я так не пытался?
AB> Only one MDI Form allowed - и все. :-(
Чёт-ты гонишь. Только что у меня всё получилось. Родитель MDI, ребёнок
обычная форма. Кстати, она ещё и сразу сама оказывается сверху - никаких АПИ
для этого не надо.


With best regards, A. Skrobov. E-mail: tyomitch [@] r66.ru



--

* Origin: Talk.Mail.Ru (2:5020/400)


vbscript

Здpавствyй, All.

Пишy макpос для VC++6 на vbscript.
Мне нyжно, чтобы макpос создавал .cpp файл с заданным именем.
Делаю, как в msdn написано:

Sub CreateNewFile()
Set cppdoc = Documents.Add("Text)
cppdoc.Language = dsCPP
End Sub

Появляется новый файл с именем "Text1".
Как тепеpь емy задать нyжное мне имя, типа "newfile.cpp"?

Добавил стpокy:

Sub CreateNewFile()
Set cppdoc = Documents.Add("Text")
cppdoc.Language = dsCPP
cppdoc.Name = "newfile.cpp"
^^^^^^^^^^^^^^^^^^^^^^^^^^^
End Sub

Hа подчеpкнyтой стpоке VC падает с сообщением:
"Инстpyкция по адpесy 0x00000000 пыталась пpоизвести чтение по адpесy
0x00000000"

Что я делаю не так?

С yважением, Alexei.
* Origin: Far East (2:5040/37.36)


Странно почему не этот вопрос в FAQ

||*()*|| Ах это вы, A ? А я вас не узнал без санитара...

05 июн 04 года ты писал(а) к мне:

[...skipped...]

AS>>> Если показывать форму с указанием овнера (Form.Show vbModeless,
AS>>> Me), то она свернётся при его сворачивании. По-видимому (не
AS>>> проверял), если сделать такое owned окно поверх всех, то оно
AS>>> будет перекрывать только своих родителей.
AB>> Думаешь я так не пытался?
AB>> Only one MDI Form allowed - и все. :-(
AS> Чёт-ты гонишь. Только что у меня всё получилось. Родитель MDI, ребёнок
AS> обычная форма. Кстати, она ещё и сразу сама оказывается сверху -
AS> никаких АПИ для этого не надо.

В том то и дело, что не "ребенок". Т.е. я решил сделать по аналогии с графическими редакторами в правой половине экрана "плавающее" окно в котором из которого и осуществляется управление MDI-child-формами.

I'll be back, A. !
www.caligari.zp.ua - реальная психологическая и психиатрическая помощь. Анонимно. Пока бесплатно.

* Origin: Иисус изменил вашу жизнь. Сохранить? [Y/N] (2:4641/500.99)


Странно почему не этот вопрос в FAQ

||*()*|| Ах это вы, A ? А я вас не узнал без санитара...

05 июн 04 года ты писал(а) к мне:

[...skipped...]

AB>> Думаешь я так не пытался?
AB>> Only one MDI Form allowed - и все. :-(
AS> Чёт-ты гонишь. Только что у меня всё получилось. Родитель MDI, ребёнок
AS> обычная форма. Кстати, она ещё и сразу сама оказывается сверху -
AS> никаких АПИ для этого не надо.

Ой, спасибо, заработало после того как повычищал все лишние АПИ-функции.

I'll be back, A. !
www.caligari.zp.ua - реальная психологическая и психиатрическая помощь. Анонимно. Пока бесплатно.

* Origin: Иисус изменил вашу жизнь. Сохранить? [Y/N] (2:4641/500.99)


А есть ли способ ?

*-==¬*
*¦ L===============================================================*
** /*_¦¬¦_*/ _*Dmitriy*_ *пишет тебе* */Aleksey/* [@] (2:4626/77.8)

26 Май 04 16:59, _Dmitriy Kozyrev_ *писал* /Youri V. Medvedev/:


YVM>> Hапямую в лоб не получается :(((
DK> http://mastershome.net.ru/vbfaq/b05.htm
можешь мне запостить эту статью? (Инета у меня нет! :(
а с тем что ты писал в ВБ.Чайник мне я не смог разобраться...
ЗЫ матрица 8х8 создается, а события никак! :(
ЗЫЗЫ статью запости приватом или кинь в нетмаил *(если не трудно)* ПЛИЗ...

** Ещё спишемся ... _/*Dmitriy*/_ */!/*
*¦ г===============================================================*
*L==-*... Тебе так лучше - пpавда, пpавда

* Origin: Дети будте остоpожны не бpосайтесь под тpамваи (2:4626/77.8)


EM_PASTESPECIAL

Glad To Read You, Andrew Shelkovenko !

30.06.2004 Было когда-то 12:01:52, базарил некто Andrew Shelkovenko с All, и
задумал я приаттачиться:

AS> Как можно использовать EM_PASTESPECIAL?
AS> Хотел вставить BMP в RichEdit из буфера (используя API) но что-то не
AS> получилось.
AS> Создал RichEdit
AS> QRichEdit_api.Handle
AS> =CreateRichEdit(WS_EX_CLIENTEDGE,"RichEdit20A","RichEdit_API", ... и т.д
AS> затем
AS> lResult2 = SendMessageAPI( RichEdit1.handle, EM_PASTESPECIAL,
AS> CF_BITMAP,0)
AS> результат нулевой ;)
AS> Bitmap в буфере есть, в Word вставляется нормально.
AS> Текст вставляется нормально.
AS> lResult2 = SendMessageAPI( RichEdit1.handle,
AS> EM_PASTESPECIAL, CF_text,0)
AS> Как вообще это EM_PASTESPECIAL использовать? Может пример какой есть.

А если попробовать так: SendMessage RichEdit1.handle, WM_PASTE, 0, 0
? Пусть оно само разберется, что ты там вставляешь. У меня нормально
jpg,png,gif, bmp так вставляются.

Пока,Andrew Shelkovenko!!! С вами был,есть и будет:Max Irgiznov [.NET][FreeBSD]
* Origin: Крыша есть, ума не надо (2:5051/36.20)



Назад Содержание Вперед