Обсуждение программирования на 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" 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" 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) |