Вверх ↑
Этот топик читают: Гость
Этот топик был перемещен из раздела "Помощь по среде"
Ответов: 26
Рейтинг: 2
#16: 2018-10-21 16:36:04 ЛС | профиль | цитата
Спасибо большое, но уже нашел компонент на данном форуме. Он работает )
http://forum.hiasm.com/topic/57114
Спасибо большое ещё раз, очень помог )

Редактировалось 2 раз(а), последний 2018-10-21 16:36:36
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#17: 2018-10-22 10:09:24 ЛС | профиль | цитата
stimka, на 1-й странице пож. портянку убери.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 188
Рейтинг: 2
#18: 2018-10-22 11:19:07 ЛС | профиль | цитата
stimka писал(а):
нужно что бы при вводе фамилии- Иванов, она автоматом менялась на Ivanov...

можно примерно так!

Add(Edit,8947271,511,35)
{
Left=220
Top=10
Width=160
Font=[Times New Roman,10,0,0,204]
Text=""
Point(doSetFocus)
link(onChange,15997396:doWork1,[(569,41)(569,139)(408,139)(408,237)])
}
Add(MultiElement,15997396,420,231)
{
link(onEvent1,9848688:doText,[(459,237)(459,157)])
}
BEGIN_SDK
Add(EditMulti,12137061,42,49)
{
EventCount=1
WorkCount=1
DataCount=1
Width=1549
Height=165
VOffset=21
HOffset=21
link(doWork1,7056492:doModify,[])
}
Add(Replace,11439842,112,70)
{
SubStr="а"
DestStr="a"
link(onReplace,530333:doReplace,[])
}
Add(Replace,530333,154,70)
{
SubStr="б"
DestStr="b"
link(onReplace,11128969:doReplace,[])
}
Add(Replace,11128969,196,70)
{
SubStr="в"
DestStr="v"
link(onReplace,3391353:doReplace,[])
}
Add(Replace,3391353,238,70)
{
SubStr="г"
DestStr="g"
link(onReplace,14636492:doReplace,[])
}
Add(Replace,14636492,280,70)
{
SubStr="д"
DestStr="d"
link(onReplace,12283807:doReplace,[])
}
Add(Replace,12283807,322,70)
{
SubStr="е"
DestStr="e"
link(onReplace,16094144:doReplace,[])
}
Add(Replace,16094144,364,70)
{
SubStr="ё"
DestStr="yo"
link(onReplace,15370106:doReplace,[])
}
Add(Replace,15370106,406,70)
{
SubStr="ж"
DestStr="zh"
link(onReplace,16045438:doReplace,[])
}
Add(Replace,16045438,448,70)
{
SubStr="з"
DestStr="z"
link(onReplace,7316617:doReplace,[])
}
Add(Replace,7316617,490,70)
{
SubStr="и"
DestStr="i"
link(onReplace,7859333:doReplace,[])
}
Add(Replace,7859333,532,70)
{
SubStr="й"
DestStr="i"
link(onReplace,4297793:doReplace,[])
}
Add(Replace,4297793,574,70)
{
SubStr="к"
DestStr="k"
link(onReplace,14445077:doReplace,[])
}
Add(Replace,14445077,616,70)
{
SubStr="л"
DestStr="l"
link(onReplace,2487017:doReplace,[])
}
Add(Replace,2487017,658,70)
{
SubStr="м"
DestStr="m"
link(onReplace,13580692:doReplace,[])
}
Add(Replace,13580692,700,70)
{
SubStr="н"
DestStr="n"
link(onReplace,634748:doReplace,[])
}
Add(Replace,634748,742,70)
{
SubStr="о"
DestStr="o"
link(onReplace,439275:doReplace,[])
}
Add(Replace,439275,784,70)
{
SubStr="п"
DestStr="p"
link(onReplace,10546314:doReplace,[])
}
Add(Replace,10546314,826,70)
{
SubStr="р"
DestStr="r"
link(onReplace,5604329:doReplace,[])
}
Add(Replace,5604329,868,70)
{
SubStr="с"
DestStr="s"
link(onReplace,8844822:doReplace,[])
}
Add(Replace,8844822,910,70)
{
SubStr="т"
DestStr="t"
link(onReplace,1176478:doReplace,[])
}
Add(Replace,1176478,952,70)
{
SubStr="у"
DestStr="u"
link(onReplace,2638968:doReplace,[])
}
Add(Replace,2638968,994,70)
{
SubStr="ф"
DestStr="f"
link(onReplace,2325184:doReplace,[])
}
Add(Replace,2325184,1036,70)
{
SubStr="х"
DestStr="h"
link(onReplace,7324732:doReplace,[])
}
Add(Replace,7324732,1078,70)
{
SubStr="ц"
DestStr="tc"
link(onReplace,7644681:doReplace,[])
}
Add(Replace,7644681,1118,70)
{
SubStr="ч"
DestStr="ch"
link(onReplace,5102336:doReplace,[])
}
Add(Replace,5102336,1160,70)
{
SubStr="ш"
DestStr="sh"
link(onReplace,1683350:doReplace,[])
}
Add(Replace,1683350,1202,70)
{
SubStr="щ"
DestStr="sh"
link(onReplace,713049:doReplace,[])
}
Add(Replace,713049,1244,70)
{
SubStr="ь"
link(onReplace,2888230:doReplace,[])
}
Add(Replace,12869705,1370,70)
{
SubStr="э"
DestStr="a"
link(onReplace,10021912:doReplace,[])
}
Add(Replace,12585389,1328,70)
{
SubStr="ъ"
link(onReplace,12869705:doReplace,[])
}
Add(Replace,2888230,1286,70)
{
SubStr="ы"
DestStr="y"
link(onReplace,12585389:doReplace,[])
}
Add(Replace,10021912,1412,70)
{
SubStr="ю"
DestStr="yu"
link(onReplace,7662520:doReplace,[])
}
Add(Replace,7662520,1454,70)
{
SubStr="я"
DestStr="ya"
link(onReplace,1073863:doReplace,[])
}
Add(StrCase,7056492,63,70)
{
link(onModify,11439842:doReplace,[])
link(Str,12137061:Data1,[])
}
Add(Replace,1073863,1510,70)
{
SubStr=" "
DestStr="_"
link(onReplace,12137061:onEvent1,[])
}
END_SDK
Add(Edit,9848688,529,151)
{
Left=220
Top=90
Width=160
Font=[Times New Roman,10,0,0,204]
Enabled=1
Text=""
Point(doSetFocus)
}


--- Добавлено в 2018-10-22 11:20:28

вверхнем поле вводи русские буквы

Редактировалось 1 раз(а), последний 2018-10-22 11:20:28
карма: 0

0
Разработчик
Ответов: 26061
Рейтинг: 2120
#19: 2018-10-22 12:08:03 ЛС | профиль | цитата
zhorik5 писал(а):
можно примерно так!

Весь твой мультик меняется на
Tad писал(а):
вот этот компонент
Add(MultiReplace,13466306,406,217)
{
}
поставь на поле HiAsm, выдели его и нажми F1.Откроется Справка.
Там есть 2 примера.
Первый - русскй в транслит ,
второй - обратно.


Редактировалось 1 раз(а), последний 2018-10-22 12:09:11
карма: 22

0
Ответов: 16884
Рейтинг: 1239
#20: 2018-10-22 13:45:17 ЛС | профиль | цитата
nesco, ты чего? Чел читать не умеет.
Add(Edit,8947271,161,119)
{
Left=220
Top=10
Width=160
Font=[Times New Roman,10,0,0,204]
Text=""
Point(doSetFocus)
link(onChange,13466306:doMultiReplace,[])
}
Add(MainForm,6950382,98,126)
{
Width=505
Height=516
}
Add(MultiReplace,13466306,210,119)
{
ReplaceList="\r\nа=a;\r\nб=b;\r\nв=v;\r\nг=g;\r\nд=d;\r\nе=e;\r\nё=yo;\r\nж=zh;\r\nз=z;\r\nи=i;\r\nй=y;\r\nк=k;\r\nл=l;\r\nм=m;\r\nн=n;\r\nо=o;\r\nп=p;\r\nр=r;\r\nс=s;\r\nт=t;\r\nу=u;\r\nф=f;\r\nх=h;\r\nц=c;\r\nч=ch;\r\nш=sh;\r\nщ=shch;\r\nь=';\r\nы=q;\r\nъ=';\r\nэ=ye;\r\nю=yu;\r\nя=ya;\r\nА=A;\r\nБ=B;\r\nВ=V;\r\nГ=G;\r\nД=D;\r\nЕ=E;\r\nЁ=Yo;\r\nЖ=Zh;\r\nЗ=Z;\r\nИ=I;\r\nЙ=Y;\r\nК=K;\r\nЛ=L;\r\nМ=M;\r\nН=N;\r\nО=O;\r\nП=P;\r\nР=R;\r\nС=S;\r\nТ=T;\r\nУ=U;\r\nФ=F;\r\nХ=H;\r\nЦ=C;\r\nЧ=Ch;\r\nШ=Sh;\r\nЩ=Shch;\r\nЬ=';\r\nЫ=Q;\r\nЪ=';\r\nЭ=Ye;\r\nЮ=Yu;\r\nЯ=Ya;\r\n"
link(onResult,8947271:doText2,[(249,125)(249,107)(150,107)(150,132)])
}

Tad писал(а):
stimka, на 1-й странице пож. портянку убери.


Редактировалось 1 раз(а), последний 2018-10-22 13:55:44
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Разработчик
Ответов: 26061
Рейтинг: 2120
#21: 2018-10-22 14:01:48 ЛС | профиль | цитата
Tad писал(а):
Чел читать не умеет

Это другой чел. Тот нашел какой-то сторонний компонент, а этот попытался пропихнуть старый, как г... мамонта мульт.

Редактировалось 1 раз(а), последний 2018-10-22 14:03:31
карма: 22

0
Ответов: 188
Рейтинг: 2
#22: 2018-10-22 15:17:37 ЛС | профиль | цитата
Да действительно код сокращает. столкнулся с такой проблемой, указание мягких звуков апострофом а потом дальнейшая запись в базу данных дают ошибку. так как апостроф является частью синтаксиса в sqlite. Пришлось не использовать их совсем
карма: 0

0
Разработчик
Ответов: 26061
Рейтинг: 2120
#23: 2018-10-22 15:32:02 ЛС | профиль | цитата
zhorik5 писал(а):
Да действительно код сокращает

Во, млин, а для чего же он тогда, как не для этого, разрабатывался? Да, он не может всего, что может дискретный элемент, но существенно снижает код именно в случае с глобальной заменой букв.
карма: 22

0
Главный модератор
Ответов: 2997
Рейтинг: 395
#24: 2018-10-22 15:58:16 ЛС | профиль | цитата
Tad писал(а):
stimka, на 1-й странице пож. портянку убери.

Скорее всего stimka, не в теме о чём его просят. Может даже слова такого не знает, не говоря уже о втором смысле. Тупо игнорит всех: "Молчишь - за умного сойдёшь". После 3-го предупреждения совсем замолчит.
карма: 6
Дорогу осилит идущий. Install/Update HiAsm.NET
0
Ответов: 26
Рейтинг: 2
#25: 2018-10-23 09:01:15 ЛС | профиль | цитата
Спасибо большое)
Nic - мои извинения,портянку убрал.

Ввод Ф.И.О сделал по своему, но главное работает. У имени и отчества оставил только первые буквы, после этого делал транслит и соединяю все, что бы получился логин вида ИОФамилия.

Add(Label,9553692,161,14)
{
Left=5
Top=5
Width=99
Height=17
Font=[MS Sans Serif,8,1,0,1]
Caption="Текущий дилер:"
}
Add(DS_SQLite,16168490,336,182)
{
Name="mdb"
FileName=".\mydbase.db"
link(onOpen,10454492:doExec,[])
}
Add(DSC_Exec,10454492,378,182)
{
SQL="CREATE TABLE IF NOT EXISTS table1 (\r\n id INTEGER PRIMARY KEY, \r\n login TEXT, \r\n password_flexta TEXT, \r\n password_mmf TEXT,\r\n name TEXT,\r\n lastname TEXT,\r\n middle_name TEXT,\r\n phone TEXT,\r\n email TEXT,\r\n diller TEXT);"
DSManager="mdb"
link(onExec,11160510:doWork2,[])
}
Add(DSC_Query,8749579,434,182)
{
SQL="SELECT * FROM table1"
DSManager="mdb"
link(onQuery,7046293:doStr,[])
link(onColumns,16423861:doClear,[])
}
Add(HubEx,11160510,420,182)
{
link(onEvent,8749579:doQuery,[])
}
Add(Clipboard,1702344,574,343)
{
Point(PutText)
link(PutText,12157800:Var1,[(580,221)(573,221)])
}
Add(StringTable,16423861,532,182)
{
Left=5
Top=25
Width=940
Height=430
Columns=#6:id = 0|9:Логин=100|15:Пароль Flex=100|14:Пароль MMF=100|11:Фамилия=100|7:Имя=100|12:Отчество=100|11:Телефон=100|9:Почта=100|9:Дилер=100|
StrDelimiter="\9"
Grid=0
Point(onLineChange)
Point(onMouseDown)
link(onClick,1702344:doPutText,[(553,188)(553,349)])
link(onMouseDown,2113964:doCompare,[])
}
Add(MT_String,7046293,476,182)
{
Delimeter="\9"
link(onResult,16423861:doAdd,[])
}
Add(If_else,2113964,581,196)
{
Op2=Integer(1)
link(onTrue,413758:doPopupHere,[])
}
Add(PopupMenu,413758,630,196)
{
Menu=#1:-|8:Добавить|13:Редактировать|7:Удалить|
link(onClick,4227948:doWork1,[])
}
Add(ChildGroupBox,4227948,679,196)
{
link(onEvent1,11160510:doWork1,[(725,202)(725,164)(424,164)])
link(Data1,12157800:Var3,[(685,184)(608,184)(608,232)])
}
BEGIN_SDK
Add(EditMulti,1213037,21,21)
{
EventCount=1
WorkCount=4
DataCount=1
Width=1231
Height=669
VOffset=231
HOffset=469
link(doWork1,13087063:doEvent1,[])
link(doWork4,5680046:doText,[(305,279)(305,454)])
}
Add(GroupBox,12718273,203,245)
{
Left=300
Top=90
Width=286
Height=318
Font=[Courier New,11,1,255,204]
Visible=1
Point(onShow)
Point(onHide)
Point(doCaption)
Point(doVisible)
link(onShow,12815439:doTimer,[(639,251)(639,468)])
}
Add(Label,5908440,483,287)
{
Left=24
Top=22
Width=75
Height=255
Font=[Courier New,8,1,16711680,204]
Caption="Логин\r\n\r\nFLEX пароль\r\n\r\nMMF пароль\r\n\r\nФамилия\r\n\r\nИмя\r\n\r\nОтчество\r\n\r\nТелефон\r\n\r\nПочта\r\n\r\nДилер"
AutoSize=1
Alignment=1
}
Add(Hub,13087063,70,252)
{
OutCount=3
link(onEvent1,7561976:doGetString,[(91,258)(91,216)])
link(onEvent2,13657285:doWork2,[])
}
Add(Button,11375044,71,280)
{
Left=187
Top=280
Width=90
Height=30
Font=[Courier New,10,1,0,204]
Caption=""
Data=Integer(0)
Point(doCaption)
link(onClick,14488858:doWork2,[])
}
Add(Button,13875369,246,511)
{
Left=107
Top=280
Width=85
Height=30
Font=[Courier New,10,1,0,204]
Caption=""
Point(doCaption)
Point(doEnabled)
link(onClick,8899351:doCompare,[])
}
Add(StrList,7561976,98,196)
{
Strings=#0:|73:SELECT "NULL","","%2","%3","","","","","","";#Сохранить#Отменить#Добавить|64:SELECT * FROM table1 WHERE id=%1;#Изменить#Отменить#Редактировие|58:SELECT * FROM table1 WHERE id=%1;#Delete#Отменить#Удаление|
Point(doGetString)
Point(onGetString)
link(onGetString,5252796:doSplit,[(138,209)(138,202)])
}
Add(MultiStrData,5252796,147,196)
{
Char="#"
Count=5
link(onPart1,9894261:doEvent1,[])
link(onPart2,6890441:In,[])
link(onPart3,11375044:doCaption,[(243,216)(243,337)(52,337)(52,286)])
link(onPart4,12718273:doCaption,[(187,223)(187,251)])
}
Add(InfoTip,5120779,791,21)
{
Info=#14:TABLE table1 (|25: id INTEGER PRIMARY KEY, |13: login TEXT, |23: password_flexta TEXT, |19: password_mmf TEXT,|11: name TEXT,|15: lastname TEXT,|18: middle_name TEXT,|12: phone TEXT,|12: email TEXT,|14: diller TEXT);|
HAlign=0
Width=155
Height=151
Margin=3
}
Add(FormatStr,6713268,434,189)
{
DataCount=3
Mask=""
Point(doMask)
link(onFString,779202:doQuery,[])
link(Str1,16520772:Var3,[(440,166)])
link(Str2,5478221:GetData,[])
link(Str3,4642043:Result,[(454,170)(510,170)])
}
Add(Hub,9894261,406,196)
{
OutCount=3
link(onEvent1,6713268:doMask,[])
link(onEvent2,6713268:doString,[(427,209)(427,195)])
link(onEvent3,1350555:doWork1,[(432,216)(432,370)(191,370)(191,524)])
}
Add(StringGen,1531133,560,112)
{
Count=8
Charset="ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789abcdefghijkl$#@%^&*mnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ"
link(onResult,6556718:doModify,[(622,118)(622,125)])
}
Add(StringGen,4642043,504,119)
{
Count=8
Charset="ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789abcdefghijkl$#@%^&*mnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ"
link(onResult,1531133:doGenerateRnd,[])
}
Add(EventFromData,5478221,441,126)
{
link(onEvent,4642043:doGenerateRnd,[])
}
Add(DSC_Query,779202,476,189)
{
DSManager="parent.mdb"
link(onQuery,14234011:doSeparateMT,[])
}
Add(MT_MultiData,14234011,518,189)
{
Count=10
link(onData1,5114523:doValue,[])
link(onData2,2292335:doText2,[(684,202)(684,216)])
link(onData3,14710713:doText2,[(667,209)(667,258)])
link(onData4,15106271:doText2,[(667,216)(667,286)])
link(onData5,16150563:doText2,[(650,223)(650,314)])
link(onData6,15135751:doText2,[(632,230)(632,328)])
link(onData7,8785249:doText2,[(607,237)(607,384)])
link(onData8,6928789:doText2,[(597,244)(597,405)])
link(onData9,13945313:doText2,[(573,251)(573,433)])
link(onData10,5680046:doText2,[(541,258)(541,461)])
}
Add(Memory,5114523,903,189)
{
}
Add(Edit,2292335,847,203)
{
Left=109
Top=23
Width=170
Text=""
link(onChange,10217509:doWork1,[(942,209)])
}
Add(Edit,14710713,784,245)
{
Left=109
Top=54
Width=170
Text=""
}
Add(Edit,15106271,770,273)
{
Left=109
Top=88
Width=170
Text=""
}
Add(Edit,16150563,728,301)
{
Left=109
Top=117
Width=170
Text=""
link(onChange,7472034:doEvent1,[(830,307)(830,304)])
}
Add(Edit,15135751,686,315)
{
Left=109
Top=145
Width=170
Text=""
link(onChange,11947655:doEvent1,[(731,321)(731,347)])
}
Add(Edit,8785249,707,371)
{
Left=109
Top=172
Width=170
Text=""
link(onChange,8628100:doWork2,[])
}
Add(Edit,6928789,637,392)
{
Left=109
Top=200
Width=170
Text=""
link(onChange,12675891:doWork2,[])
}
Add(Edit,13945313,602,420)
{
Left=109
Top=228
Width=170
Text=""
link(onChange,4833379:doWork2,[])
}
Add(Edit,5680046,588,448)
{
Left=109
Top=256
Width=170
Text=""
link(onChange,15936237:doWork2,[])
}
Add(FormatStr,13909,840,511)
{
DataCount=10
Mask="INSERT OR REPLACE INTO table1 VALUES(%10,"%9","%8","%7","%6","%5","%4","%3","%2","%1");"
link(onFString,14832850:doWork2,[])
link(Str1,5680046:Text,[(846,492)(594,492)])
link(Str2,13945313:Text,[(853,457)(608,457)])
link(Str3,6928789:Text,[(860,432)(643,432)])
link(Str4,8785249:Text,[(867,450)(713,450)])
link(Str5,15135751:Text,[(874,391)(692,391)])
link(Str6,16150563:Text,[(881,359)(734,359)])
link(Str7,15106271:Text,[(888,348)(776,348)])
link(Str8,14710713:Text,[(895,338)(790,338)])
link(Str9,2292335:Text,[(902,328)(853,328)])
link(Str10,5114523:Value,[])
}
Add(LineBreak,818287,28,511)
{
link(Out,1884625:doValue,[])
Primary=[6890441,161,-308]
}
Add(DSC_Exec,854673,945,511)
{
DSManager="parent.mdb"
link(onExec,5868848:doEvent1,[])
}
Add(ChanelToIndex,13657285,140,252)
{
link(onIndex,12718273:doVisible,[])
}
Add(Hub,5868848,987,511)
{
link(onEvent1,1213037:onEvent1,[(1013,517)(1013,258)(1033,261)])
link(onEvent2,3069801:In,[])
}
Add(HubEx,14488858,107,280)
{
Angle=3
link(onEvent,13657285:doWork1,[(111,258)])
}
Add(Memory,1884625,84,511)
{
link(onData,236076:doEvent1,[])
}
Add(If_else,8899351,294,511)
{
Type=5
Op2=String(Delete)
link(onTrue,13909:doString,[])
link(onFalse,11585124:doEvent1,[])
link(Op1,1884625:Value,[(300,496)(119,496)(119,555)(90,555)])
}
Add(FormatStr,10426873,392,525)
{
Mask="DELETE FROM table1 WHERE id=%1;"
link(onFString,14832850:doWork3,[(921,531)])
link(Str1,16520772:Var1,[(398,166)])
}
Add(HubEx,14832850,917,511)
{
link(onEvent,854673:doExec,[])
}
Add(EventFromData,5249066,427,63)
{
link(onEvent,10572986:doSplit,[])
}
Add(StrPart,10572986,490,63)
{
Char="\9"
link(onPart,5249066:doData,[(535,76)(535,52)(415,52)(415,69)])
link(Str,1213037:Data1,[])
}
Add(ChanelToIndex,1350555,203,518)
{
link(onIndex,13875369:doEnabled,[])
}
Add(Hub,11585124,343,518)
{
link(onEvent1,9824083:doWork1,[(370,524)])
link(onEvent2,10426873:doString,[])
}
Add(GetDataEx,16520772,427,161)
{
link(Data,5249066:GetData,[])
}
Add(LineBreak,15552499,70,315)
{
link(Out,14488858:doWork3,[(111,321)])
Primary=[3069801,945,203]
}
Add(HubEx,15936237,931,448)
{
Angle=1
link(onEvent,9824083:doWork2,[(935,559)])
}
Add(HubEx,4833379,931,420)
{
Angle=1
link(onEvent,15936237:doWork1,[])
}
Add(HubEx,12675891,931,392)
{
Angle=1
link(onEvent,4833379:doWork1,[])
}
Add(HubEx,14257883,931,336)
{
Angle=1
link(onEvent,12675891:doWork1,[])
}
Add(HubEx,12293383,938,308)
{
Angle=1
link(onEvent,14257883:doWork1,[(942,328)(935,328)])
}
Add(HubEx,9824083,366,553)
{
Angle=2
link(onEvent,5048396:doWork3,[(191,559)])
}
Add(If_else,3298324,147,525)
{
Op2=String(Delete)
link(onTrue,5048396:doWork2,[])
}
Add(Hub,236076,119,511)
{
link(onEvent1,13875369:doCaption,[])
link(onEvent2,3298324:doCompare,[(140,524)(140,531)])
}
Add(HubEx,5048396,187,525)
{
link(onEvent,1350555:doWork2,[])
}
Add(Hub,7472034,872,298)
{
link(onEvent1,12672757:doTranslit,[(926,304)(926,307)])
link(onEvent2,10217509:doWork2,[(912,311)(912,300)])
}
Add(HubEx,10217509,938,294)
{
Angle=1
link(onEvent,12293383:doWork1,[])
}
Add(Translit,12672757,1057,301)
{
AlphabetTranslit="a\r\nb\r\nv\r\ng\r\nd\r\ne\r\nyo\r\nzh\r\nz\r\ni\r\ny\r\nk\r\nl\r\nm\r\nn\r\no\r\np\r\nr\r\ns\r\nt\r\nu\r\nf\r\nh\r\nc\r\nch\r\nsh\r\nshch\r\n\r\nq\r\n'\r\nye\r\nyu\r\nya\r\nA\r\nB\r\nV\r\nG\r\nD\r\nE\r\nYo\r\nZh\r\nZ\r\nI\r\nY\r\nK\r\nL\r\nM\r\nN\r\nO\r\nP\r\nR\r\nS\r\nT\r\nU\r\nF\r\nH\r\nC\r\nCh\r\nSh\r\nShch\r\n'\r\nQ\r\n'\r\nYe\r\nYu\r\nYa"
link(onResult,10189077:doWork3,[(1108,307)])
}
Add(Hub,7896026,753,151)
{
InCount=3
OutCount=1
}
Add(Hub,11947655,750,341)
{
link(onEvent1,4103624:doTranslit,[(874,347)(874,346)])
link(onEvent2,14257883:doWork2,[(848,354)(848,342)])
}
Add(Hub,9587570,813,201)
{
InCount=3
OutCount=1
link(onEvent1,2292335:doText,[(854,207)(854,209)])
}
Add(Translit,4103624,962,340)
{
AlphabetTranslit="a\r\nb\r\nv\r\ng\r\nd\r\ne\r\nyo\r\nzh\r\nz\r\ni\r\ny\r\nk\r\nl\r\nm\r\nn\r\no\r\np\r\nr\r\ns\r\nt\r\nu\r\nf\r\nh\r\nc\r\nch\r\nsh\r\nshch\r\n\r\nq\r\n'\r\nye\r\nyu\r\nya\r\nA\r\nB\r\nV\r\nG\r\nD\r\nE\r\nYo\r\nZh\r\nZ\r\nI\r\nY\r\nK\r\nL\r\nM\r\nN\r\nO\r\nP\r\nR\r\nS\r\nT\r\nU\r\nF\r\nH\r\nC\r\nCh\r\nSh\r\nShch\r\n'\r\nQ\r\n'\r\nYe\r\nYu\r\nYa"
link(onResult,5160855:doEnum,[(1004,346)(1004,342)])
}
Add(FormatStr,10274204,1092,406)
{
DataCount=3
Mask="%1%2%3"
link(onFString,10189077:doWork1,[(1136,412)(1136,300)])
link(Str1,5160855:Part,[(1098,387)(1021,387)])
link(Str2,1711275:Part,[(1105,394)(1063,394)(1063,447)(1021,447)])
link(Str3,12672757:Result,[(1112,370)(1063,370)])
}
Add(Hub,13748648,729,607)
{
}
Add(Str_Enum,5160855,1008,336)
{
Delimiter=""
Direct=1
}
Add(Translit,6262928,962,403)
{
AlphabetTranslit="a\r\nb\r\nv\r\ng\r\nd\r\ne\r\nyo\r\nzh\r\nz\r\ni\r\ny\r\nk\r\nl\r\nm\r\nn\r\no\r\np\r\nr\r\ns\r\nt\r\nu\r\nf\r\nh\r\nc\r\nch\r\nsh\r\nshch\r\n\r\nq\r\n'\r\nye\r\nyu\r\nya\r\nA\r\nB\r\nV\r\nG\r\nD\r\nE\r\nYo\r\nZh\r\nZ\r\nI\r\nY\r\nK\r\nL\r\nM\r\nN\r\nO\r\nP\r\nR\r\nS\r\nT\r\nU\r\nF\r\nH\r\nC\r\nCh\r\nSh\r\nShch\r\n'\r\nQ\r\n'\r\nYe\r\nYu\r\nYa"
link(onResult,1711275:doEnum,[])
}
Add(Str_Enum,1711275,1008,403)
{
Delimiter=""
Direct=1
}
Add(HubEx,10189077,1104,294)
{
Angle=3
link(onEvent,9587570:doEvent1,[(1108,282)(801,282)(801,207)])
}
Add(HubEx,8628100,756,371)
{
link(onEvent,2514528:doWork2,[])
}
Add(HubEx,2514528,770,371)
{
link(onEvent,6262928:doTranslit,[(781,379)(851,377)(851,409)])
}
Add(Timer,12815439,1043,462)
{
link(onTimer,10274204:doString,[(1083,468)(1083,412)])
}
Add(StrCase,6556718,651,119)
{
Type=2
link(onModify,5478221:doData,[(695,125)(695,129)(429,129)(429,132)])
}
END_SDK
Add(MainForm,7057179,161,182)
{
Width=971
Height=501
Caption="SD 1.0 | Добавление сотрудников на портал MMF и Flextera"
Position=1
Point(onClose)
Point(doVisible)
link(onActivate,8735839:doTimer,[(447,188)(447,300)])
link(onCreate,5022074:doEvent1,[(231,202)(231,213)])
link(onClose,16168490:doClose,[(265,209)(265,195)])
}
Add(ChildFormEx,15591400,252,329)
{
link(onTrue,7057179:doVisible,[(429,335)(429,247)(149,247)(149,216)])
link(onDeactivate,7057179:doClose,[(296,342)(296,276)(149,276)(149,209)])
}
BEGIN_SDK
Add(EditMultiEx,7613607,21,21)
{
WorkCount=#6:doPass|
EventCount=#6:onTrue|12:onDeactivate|5:Close|9:onMessage|
Width=356
link(doPass,420551:doShowModal,[(53,27)(53,146)])
}
Add(MainForm,420551,84,112)
{
Left=35
Top=105
Width=327
Height=138
Font=[MS Serif,8,1,0,204]
Visible=1
Caption="SD 1.0 | Авторизация "
TransparentColor=16776960
ClientSize=0
Position=1
Point(doShowModal)
Point(doPicture)
Point(Close)
}
Add(Edit,2935332,161,56)
{
Left=20
Top=30
Width=260
Text=""
Password=0
link(onEnter,11712562:doHashsum,[(205,69)(205,37)(147,37)(147,125)])
}
Add(Hashsum,11712562,161,119)
{
link(onResult,11975890:doCompare,[])
link(Data,2935332:Text,[])
}
Add(If_else,11975890,231,119)
{
link(onTrue,8574456:doEvent1,[])
link(onFalse,12707242:doMessage,[(274,132)(274,160)])
link(Op2,726434:Value,[])
}
Add(Memory,726434,238,56)
{
@Hint=#17:Password HashSumm|
Default=String(E10ADC3949BA59ABBE56E057F20F883E)
AddHint(284,-11,118,13,@Hint)
}
Add(Hub,8574456,280,119)
{
link(onEvent1,420551:doClose,[(305,125)(305,27)(67,27)(67,139)])
link(onEvent2,7613607:onTrue,[(336,132)(336,27)])
}
Add(Message,12707242,315,154)
{
Message="Incorrect Password"
Caption="Error"
link(onMessage,7613607:onMessage,[(362,160)(362,48)])
}
Add(Label,131362,98,70)
{
Left=105
Top=10
Width=99
Height=17
Font=[MS Sans Serif,8,1,0,1]
Caption="Введите пароль"
}
END_SDK
Add(Hub,5022074,270,207)
{
link(onEvent1,15591400:doPass,[(296,213)(296,246)(142,246)(142,335)])
link(onEvent2,16168490:doOpen,[(310,220)(310,188)])
}
Add(GetDataEx,12157800,567,227)
{
Angle=3
link(Data,16423861:Select,[(545,232)])
}
Add(Edit,5552243,755,197)
{
Left=105
Top=4
Width=135
Text=""
}
Add(Timer,8735839,700,294)
{
link(onTimer,10216049:doString,[(793,300)(793,272)])
}
Add(FormatStr,10216049,854,266)
{
DataCount=1
Mask="%1"
link(onFString,4227948:doWork4,[(891,272)(891,244)(667,244)(667,223)])
link(Str1,5552243:Text,[(860,258)(761,258)])
}

Спасибо ребят, без вас не справился бы)
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#26: 2018-10-23 10:09:02 ЛС | профиль | цитата
Нет слов... (Жаль матом здесь нельзя)
Как говорит одна моя знакомая:
Молод в яйцах и слаб в коленках.

Только без обид.

Редактировалось 2 раз(а), последний 2018-10-23 10:14:41
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 26
Рейтинг: 2
#27: 2018-10-23 10:28:48 ЛС | профиль | цитата
Да никаких обид ) Я только учусь, поэтому как любой новичок могу наделать глупостей. А любому новичку что обычно нужно "Работает, да и черт с ним". Программу делаю все равно для себя. До этого использовал Excel, но было не удобно.)
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#28: 2018-10-23 10:58:46 ЛС | профиль | цитата
1. Запрос пароля - нажал на КРЕСТИК или Alt+F4 и уже пароль не нужен.
2.
stimka писал(а):
У имени и отчества оставил только первые буквы, после этого делал транслит и соединяю все, что бы получился логин вида ИОФамилия.
А не проще сначала соединить, а потом транслит? Два TRANSLIT долой.
3.
Применить такой порядок ввода данных
и т.д. и т.п.

Редактировалось 2 раз(а), последний 2018-10-23 11:01:19
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 26
Рейтинг: 2
#29: 2018-10-24 20:30:08 ЛС | профиль | цитата
Коллеги, помогите ещё раз пожалуйста )

Начинаю вносить копипастом пользователей из Word документа и сохраняю в БД.
После этого начинаю копипастить обратно из таблицы уже на сайт, а там такая вот кракозябра ×ÅÐÍÅÃÀ
Понимаю что проблема в кодировке, но вот где именно, не могу найти, уже голову сломал.
Онлайн декодер показывает что это CP1252.


Add(DS_SQLite,16168490,336,182)
{
Name="mdb"
FileName=".\mydbase.db"
link(onOpen,10454492:doExec,[])
}
Add(DSC_Exec,10454492,378,182)
{
SQL="CREATE TABLE IF NOT EXISTS table1 (\r\n id INTEGER PRIMARY KEY, \r\n login TEXT, \r\n password_flexta TEXT, \r\n password_mmf TEXT,\r\n name TEXT,\r\n lastname TEXT,\r\n middle_name TEXT,\r\n phone TEXT,\r\n email TEXT,\r\n diller TEXT);"
DSManager="mdb"
link(onExec,11160510:doWork2,[])
}
Add(DSC_Query,8749579,420,182)
{
SQL="SELECT * FROM table1"
DSManager="mdb"
link(onQuery,7046293:doStr,[])
link(onColumns,16423861:doClear,[(471,195)(471,251)])
}
Add(HubEx,11160510,420,182)
{
link(onEvent,8749579:doQuery,[])
}
Add(Clipboard,1702344,644,371)
{
Point(PutText)
link(PutText,12157800:Var1,[(650,221)(573,221)])
}
Add(StringTable,16423861,476,238)
{
Left=5
Top=25
Width=940
Height=430
Columns=#6:id = 0|9:Логин=100|15:Пароль Flex=100|14:Пароль MMF=100|11:Фамилия=100|7:Имя=100|12:Отчество=100|11:Телефон=100|9:Почта=100|9:Дилер=100|
StrDelimiter="\9"
Grid=0
Point(onLineChange)
Point(onMouseDown)
link(onClick,1702344:doPutText,[(576,244)(576,377)])
link(onMouseDown,2113964:doCompare,[(544,258)(544,174)])
}
Add(MT_String,7046293,469,182)
{
Delimeter="\9"
link(onResult,16423861:doAdd,[(513,188)(513,216)(464,216)(464,244)])
}
Add(If_else,2113964,581,168)
{
Op2=Integer(1)
link(onTrue,413758:doPopupHere,[(621,174)(621,202)])
}
Add(PopupMenu,413758,630,196)
{
Menu=#1:-|8:Добавить|13:Редактировать|7:Удалить|
link(onClick,4227948:doWork1,[])
}
Add(ChildGroupBox,4227948,679,196)
{
link(onEvent1,11160510:doWork1,[(725,202)(725,164)(424,164)])
link(Data1,12157800:Var3,[(685,184)(608,184)(608,232)])
}
BEGIN_SDK
Add(EditMulti,1213037,21,21)
{
EventCount=1
WorkCount=4
DataCount=1
Width=1231
Height=669
VOffset=231
HOffset=469
link(doWork1,13087063:doEvent1,[(45,258)(45,251)])
link(doWork4,5680046:doText,[(305,279)(305,454)])
}
Add(GroupBox,12718273,203,245)
{
Left=300
Top=90
Width=305
Height=360
Font=[Courier New,11,1,255,204]
Visible=1
Point(onShow)
Point(onHide)
Point(doCaption)
Point(doVisible)
link(onShow,12815439:doTimer,[(639,251)(639,468)])
}
Add(Label,5908440,483,287)
{
Left=24
Top=22
Width=75
Height=290
Font=[Courier New,8,1,16711680,204]
Caption="Логин\r\n\r\nFLEX пароль\r\n\r\nMMF пароль\r\n\r\nФ.И.О*\r\n\r\nФамилия\r\n\r\nИмя\r\n\r\nОтчество\r\n\r\nТелефон\r\n\r\nПочта\r\n\r\nДилер"
AutoSize=1
Alignment=1
}
Add(Hub,13087063,70,245)
{
OutCount=3
link(onEvent1,7561976:doGetString,[(91,251)(91,160)])
link(onEvent2,13657285:doWork2,[(112,258)(112,265)])
}
Add(Button,11375044,71,280)
{
Left=190
Top=310
Width=90
Height=30
Font=[Courier New,10,1,0,204]
Caption=""
Data=Integer(0)
Point(doCaption)
link(onClick,14488858:doWork2,[])
}
Add(Button,13875369,246,511)
{
Left=107
Top=310
Width=85
Height=30
Font=[Courier New,10,1,0,204]
Caption=""
Point(doCaption)
Point(doEnabled)
link(onClick,8899351:doCompare,[])
}
Add(StrList,7561976,98,112)
{
Strings=#0:|73:SELECT "NULL","","%2","%3","","","","","","";#Сохранить#Отменить#Добавить|64:SELECT * FROM table1 WHERE id=%1;#Изменить#Отменить#Редактировие|58:SELECT * FROM table1 WHERE id=%1;#Delete#Отменить#Удаление|
Point(doGetString)
Point(onGetString)
link(onGetString,5252796:doSplit,[(215,125)(138,202)])
}
Add(MultiStrData,5252796,147,196)
{
Char="#"
Count=5
link(onPart1,9894261:doEvent1,[])
link(onPart2,6890441:In,[])
link(onPart3,11375044:doCaption,[(243,216)(243,337)(52,337)(52,286)])
link(onPart4,12718273:doCaption,[(187,223)(187,251)])
}
Add(InfoTip,5120779,791,21)
{
Info=#14:TABLE table1 (|25: id INTEGER PRIMARY KEY, |13: login TEXT, |23: password_flexta TEXT, |19: password_mmf TEXT,|11: name TEXT,|15: lastname TEXT,|18: middle_name TEXT,|12: phone TEXT,|12: email TEXT,|14: diller TEXT);|
HAlign=0
Width=155
Height=151
Margin=3
}
Add(FormatStr,6713268,434,189)
{
DataCount=3
Mask=""
Point(doMask)
link(onFString,779202:doQuery,[])
link(Str1,16520772:Var3,[(440,166)])
link(Str2,5478221:GetData,[])
link(Str3,4642043:Result,[(454,170)(552,170)])
}
Add(Hub,9894261,406,196)
{
OutCount=3
link(onEvent1,6713268:doMask,[])
link(onEvent2,6713268:doString,[(427,209)(427,195)])
link(onEvent3,1350555:doWork1,[(432,216)(432,370)(191,370)(191,524)])
}
Add(StringGen,1531133,602,56)
{
Count=10
Charset="ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz!№;%:?*()_+=ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789!№;%:?*()_+="
link(onResult,6556718:doModify,[(643,62)(643,125)])
}
Add(StringGen,4642043,546,112)
{
Count=10
Charset="ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz!№;%:?*()_+=ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789!№;%:?*()_+="
link(onResult,4734602:doModify,[(586,118)(586,111)])
}
Add(EventFromData,5478221,441,98)
{
link(onEvent,11316628:doModify,[(481,104)(481,125)])
}
Add(DSC_Query,779202,476,189)
{
DSManager="parent.mdb"
link(onQuery,14234011:doSeparateMT,[])
}
Add(MT_MultiData,14234011,518,189)
{
Count=10
link(onData1,5114523:doValue,[(762,195)(762,174)])
link(onData2,2292335:doText2,[(684,202)(684,216)])
link(onData3,14710713:doText2,[(667,209)(667,258)])
link(onData4,15106271:doText2,[(667,216)(667,286)])
link(onData5,16150563:doText2,[(650,223)(650,300)])
link(onData6,15135751:doText2,[(632,230)(632,335)])
link(onData7,8785249:doText2,[(607,237)(607,384)])
link(onData8,6928789:doText2,[(597,244)(597,405)])
link(onData9,13945313:doText2,[(573,251)(573,433)])
link(onData10,5680046:doText2,[(541,258)(541,461)])
}
Add(Memory,5114523,973,168)
{
}
Add(Edit,2292335,861,203)
{
Left=109
Top=23
Width=170
Text=""
ReadOnly=0
link(onChange,10217509:doWork1,[(942,209)])
}
Add(Edit,14710713,812,245)
{
Left=109
Top=54
Width=170
Text=""
}
Add(Edit,15106271,770,273)
{
Left=110
Top=88
Width=170
Text=""
}
Add(Edit,16150563,728,287)
{
Left=110
Top=146
Width=170
Text=""
link(onChange,7472034:doEvent1,[(830,293)(830,304)])
}
Add(Edit,15135751,672,322)
{
Left=109
Top=174
Width=170
Text=""
link(onChange,11947655:doEvent1,[(731,328)(731,347)])
}
Add(Edit,8785249,714,371)
{
Left=109
Top=201
Width=170
Text=""
link(onChange,8628100:doWork2,[])
}
Add(Edit,6928789,637,392)
{
Left=109
Top=229
Width=170
Text=""
link(onChange,12675891:doWork2,[])
}
Add(Edit,13945313,602,420)
{
Left=109
Top=257
Width=170
Text=""
link(onChange,4833379:doWork2,[])
}
Add(Edit,5680046,588,448)
{
Left=109
Top=284
Width=170
Text=""
link(onChange,15936237:doWork2,[])
}
Add(FormatStr,13909,840,511)
{
DataCount=10
Mask="INSERT OR REPLACE INTO table1 VALUES(%10,"%9","%8","%7","%6","%5","%4","%3","%2","%1");"
link(onFString,14832850:doWork2,[])
link(Str1,5680046:Text,[(846,492)(594,492)])
link(Str2,13945313:Text,[(853,457)(608,457)])
link(Str3,6928789:Text,[(860,432)(643,432)])
link(Str4,8785249:Text,[(867,450)(720,450)])
link(Str5,15135751:Text,[(874,391)(678,391)])
link(Str6,16150563:Text,[(881,359)(734,359)])
link(Str7,15106271:Text,[(888,348)(776,348)])
link(Str8,14710713:Text,[(895,338)(818,338)])
link(Str9,2292335:Text,[(902,328)(867,328)])
link(Str10,5114523:Value,[(909,355)(979,355)])
}
Add(LineBreak,12178672,28,511)
{
link(Out,1884625:doValue,[])
Primary=[6890441,161,-308]
}
Add(DSC_Exec,854673,945,511)
{
DSManager="parent.mdb"
link(onExec,5868848:doEvent1,[])
}
Add(ChanelToIndex,13657285,140,252)
{
link(onIndex,12718273:doVisible,[])
}
Add(Hub,5868848,987,511)
{
link(onEvent1,1213037:onEvent1,[(1013,517)(1013,258)(1033,261)])
link(onEvent2,3069801:In,[])
}
Add(HubEx,14488858,107,280)
{
Angle=3
link(onEvent,13657285:doWork1,[(111,258)])
}
Add(Memory,1884625,84,511)
{
link(onData,236076:doEvent1,[])
}
Add(If_else,8899351,294,511)
{
Type=5
Op2=String(Delete)
link(onTrue,13909:doString,[])
link(onFalse,11585124:doEvent1,[])
link(Op1,1884625:Value,[(300,496)(119,496)(119,555)(90,555)])
}
Add(FormatStr,10426873,392,525)
{
Mask="DELETE FROM table1 WHERE id=%1;"
link(onFString,14832850:doWork3,[(921,531)])
link(Str1,16520772:Var1,[(398,166)])
}
Add(HubEx,14832850,917,511)
{
link(onEvent,854673:doExec,[])
}
Add(EventFromData,5249066,427,63)
{
link(onEvent,10572986:doSplit,[])
}
Add(StrPart,10572986,490,63)
{
Char="\9"
link(onPart,5249066:doData,[(535,76)(535,52)(415,52)(415,69)])
link(Str,1213037:Data1,[])
}
Add(ChanelToIndex,1350555,203,518)
{
link(onIndex,13875369:doEnabled,[])
}
Add(Hub,11585124,343,518)
{
link(onEvent1,9824083:doWork1,[(370,524)])
link(onEvent2,10426873:doString,[])
}
Add(GetDataEx,16520772,427,161)
{
link(Data,5249066:GetData,[])
}
Add(LineBreak,10559564,70,315)
{
link(Out,14488858:doWork3,[(111,321)])
Primary=[3069801,945,203]
}
Add(HubEx,15936237,931,448)
{
Angle=1
link(onEvent,9824083:doWork2,[(935,559)])
}
Add(HubEx,4833379,931,420)
{
Angle=1
link(onEvent,15936237:doWork1,[])
}
Add(HubEx,12675891,931,392)
{
Angle=1
link(onEvent,4833379:doWork1,[])
}
Add(HubEx,14257883,931,336)
{
Angle=1
link(onEvent,12675891:doWork1,[])
}
Add(HubEx,12293383,938,308)
{
Angle=1
link(onEvent,14257883:doWork1,[(942,328)(935,328)])
}
Add(HubEx,9824083,366,553)
{
Angle=2
link(onEvent,5048396:doWork3,[(191,559)])
}
Add(If_else,3298324,147,525)
{
Op2=String(Delete)
link(onTrue,5048396:doWork2,[])
}
Add(Hub,236076,119,511)
{
link(onEvent1,13875369:doCaption,[])
link(onEvent2,3298324:doCompare,[(140,524)(140,531)])
}
Add(HubEx,5048396,187,525)
{
link(onEvent,1350555:doWork2,[])
}
Add(Hub,7472034,872,298)
{
link(onEvent1,12672757:doTranslit,[(926,304)(926,307)])
link(onEvent2,10217509:doWork2,[(912,311)(912,300)])
}
Add(HubEx,10217509,938,294)
{
Angle=1
link(onEvent,12293383:doWork1,[])
}
Add(Translit,12672757,1057,301)
{
AlphabetTranslit="a\r\nb\r\nv\r\ng\r\nd\r\ne\r\nyo\r\nzh\r\nz\r\ni\r\ny\r\nk\r\nl\r\nm\r\nn\r\no\r\np\r\nr\r\ns\r\nt\r\nu\r\nf\r\nh\r\nc\r\nch\r\nsh\r\nshch\r\n\r\nq\r\n'\r\nye\r\nyu\r\nya\r\nA\r\nB\r\nV\r\nG\r\nD\r\nE\r\nYo\r\nZh\r\nZ\r\nI\r\nY\r\nK\r\nL\r\nM\r\nN\r\nO\r\nP\r\nR\r\nS\r\nT\r\nU\r\nF\r\nH\r\nC\r\nCh\r\nSh\r\nShch\r\n'\r\nQ\r\n'\r\nYe\r\nYu\r\nYa"
link(onResult,10189077:doWork3,[(1108,307)])
}
Add(Hub,11947655,750,341)
{
link(onEvent1,4103624:doTranslit,[(874,347)(874,346)])
link(onEvent2,14257883:doWork2,[(848,354)(848,342)])
}
Add(Hub,9587570,813,180)
{
InCount=3
OutCount=1
link(onEvent1,2292335:doText,[(910,186)(910,209)])
}
Add(Translit,4103624,962,340)
{
AlphabetTranslit="a\r\nb\r\nv\r\ng\r\nd\r\ne\r\nyo\r\nzh\r\nz\r\ni\r\ny\r\nk\r\nl\r\nm\r\nn\r\no\r\np\r\nr\r\ns\r\nt\r\nu\r\nf\r\nh\r\nc\r\nch\r\nsh\r\nshch\r\n\r\nq\r\n'\r\nye\r\nyu\r\nya\r\nA\r\nB\r\nV\r\nG\r\nD\r\nE\r\nYo\r\nZh\r\nZ\r\nI\r\nY\r\nK\r\nL\r\nM\r\nN\r\nO\r\nP\r\nR\r\nS\r\nT\r\nU\r\nF\r\nH\r\nC\r\nCh\r\nSh\r\nShch\r\n'\r\nQ\r\n'\r\nYe\r\nYu\r\nYa"
link(onResult,5160855:doEnum,[(1004,346)(1004,342)])
}
Add(FormatStr,10274204,1183,406)
{
DataCount=3
Mask="%1%2%3"
link(onFString,10189077:doWork1,[(1220,412)(1220,300)])
link(Str1,5160855:Part,[(1189,387)(1021,387)])
link(Str2,1711275:Part,[(1196,394)(1063,394)(1063,447)(1021,447)])
link(Str3,12672757:Result,[(1203,370)(1063,370)])
}
Add(Hub,13748648,729,607)
{
}
Add(Str_Enum,5160855,1008,336)
{
Delimiter=""
Direct=1
}
Add(Translit,6262928,962,403)
{
AlphabetTranslit="a\r\nb\r\nv\r\ng\r\nd\r\ne\r\nyo\r\nzh\r\nz\r\ni\r\ny\r\nk\r\nl\r\nm\r\nn\r\no\r\np\r\nr\r\ns\r\nt\r\nu\r\nf\r\nh\r\nc\r\nch\r\nsh\r\nshch\r\n\r\nq\r\n'\r\nye\r\nyu\r\nya\r\nA\r\nB\r\nV\r\nG\r\nD\r\nE\r\nYo\r\nZh\r\nZ\r\nI\r\nY\r\nK\r\nL\r\nM\r\nN\r\nO\r\nP\r\nR\r\nS\r\nT\r\nU\r\nF\r\nH\r\nC\r\nCh\r\nSh\r\nShch\r\n'\r\nQ\r\n'\r\nYe\r\nYu\r\nYa"
link(onResult,1711275:doEnum,[])
}
Add(Str_Enum,1711275,1008,403)
{
Delimiter=""
Direct=1
}
Add(HubEx,10189077,1104,294)
{
Angle=3
link(onEvent,9587570:doEvent1,[(1108,282)(801,282)(801,186)])
}
Add(HubEx,8628100,756,371)
{
link(onEvent,2514528:doWork2,[])
}
Add(HubEx,2514528,770,371)
{
link(onEvent,6262928:doTranslit,[(781,379)(851,377)(851,409)])
}
Add(Timer,12815439,1043,462)
{
link(onTimer,10274204:doString,[(1076,468)(1076,412)])
}
Add(StrCase,6556718,651,119)
{
Type=2
link(onModify,5478221:doData,[(695,125)(695,129)(429,129)(429,104)])
}
Add(Edit,749672,1050,35)
{
Left=110
Top=118
Width=170
Text=""
link(onEnter,10029012:doSplit,[(1094,48)(1094,97)(1038,97)(1038,146)])
}
Add(MultiStrData,10029012,1050,140)
{
Char=" "
Count=3
link(Str,749672:Text,[])
link(onPart1,16150563:doText,[(1122,146)(1122,240)(716,240)(716,293)])
link(onPart2,15135751:doText,[(1122,153)(1122,255)(660,255)(660,328)])
link(onPart3,8785249:doText,[(1122,160)(1122,282)(702,282)(702,377)])
}
Add(GetDataEx,10243694,1050,105)
{
}
Add(StrCase,11316628,490,119)
{
Type=2
link(onModify,4642043:doGenerateRnd,[])
}
Add(StrCase,4734602,595,105)
{
Type=2
link(onModify,1531133:doGenerateRnd,[(639,111)(639,90)(590,90)(590,69)])
}
END_SDK
Add(MainForm,7057179,161,182)
{
Width=996
Height=509
Caption="SD 1.0 | Добавление сотрудников на портал MMF и Flextera"
Position=1
Point(onClose)
Point(doVisible)
link(onActivate,8735839:doTimer,[(447,188)(447,300)])
link(onCreate,5022074:doEvent1,[(231,202)(231,213)])
link(onClose,16168490:doClose,[(265,209)(265,195)])
}
Add(ChildFormEx,15591400,252,329)
{
link(onTrue,7057179:doVisible,[(429,335)(429,247)(149,247)(149,216)])
link(onDeactivate,7057179:doClose,[(296,342)(296,276)(149,276)(149,209)])
}
BEGIN_SDK
Add(EditMultiEx,7613607,21,21)
{
WorkCount=#6:doPass|
EventCount=#6:onTrue|12:onDeactivate|5:Close|9:onMessage|
Width=356
link(doPass,420551:doShowModal,[(53,27)(53,146)])
}
Add(MainForm,420551,84,112)
{
Left=35
Top=105
Width=327
Height=138
Font=[MS Serif,8,1,0,204]
Visible=1
Caption="SD 1.0 | Авторизация "
TransparentColor=16776960
ClientSize=0
Position=1
Point(doShowModal)
Point(doPicture)
Point(Close)
}
Add(Edit,2935332,161,56)
{
Left=20
Top=30
Width=260
Text=""
Password=0
link(onEnter,11712562:doHashsum,[(205,69)(205,37)(147,37)(147,125)])
}
Add(Hashsum,11712562,161,119)
{
link(onResult,11975890:doCompare,[])
link(Data,2935332:Text,[])
}
Add(If_else,11975890,231,119)
{
link(onTrue,8574456:doEvent1,[])
link(onFalse,12707242:doMessage,[(274,132)(274,160)])
link(Op2,726434:Value,[])
}
Add(Memory,726434,238,56)
{
@Hint=#17:Password HashSumm|
Default=String(E10ADC3949BA59ABBE56E057F20F883E)
AddHint(284,-11,118,13,@Hint)
}
Add(Hub,8574456,280,119)
{
link(onEvent1,420551:doClose,[(305,125)(305,27)(67,27)(67,139)])
link(onEvent2,7613607:onTrue,[(336,132)(336,27)])
}
Add(Message,12707242,315,154)
{
Message="Incorrect Password"
Caption="Error"
link(onMessage,7613607:onMessage,[(362,160)(362,48)])
}
Add(Label,131362,98,70)
{
Left=105
Top=10
Width=99
Height=17
Font=[MS Sans Serif,8,1,0,1]
Caption="Введите пароль"
}
END_SDK
Add(Hub,5022074,270,207)
{
link(onEvent1,15591400:doPass,[(296,213)(296,246)(142,246)(142,335)])
link(onEvent2,16168490:doOpen,[(310,220)(310,188)])
}
Add(GetDataEx,12157800,567,227)
{
Angle=3
link(Data,16423861:Select,[(489,281)])
}
Add(Edit,5552243,755,197)
{
Left=105
Top=4
Width=135
Text=""
}
Add(Label,9553692,161,14)
{
Left=5
Top=5
Width=99
Height=17
Font=[MS Sans Serif,8,1,0,1]
Caption="Текущий дилер:"
}
Add(Timer,8735839,700,294)
{
link(onTimer,10216049:doString,[(793,300)(793,272)])
}
Add(FormatStr,10216049,854,266)
{
DataCount=1
Mask="%1"
link(onFString,4227948:doWork4,[(891,272)(891,244)(667,244)(667,223)])
link(Str1,5552243:Text,[(860,258)(761,258)])
}

карма: 0

0
Ответов: 16884
Рейтинг: 1239
#30: 2018-10-24 21:36:02 ЛС | профиль | цитата
stimka писал(а):
Начинаю вносить копипастом пользователей из Word документа и сохраняю в БД.
Это делается ОДНИМ SQL ЗАПРОСОМ.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
30
Сообщение
...
Прикрепленные файлы
(файлы не залиты)