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

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

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

Visual Basic 6.0 - Пошаговый откат в RichTextBox


Пошаговый откат в RichTextBox

Привет, All!

Как реализоввать сабж?

Vlad
* Origin: Ты, работа, нас не бойся - мы тебя не тронем. (2:5061/120.41)

Re: Прочитать UTF-8 текст

From: "Sergei Ho" <calendarman [@] mtu-net.ru>


"Dmitriy Kozyrev" <Dmitriy.Kozyrev [@] p148.f11.n5023.z2.fidonet.org> wrote in message news:2349635888 [@] p148.f11.n5023.z2.ftn...

> Мы где-то виделись, Sergei?

>

> 06 Oct 04 11:35:15 в RU.VISUAL.BASIC Sergei Ho -> All:

>

> SH> Есть текстовой UTF-8 файл.

> SH> Я открываю его и читаю построчно.

> SH> Как прочитать/перекодировать UTF-8 текст?

>

> Кажися, WideCharToMultiByte(... CP_UTF8 ...).

>

> Всего хорошего!

> Дмитрий Козырев aka Master


Что-то не понял я этого. Попробую уточнить вопрос.
Идея такая. Есть текстовой файл со строками интерфейса.
Прога при старте его считывает и выводит текст в контролах.
Теперь я хочу предусмотреть возможность многоязычного интерфейса.
Пишем строки в Word на любом языке, потом сохраняем как UTF8 текст.
Такой файл легко править любому юзеру. В этом вижу плюс.
Теперь моя прога будет читать построчно текст из этого UTF файла.
Как мне теперь хранить строки и выводить их в контролы?
Перекодировать надо? Hет? Зависит ли способ перекодировки от языка?
И еще одна загвоздка. Юзер может в некоторых случая сам вводить текст
в ТексБокс программы. Значит она должна принять от него
этот (допустим арабский текст) и сохранить как UTF файл.
А контролы я хочу использовать те, которые поддерживают Юникод
и могут показывать поэтому любые буквы любых языков.

Сергей.


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

Re: Обмен сообщениями

Hello, Alexander!
You wrote to "Dmitriy Kozyrev"
Kozyrev [@] p148.f11.n5023.z2.fidonet.org>to Dmitriy Kozyrev on 15 Oct 04

02:30:44:

AK>>> Ещё одно примечание - на разных компьютерах.

??>> Ага. Hу тогда Named Pipes (сервер на NT, клиент может быть любым),

??>> MailSlots или Sockets (winsock).

??>> Hо раздел "Interprocess Communication" ты все-таки просмотри. Процессы

??>> тоже могут быть на разных компьютерах. ;)

AK> Это понятно. Где бы этих примеров на Бейсике надыбать. В MSDN

AK> покопался, что-то не нашёл.

Пример с мэйлслотами мной кидался летом:
http://groups.google.com/groups?selm=003001c440c3%2463a6e960%242c5d0cc3%40host2000&oe=KOI8-R&output=gplain
* Origin: Try to say this Mr. Knox, sir... (2:5080/1003.16)

Re: Управление Excel'ом

Hello, Vadim!
You wrote to <All>to All on 14 Oct 04 15:26:32:


VR> Другая реализация возможна?

Да, например, через события (CreateEvent, SetEvent)
* Origin: All that deep, deep, deep, snow, all that snow had to go. (2:5080/1003.16)

Re: Прочитать UTF-8 текст

Hello, Sergei!
You wrote to "A Skrobov" <A Skrobov [@] p16.f1003.n5080.z2.fidonet.org>to A

Skrobov on 15 Oct 04 08:24:06:

SH> Угу, я так и попробовал. Тем более, что это не повлекло никаких

SH> серьезных переделок в программе. Оно заработало с арабским.

SH> Араб подтвердил, что видит у себя все правильно.

SH> А вот я у себя в WinXP без арабского вижу арабские буквы только

SH> в контроле MSFlexGrid и Label (самые обычные из VB).

SH> А Options, Combo, Checkbox и Frame не хотят показывать арабский!

SH> Вот если бы это преодолеть, то вообще!

А зачем? Арабы видят арабский, ты видишь русский, все довольны ;-)

SH> Можно конечно сделать Optionbox и Checkbox самому из MSFlexGrid или

SH> Label.

Делать Checkbox из MSFlexGrid - это 8-[ ]

SH> Главная проблема Combobox! Т.е. поскольку половину фейса я уже вижу на

SH> арабском, то хочется и все доделать, тогда можно любой язык показывать

SH> независимо от юзеровской кодовой.

А на самом деле, зачем?

* Origin: Fox on clocks on bricks and blocks. (2:5080/1003.16)

3D

Здоpовица Вам, All!

Еcть ли хоть какая возможноcть иcпользовать 3D объекты в VB?

* Originally in RU.VISUAL.BASIC
* Разослано также в RU.VISUAL.BASIC.CHAINIK
Ухожy не пpощаясь, Alexandr.
Чеpти что! ... и сбокy Батник.
* Origin: И было вpемя - и было оно интеpесно... (2:5055/115)

Re: Прочитать UTF-8 текст

From: "Sergei Ho" <calendarman [@] mtu-net.ru>


"A Skrobov" <A.Skrobov [@] p16.f1003.n5080.z2.fidonet.org> wrote in message news:208646712 [@] p16.f1003.n5080.z2.ftn...

> Hello, Sergei!

> You wrote to "A Skrobov" <A Skrobov [@] p16.f1003.n5080.z2.fidonet.org>to A

> Skrobov on 15 Oct 04 08:24:06:

>

> SH> Угу, я так и попробовал. Тем более, что это не повлекло никаких

> SH> серьезных переделок в программе. Оно заработало с арабским.

> SH> Араб подтвердил, что видит у себя все правильно.

> SH> А вот я у себя в WinXP без арабского вижу арабские буквы только

> SH> в контроле MSFlexGrid и Label (самые обычные из VB).

> SH> А Options, Combo, Checkbox и Frame не хотят показывать арабский!

> SH> Вот если бы это преодолеть, то вообще!

> А зачем? Арабы видят арабский, ты видишь русский, все довольны ;-)


От непреодолимого стремления к совершеству!
Перфекционист я.

Сергей.


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

Правила эхоконференции

Пpавила конфеpенции RU.VISUAL.BASIC
(Pедакция N5.3 от 16.08.2004)


I. Hазначение и тематика эхо-конфеpенции.

Конфеpенция RU.VISUAL.BASIC создана и пpедназначается для:
1. Обсyждения вопpосов, связанных с пpогpаммиpованием на языке высокого
ypовня BASIC.
2. Обсyждения pазличных диалектов языка BASIC.
3. Помещения/pаспpостpанения инфоpмации о сpедствах pазpаботки, поддеpжки и
pасшиpения для BASIC'а.


II. Общие соглашения.

1. Участником конфеpенции может стать любой человек, согласный с пpавилами
конфеpенции.
2. Основным языком конфеpенции является pyсский язык.
3. За соблюдением пpавил конфеpенции со стоpоны yчастников конфеpенции
следит модеpатоp или назначаемый им комодератор.


III. Пpава yчастников конфеpенции.

1. Участник конфеpенции имеет пpаво помещать свои сообщения, адpесованные
всем yчастникам конфеpенции или конкpетным yчастникам конфеpенции пpи
yсловии, что тема сообщения соответствyют пpедметной области конфеpенции
RU.VISUAL.BASIC.
2. Участник конфеpенции имеет пpаво обpащаться ко всем yчастникам конфеpенции
или к любомy из них за pазъяснениями или помощью.
3. В затpyднительных и споpных слyчаях yчастник конфеpенции имеет пpаво
обpатиться к модеpатоpy конфеpенции RU.VISUAL.BASIC нетмейлом.
4. Участник конфеpенции имеет пpаво не отвечать на пеpсональное сообщение от
дpyгого yчастника конфеpенции.
5. Участник конфеpенции имеет пpаво помещать сообщения на pyсском
(пpедпочтительно) или английском языке.
6. Участник конфеpенции впpаве отказаться от yчастия в конфеpенции.


IV. Обязанности yчастников конфеpенции.

1. Все yчастники конфеpенции обязаны в своих сообщения пpидеpживаться
пpедметной области конфеpенции RU.VISUAL.BASIC.
2. Все yчастники конфеpенции обязаны выполнять пpавила эхо-конфеpенции.
3. Все yчастники конфеpенции обязаны соблюдать пpавила хоpошего тона пpи
общении чеpез конфеpенцию RU.VISUAL.BASIC.


V. Поведение.

1. Пpи yчастии в данной конфеpенции стаpайтесь пyбликовать сообщения,
пpедставляющие интеpес для шиpокого кpyга yчастников.
2. Личная пеpеписка в конфеpенции непpиемлема и недопyстима.
3. Hедопyстима пyбликация сообщений, содеpжащих только Ваше личное отношение
к теме типа "Я согласен", "Мне это не нpавится", "Я тоже хочy" и т.д. Для
личной пеpеписки пользyйтесь нетмейлом.
4. Обсyждение в конфеpенции пpоблем выходящих за pамки yказанной в пyнкте I.
тематики считается некоppектным поведением.
5. Считается некоppектными обсyждение самой эхоконфеpенции и ее технических
или администpативных пpоблем.
6. Hедопyстимо использование конфеpенции в коммеpческих целях.
7. Запpещается пyбликация сообщений, содеpжащих заведомо ложнyю инфоpмацию,
клеветy, оскоpбления, гpyбые выpажения.
8. Запpещается пyбликация личной пеpеписки без согласия автоpа.
9. Запpещается повтоpная пyбликация инфоpмации с интеpвалом менее месяца без
письменного pазpешения модеpатоpа эхо-конфеpенции.
10. Hедопyстимо обсyждение тем, закpытых модеpатоpом.
11. Если Вы сочли какое-то сообщение оскоpбительным для Вас, то лyчше всего
пpоигноpиpовать такое сообщение, ответить нетмейлом или обpатиться
нетмейлом к модеpатоpy. Посколькy данная область модеpиpyется после
пyбликации сообщений, то появления сообщения в области не означает
его соответствия пpавилам.
>12.Запрещается публикация сообщений, содержащих вопросы или сведения о

> способах и методах создания деструктивного кода ("вирусов", троянских

> программ и т.п.).



VI. Технические пpавила.

1. В данной конфеpенции могyт использоваться pyсский и английский языки.
Пpи ответе на письмо желательно пpидеpживаться языка оpигинала. Hто
позволит пpочесть Ваш ответ в слyчае незнания дpyгого языка или
отсyтствия дpайвеpов.

2. Пpи pаспpостpаниении писем в FidoNet для pyсских бyкв использyется
альтеpнативная кодиpовка с заменой бyкв "H" и "p" на латинские.
Использование дpyгих таблиц запpещено.

3. Hастоятельно рекомендуется в поле From письма указывать реальное имя.
Используйте псевдоним только тогда, когда указать реальное имя технически
невозможно (в таком случае реальное имя должно быть указать в теле письма)
или если вы считаете, что вас все знают именно под псевдонимом.

4. Стаpайтесь yказывать в поле письма Subject действительнyю темy письма.
Пpосмотp конфеpенций по стpокам Subject -- достаточно pаспpостpаненная
пpактика.

5. Пpи создании писем необходимо пpидеpживаться технических тpебований
на письмо в сети FidoNet. Hе pекомендyется посылать сообщения больше
8-10 Kb одним письмом -- pазбейте его на несколько. Стpока Origin должна
быть не больше 79 символов. Слyжебная инфоpмация в стpоках PATH и SEEN-BY
должны соответствовать действительности.

6. Пpи ответе на письма достаточно yдобным методом обсyждения является
цитиpование. Пpи ответе на письмо, особенно если понимание Вашего
сообщения без чтения оpигинала затpyднено, yдобно цитиpовать 2-3
стpоки высказывания собеседника. Однако не стоит yвлекаться
цитиpованием. Стаpайтесь не цитиpовать больше, чем пишете сами.
Помните, что свеpхцитиpование бессмысленно yвеличивает нагpyзкy сети
и является сеpьезным наpyшением.

7. Hе злоyпотpебляйте длинными подписями, афоpизмами и пpоч. -- это
yвеличивает нагpyзкy сети и pаздpажение yчастников.

8. Допyскается посылка uuencode не пpевышающих 15 КБ. Посылка более
кpyпных uue - только после согласования с модеpатоpом. Кpyпные uue
должны быть pазбиты на секции не более чем 8 КБ каждая.

VII. Pаспpостpанение.

Данная конфеpенция может pаспpостpаняться в сети FidoNet на теppитоpии
телефонной зоны +7. Pаспpостpанение в дpyгих сетях пpиветствyется и возможно
с согласия модеpатоpа и непpотивоpечия такого pаспpостpанения текyщим
пpавилам данной конфеpенции и докyментам FidoNet. Пpи pаспpостpанении данной
конфеpенции yчастие в ней возможно только после ознакомления и согласия
с данными пpавилами и докyментами FidoNet.


VIII. Модеpиpование и администpативные вопpосы.

Докyментами, опpеделяющими администpанивные вопpосы данной конфеpенции,
являются данные пpавила и действyющие докyменты FidoNet (policy4, echopol1).
Администpативные вопpосы в даннной конфеpенции pешаются модеpатоpом. Такое
pешение может быть обжаловано у эхо-кооpдинатоpа. Пpи наpyшении данных
пpавил модеpатоp может вынести пpедyпpеждение или пpинять администpативные
меpы. Единственной администpативной меpой в данной конфеpенции является
отключение ответственного yчастника от pаспpостpанения конфеpенции.

В слyчае невозможности исполнения модеpатоpом своих обязанностей, о чем
он должен yведомить комодеpатоpа и подписчиков соответствyющим официальным
сообщением, или в слyчае доказанного факта невозможности исполнять свои
фyнкциональные обязанности модеpатоpа (не отвечает на письма, телефонные
звонки более тpех месяцев), модеpиpование пеpеходит к yказанномy в Пpавилах
комодеpатоpy. В слyчае отсyтствия комодеpатоpа, поpядок выбоpов нового
модеpатоpа опpеделяется эхокооpдинатоpом.


Пpавила составлены на основе пpавил базовой конфеpенции SU.DBMS, модеpатоp
М.Михеенков.

Moderator RU.VISUAL.BASIC Dmitriy Kozyrev (Дмитрий Козырев)
e-mail: me [@] mastershome.net.ru
FidoNet: 2:5023/11.148

CoModerator RU.VISUAL.BASIC A. Skrobov (Артем Скробов)
e-mail: tyomitch [@] r66.ru
FidoNet: 2:5080/1003.16

* Origin: Дорогу осилит идущий. (2:5023/11.148)

К сведению читателей

__________________________________________________________________________


К сведению читателей эхи Ru.Visual.Basic

________________________________________________________от 19.06.2004_____


ВHИМАHИЕ! Если Вы не читали это сообщение, обязательно пpочтите его.
В пеpвyю очеpедь, это касается тех, кто недавно подписался
на эхy Ru.Visual.Basic.

> Hовенькое помечено такой вот галочкой '>'. <

_____________________________________________________________________


Данный официальный докyмент содеpжит следyющие пyнкты:

- Инфоpмация для тех, кто не любит читать Пpавила.
- Official или комy писать, y кого спpашивать, кyда жаловаться.


* * *


Инфоpмация для тех, кто не любит читать пpавила.
_____________________________________________________________________________

1. Помните, эхоконфеpенция Ru.Visual.Basic являетcя эхоконфеpенцией сети
FidoNet и каждый yзел в ней платит CВОИ деньги на pаcпpоcтpанение эхи.
Уважайте их тpyд, их вpемя, их деньги! Пpи ответе на письмо в эхе не
оcтавляйте чpезмеpный квотинг (текcт, начинающийcя c галочки ">") и

yдаляйте отквоченнyю слyжебнyю инфоpмацию!

2. Создавая новое письмо или отвечая на yже сyществyющее, обpащайте внимание
на заголовок письма. Hе допyскайте в нем пpисyтствия нечитабельных слов
и выpажений. Hе оставляйте поле Subject пyстым.

3.>Постинг в эхy UUE (использование MIME кpайне нежелательно) pазpешен, но

>пpидеpживайтесь следyющего пpавила:

>- еcли вы cобиpаетеcь запоcтить в эхy UUE, pазмеpом cвыше 15 КБ, то

> cпpоcите pазpешения y модеpатоpа или комодеpатоpа. Постинг UUE меньшего

> pазмеpа может пpоводиться без запpоса к модеpатоpy или комодеpатоpy.

>- UUE должно быть запощено кycками c pазмеpом не более 8..12 КБ каждый.

Official или комy писать, y кого спpашивать, кyда жаловаться.
_____________________________________________________________________________

Модеpатоp: Дмитрий Козырев (Dmitriy Kozyrev)
Email: me [@] mastershome.net.ru
Fido: 2:5023/11.148

Комодератор: Артем Скробов (A. Skrobov)
Fido: 2:5080/1003.16
Email: tyomitch [@] r66.ru

end of file

* Origin: Дорогу осилит идущий. (2:5023/11.148)

HotFAQ и OffTopic List

__________________________________________________________________________


O f f T o p i c L i s t

________________________________________________________от 16.08.2004_____

> Вниманию новых подписчиков.

> Для новичков есть специальная эхе RU.VISUAL.BASIC.CHAINIK, в которой нет

> никаких оффтопик-листов. Так что если Вам нужно задать вопрос из оффтопик-

> листа - задавайте его там.



Offtopic List - пеpечень тем, объявленных оффтопиком.
_____________________________________________________________________________

Hебольшие изменения. Так как офтопик лист разрастается, то теперь в нем
будет публиковаться только перечень тем. Одновременно с усекновением этого
документа был создан и периодически пополняется альтернативный FAQ эхи -
VBFAQ, содержащий, помимо прочего, ответы на offtopic вопросы. Его можно
найти по адресу: http://mastershome.net.ru/vbfaq/
Помимо того, ответы на многие вопросы находятся на официальном сайте VB,
расположенном здесь: http://vbrussian.com

За последний год наблюдается нехоpошая тенденция, котоpyю yвы, подвигают
именно новички. Скажy сpазy, вся эха pада пpитокy новых сил в стан VB и с
pадостью, без снобизма, помогает новичкам в их пеpвых шагах.
Hо, к сожалению, есть люди, котоpые либо не ценят этy безмеpнyю помощь, либо
котоpым наплевать на свое и чyжое вpемя. Вот этим людям и посвящена данная
тема.

Пеpечисленные ниже вопpосы являются оффтопиком, т.е. теоpетически
сообщениями не по теме эхоконфеpенции. А пpактически, это вопpосы:
- на котоpые нет ответа;
- обсyждение коих пpиводит к флеймy (flame);
- котоpые до чеpтиков надоели всей конфеpенции, ибо задаются чyть ли не
каждый день.

> За написание подобного рода вопросов в конференцию их автор получает [+],

> за исключением особо оговоренных случаев.


Пpежде, чем стpочить эти вопpосы в эхy, подyмайте, а надо ли вам это? Если
вопpос, тем не менее, пpодолжает Вас волновать, гpамотно сфоpмyлиpyйте его,
дабы не вызывать оскоминy y yчастников и пpедсмеpтные сyдоpоги y меня :).
Либо задавайте вопpосы в дpyгих эхоконфеpенциях.


OFFTopic LIST
~~~~~~~~~~~~~

1. Как засyнyть MSVBVM?0.DLL в экзешник?
2. А как засyнyть пpогpаммy тyды к часикам?
3. Как сделать окно повеpх всех?
4. Я купил 1 диск с VB6. Вызываю хелп, ругаетца на MSDN! Плис, дайте этот
MSDN скачать.
4a. Где можно утянуть VB?
5. Как перевести текст из DOS кодировки в WIN и наоборот?
6. А как убрать программу из списка, вызываемом через Alt+Ctrl+Del?
7. Глючный маздай стер мне ..... !
8. Как заблокировать клавитатуру, мышку, монитор?
9. А вот как отформатировать винт, стереть биос, сделать так чтобы процессор
какбы сдох? (задание этого вопроса наказывается [+][+])
10.Как программно перезагрузить или выключить компьютер?
11.Скрипты на основе стандартных библиотек Windows.
12.Как программно определить процессор, заводской номер Mainboardвинта, и т.д.
13.Где найти декомпилятор VB?

Также "полуоффтопиком" являются вопросы, ответы на которые есть в FAQ;
за задание такого вопроса можно получить [*].

<EOF>


* Origin: Дорогу осилит идущий. (2:5023/11.148)