Вверх ↑
Этот топик читают: Гость
Разработчик
Ответов: 4698
Рейтинг: 426
#1: 2009-03-25 11:20:06 ЛС | профиль | цитата
Небольшой проект для шифрования данных
#sha
Add(MainForm,2953706,98,112)
{
Width=408
BorderStyle=6
Position=1
Point(Handle)
}
Add(Charset,3378888,224,189)
{
Type=8
CodePage1=3
CodePage2=1
link(onCharset,1399301:doAdd,[])
link(Text,12596398:Text,[(230,177)(296,177)(296,246)(363,246)])
}
Add(ChildPanel,10164143,49,112)
{
link(Data1,2953706:Handle,[(55,106)(86,106)(86,149)(104,149)])
link(onEvent1,2953706:doMinimize,[(89,118)(89,132)])
link(onEvent2,2953706:doClose,[(86,125)(86,139)])
}
BEGIN_SDK
Add(EditMulti,14921415,21,49)
{
EventCount=2
WorkCount=1
DataCount=1
}
Add(Panel,10383375,35,147)
{
Width=408
Height=26
Color=-16777215
BevelWidth=2
Point(doColor)
link(onClick,10125777:doWork1,[(74,153)])
}
Add(Label,16487376,35,196)
{
Left=25
Top=5
Width=114
Height=17
Color=-16777215
Caption="Шифратор данных 1.0"
link(onClick,10125777:doWork2,[])
}
Add(Button,925320,168,91)
{
Left=377
Top=3
Width=20
Caption="X"
link(onClick,14921415:onEvent2,[(264,97)(264,62)])
}
Add(Button,8239750,168,56)
{
Left=357
Top=3
Width=20
Caption="_"
link(onClick,14921415:onEvent1,[(260,62)(260,55)])
}
Add(MoveWindow,16111218,91,196)
{
link(Handle,14921415:Data1,[(97,126)(27,126)])
}
Add(HubEx,10125777,70,189)
{
link(onEvent,16111218:doMove,[])
}
END_SDK
Add(Memo,12596398,357,189)
{
Top=25
Width=190
Height=135
Strings=#16:Любой текст|
}
Add(Memo,1399301,406,189)
{
Left=210
Top=25
Width=195
Height=135
Strings=#32:Здесь будет закодированный текст|
}
Add(Button,10545069,98,189)
{
Left=190
Top=25
Width=20
Height=135
Caption=">>"
link(onClick,9722868:doEvent1,[])
}
Add(Memo,1889212,406,245)
{
Left=210
Top=165
Width=195
Height=135
Strings=#11:Твой текст|
}
Add(Memo,11854330,357,245)
{
Top=165
Width=190
Height=135
Strings=#25:Сюда пишем закодированный текст|
}
Add(Button,5992163,98,245)
{
Left=190
Top=165
Width=20
Height=135
Caption=">>"
link(onClick,2689786:doEvent1,[])
}
Add(Hub,9722868,140,189)
{
link(onEvent1,1399301:doClear,[(280,195)(280,202)])
link(onEvent2,3378888:doCharset,[(189,202)(189,195)])
}
Add(Hub,2689786,140,245)
{
link(onEvent1,1889212:doClear,[(164,251)(164,258)])
link(onEvent2,2650696:doCharset,[(186,258)(186,251)])
}
Add(Charset,2650696,224,245)
{
Type=8
CodePage1=1
CodePage2=3
link(onCharset,1889212:doAdd,[])
link(Text,11854330:Text,[(230,233)(293,233)(293,302)(363,302)])
}
карма: 10
0
файлы: 1code_12420.txt [2.3KB] [220]
Ответов: 5227
Рейтинг: 587
#2: 2009-03-25 12:00:15 ЛС | профиль | цитата
Assasin, ты к русскому какое отношение имеешь
Если никакого пиши на английском, бедный Пушкин сто раз уже перевернулся и меня уже тошнит от этого бреда
карма: 4
Мой форум - http://hiasm.bbtalk.me/ схемы, компоненты...
0
Ответов: 16884
Рейтинг: 1239
#3: 2009-03-25 12:25:48 ЛС | профиль | цитата
andrestudio,
Владение русской орфографией это как владение кун-фу - истинные мастера без надобности не применяют.

карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
1
Голосовали:Валерий
Ответов: 5227
Рейтинг: 587
#4: 2009-03-25 12:31:19 ЛС | профиль | цитата
Tad, да я не имею ничего против грамматических ошибок (сам этим страдаю) но когда этот сленг осязаю то возникает чувство собственной деградации
карма: 4
Мой форум - http://hiasm.bbtalk.me/ схемы, компоненты...
0
Разработчик
Ответов: 26151
Рейтинг: 2127
#5: 2009-03-25 12:39:19 ЛС | профиль | цитата
Куды катится мир...
карма: 22

0
Разработчик
Ответов: 4698
Рейтинг: 426
#6: 2009-03-25 12:40:46 ЛС | профиль | цитата
Поправил для тех кому не нравится...
карма: 10
0
Разработчик
Ответов: 26151
Рейтинг: 2127
#7: 2009-03-25 12:46:41 ЛС | профиль | цитата
Хех. К сожалению, тут не нашлось ни одного, кому бы открыто понравилось...
карма: 22

0
Разработчик
Ответов: 4698
Рейтинг: 426
#8: 2009-03-25 13:34:27 ЛС | профиль | цитата
Блин, у этого шифратора недостаток: английский не шифрует! Щас попробую исправить...
карма: 10
0
Ответов: 590
Рейтинг: 19
#9: 2009-03-25 16:04:08 ЛС | профиль | цитата
Assasin писал(а):
Щас попробую исправить...

Смысл так напрягаться? если бы он шифровал по паролю, и к тому же, он символы многие не шифрует... так, что защита данных, за счет него, не очень-то хорошая
карма: 0

0
Ответов: 1088
Рейтинг: 112
#10: 2009-03-25 16:08:27 ЛС | профиль | цитата
EcsTasY писал(а):
не очень-то хорошая

Я бы сказал никакой.
карма: 0
Время верстки: %cr_time% Текущее время: %time%
0
Разработчик
Ответов: 4698
Рейтинг: 426
#11: 2009-03-25 19:45:08 ЛС | профиль | цитата
В общем сделаю для себя, а если надо будет - напишите
------------ Дoбавленo:

19:43
Все! Доделал! Шифрует все! Надо, пишите.
------------ Дoбавленo:

EcsTasY писал(а):
если бы он шифровал по паролю

Добавил
карма: 10
0
Ответов: 1088
Рейтинг: 112
#12: 2009-03-25 19:50:12 ЛС | профиль | цитата
Assasin писал(а):
Все! Доделал! Шифрует все! Надо, пишите.

Ну давай, выкладывай, иначе смысла в теме нет.
карма: 0
Время верстки: %cr_time% Текущее время: %time%
0
Ответов: 4641
Рейтинг: 334
#13: 2009-03-25 21:12:06 ЛС | профиль | цитата
Assasin писал(а):
Небольшой проект для шифрования данных

у меня вообще схема ни чего не шифрует. НЕРАБОЧАЯ!!
карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
Ответов: 590
Рейтинг: 19
#14: 2009-03-25 22:28:39 ЛС | профиль | цитата
Ravilr писал(а):
у меня вообще схема ни чего не шифрует.

Ты русский пробовал? просто инглиш, как писалось выше, не шифрует
Ravilr писал(а):
НЕРАБОЧАЯ!!

у меня все пули вылетели...
карма: 0

0
Ответов: 4641
Рейтинг: 334
#15: 2009-03-26 12:01:56 ЛС | профиль | цитата
EcsTasY писал(а):
Ты русский пробовал?

конечно пробовал. "Любой текст" шифрует на "|"
хотя может у меня с кодировкой что то. Но факт остается фактом.
------------ Дoбавленo:

так вот,Assasin, поработай над универсальность схемы. Например если в реестре кодовая страница указана 1252, то все ок. Но если как у меня (1251) то неработает.
карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
Сообщение
...
Прикрепленные файлы
(файлы не залиты)