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

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

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

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


Поиск с учетом и без учета pегистpа

Hello Dmitry.

22 Jul 04 14:36, Dmitry Miloserdov wrote to Ruslan Demidow:

DM> А вообще, задача поиска текста многократно сложнее обычного бинарного
DM> поиска, так как включает в себя очень много факторов. Я давно искал
DM> библиотеку (и даже сам мечтал сделать) такой search engine, которая
DM> работала бы наподобие поисковых систем (т.е. с учетом морфологии
DM> языка/окончаний/падежей/порядка
DM> слов/кодировки/артиклей/преффиксов/суффиксов). Hо очень быстро
DM> понял, что в одиночку такую сложную тему не поднять.

есть freeware движок lucene с исходными текстами (на java), так что если есть
желание поразбираться...

Anton

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


pop3/smtp

Hello Terekhin.

23 Jul 04 14:20, Terekhin Alexandr wrote to all:

TA> Добрых дней и приятных ночей, All!

TA> Подскажите, какой контрол можно приспособить для скачивания почты по
TA> сабжевым протоколам?
TA> WinSock/MSMAPI ?
TA> Можно ли приспособить MSInet?

я вот чего не понимаю, а почему бы не начать с вопроса гуглю "freeware pop3
activeX"?

Anton

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


XML

Hello Terekhin.

24 Jul 04 20:14, Terekhin Alexandr wrote to Dmitriy Kozyrev:

TA> OK, обнаружилась, вот интересно msxml.dll есть во всех системах, или всё
TA> таки библиотеку с собой таскать?

ставится в том числе и вместе с IE. отсюда вывод - где есть IE версии 4.0 и
выше - есть и он, правда точную версию предсказать трудно :)

Anton

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


Поиск с учетом и без учета pегистpа

RD>>> Ясно. Я понял. Хотя было бы классно, если бы можно было в тексте
RD>>> искать как я пpедположил: задаётся стpока поиска состоящая из
RD>>> набоpа символов, и эта чеpез Instr ищется вхождение в тексте
RD>>> любого символа из стpоки поиска. :(
RY>> [F1] Like ?
RD> Много pаз вижу, но пока не было необходимости знакомиться. Что эта
RD> функция делает?
Вариант Регекспов специально для меня, который в регекспах ну совсем ничего не понимает. ;)

Т.е. твой запрос выглядел бы так.

pattern = "*[,;-/\.']*"

if pattern like substring (или if substring like pattern, точно не помню) ;)

Я про эту функцию узнал только полгода назад, не представляю, как я раньше жил без нее. Причем про подобную функцию я спрашивал в эхе и 3, и 2 года назад. В ответ был молчок. ;)



* Origin: 1134 (2:5045/44.13)


Win 3.*

VR> Dima Grinenko пишет:
DG>> *Grinenko* по теме "Win 3.*"
VR> Hе совсем в тему, но. В Виндах есть такая фича - Accessibility
VR> Options. Там в числе прочего - управление указателем мыши с помощью
VR> правого блока клавиш. Если такое уже было в 3.1 - может задействовать
VR> ее и не мучаться?
Hе было такого. Я как-то в 3.1 без мыши так и не смог какое-то приложение из-за этого установить. ;)


* Origin: 1134 (2:5045/44.13)


консоль с юникодом

DG>>> Хотя как они печатают на экpан,
DK>> WriteFile(GetStdHandle(STD_HANDLE_OUTPUT), ...)
DK>> или
DK>> WriteConsole
AS> Или, как я подсказывал весной:
AS> Open "con:" For Output As 1
AS> Print #1, "Hello World!"
AS> Close 1
AS> Без апей - поэтому выйдет как раз пять строк :-)

File/Path Access Error. :( Или надо что-то патчить?


* Origin: 1134 (2:5045/44.13)


Re: Mail средствами telnet

From: Victor Kagramanyants

On Tue, 27 Jul 2004 13:01:40 +0400, Yury Zezegov wrote:

> И все же интересно, существуют ли в винде готовые функции?
И не ищи. Hету. А вот контрлов для эхотага должно быть много.

>Спасибо тебе большое за ТОР!!! Даже ведь не слышал о таком.
Hе за что. :)
RFC1939 рулит :)

Vic
* Origin: Demos online service (2:5020/400)


Пробема под Win NT 2000 XP которой не было под Win 95 98 Me

From: "Коршунов А.М."

Привет всем
Имеется старая порграмма на VB5 без исходников
под 95 98 Me Все работало нормально
под NT 2000 XP не набирается по русски текст в полях ввода
можно например набрать где нить руский текст скопировать и вставить
в поле это проходит нормально а вот набрать непосредственно в
поле ничего не получается вместо к примеру проба выходит несколько черточек
если их скопировать и вставить в другое приложение получается
ïðîáà
в чем может быть дело и как вылечить ?

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


Re: консоль с юникодом

Hello, Dmitriy!
You wrote to "A. Skrobov" to A.
Skrobov on 28 Jul 04 11:16:43:

AS>> Кроме того, там написано: "Любопытно, что даже имея тип Character,
AS>> приложение может отображать свои окошки, например, MsgBox."
AS>> Это не совсем точно - единственное, на что влияет тип Character, - это
AS>> то, что процессу выделяются стандартные хэндлы. Он при этом _ничего_
AS>> по сравнению с типом GUI не лишается, и по-прежнему может рисовать
AS>> _любые_ окошки.
DK> То есть в моей фразе неверна только интонация. :)
Скажем так, она вводит в заблуждение :-)
Формально, конечно, всё верно, но...
* Origin: Ben's bent broom breaks. Bim's bent broom breaks. (2:5080/1003.16)


Re: Инвеpсия в RichEditBox

Hello, Martynov!
You wrote to "A. Skrobov" to A.
Skrobov on 28 Jul 04 12:22:17:

RD>>> Как сделать сабж отдельного слова.
AS>> Имхо это невозможно. По стандарту цвет фона задаётся управляющим
AS>> словом \chcbpatN, но RichTextBox (ты ведь _его_ имел в виду?) его
AS>> почему-то игнорирует. А вот Ворд, например, поддерживает.
MS> слово \highlightN, работает и ворде и RTB
Действительно, работает. Как-то проглядел его в спецификации...
Тогда сабж делается так:

=========Beginning of the citation==============
Option Explicit

Private Sub Form_DblClick()
With RichTextBox1
.Text = "Мама мыла раму"
.SelStart = 5: .SelLength = 4
.SelColor = vbWhite
Dim RTF As String, pos As Long, pos0 As Long, pos1 As Long
Dim cnt As Long
RTF = .SelRTF
pos0 = InStr(RTF, "colortbl")
pos1 = InStr(pos0, RTF, "}")
pos = pos0
While pos < pos1 - 1
pos = InStr(pos + 1, RTF, ";")
cnt = cnt + 1
Wend
RTF = Left(RTF, pos) + "\red0\green0\blue0;" + Mid(RTF, pos1)
RTF = Replace(RTF, "\pard", "\pard\highlight" & cnt)
.SelRTF = RTF
End With
End Sub

=========The end of the citation================
* Origin: This one is quiet as a mouse. (2:5080/1003.16)



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