#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)])
}
Этот топик читают: Гость
Разработчик
Ответов: 4698
Рейтинг: 426
|
|||
Небольшой проект для шифрования данных
|
|||
карма: 10 |
| ||
файлы: 1 | code_12420.txt [2.3KB] [220] |
Ответов: 5227
Рейтинг: 587
|
|||
Assasin, ты к русскому какое отношение имеешь
Если никакого пиши на английском, бедный Пушкин сто раз уже перевернулся и меня уже тошнит от этого бреда |
|||
карма: 4 |
|
Ответов: 16884
Рейтинг: 1239
|
|||
andrestudio,
Владение русской орфографией это как владение кун-фу - истинные мастера без надобности не применяют. |
|||
карма: 25 |
| ||
Голосовали: | Валерий |
Ответов: 5227
Рейтинг: 587
|
|||
Tad, да я не имею ничего против грамматических ошибок (сам этим страдаю) но когда этот сленг осязаю то возникает чувство собственной деградации
|
|||
карма: 4 |
|
Разработчик
Ответов: 26151
Рейтинг: 2127
|
|||
Куды катится мир...
|
|||
карма: 22 |
|
Разработчик
Ответов: 4698
Рейтинг: 426
|
|||
Поправил для тех кому не нравится...
|
|||
карма: 10 |
|
Разработчик
Ответов: 26151
Рейтинг: 2127
|
|||
Хех. К сожалению, тут не нашлось ни одного, кому бы открыто понравилось...
|
|||
карма: 22 |
|
Разработчик
Ответов: 4698
Рейтинг: 426
|
|||
Блин, у этого шифратора недостаток: английский не шифрует! Щас попробую исправить...
|
|||
карма: 10 |
|
Ответов: 590
Рейтинг: 19
|
|||
Assasin писал(а): Щас попробую исправить...Смысл так напрягаться? если бы он шифровал по паролю, и к тому же, он символы многие не шифрует... так, что защита данных, за счет него, не очень-то хорошая |
|||
карма: 0 |
|
Ответов: 1088
Рейтинг: 112
|
|||
EcsTasY писал(а): не очень-то хорошаяЯ бы сказал никакой. |
|||
карма: 0 |
|
Разработчик
Ответов: 4698
Рейтинг: 426
|
|||
В общем сделаю для себя, а если надо будет - напишите
------------ Дoбавленo: 19:43 Все! Доделал! Шифрует все! Надо, пишите. ------------ Дoбавленo: EcsTasY писал(а): если бы он шифровал по паролюДобавил |
|||
карма: 10 |
|
Ответов: 1088
Рейтинг: 112
|
|||
Assasin писал(а): Все! Доделал! Шифрует все! Надо, пишите.Ну давай, выкладывай, иначе смысла в теме нет. |
|||
карма: 0 |
|
Ответов: 4641
Рейтинг: 334
|
|||
Assasin писал(а): Небольшой проект для шифрования данныху меня вообще схема ни чего не шифрует. НЕРАБОЧАЯ!! |
|||
карма: 1 |
|
Ответов: 590
Рейтинг: 19
|
|||
Ravilr писал(а): у меня вообще схема ни чего не шифрует.Ты русский пробовал? просто инглиш, как писалось выше, не шифрует Ravilr писал(а): НЕРАБОЧАЯ!!у меня все пули вылетели... |
|||
карма: 0 |
|
Ответов: 4641
Рейтинг: 334
|
|||
EcsTasY писал(а): Ты русский пробовал?конечно пробовал. "Любой текст" шифрует на "|" хотя может у меня с кодировкой что то. Но факт остается фактом. ------------ Дoбавленo: так вот,Assasin, поработай над универсальность схемы. Например если в реестре кодовая страница указана 1252, то все ок. Но если как у меня (1251) то неработает. |
|||
карма: 1 |
|