Вверх ↑
Ответов: 253
Рейтинг: 0
#1: 2019-04-26 20:04:08 ЛС | профиль | цитата
Леонид, Спасибо большоео) Я бы сказал, "то что надо" Но я тут подумал. мб стоит пойти по пути Tad, с MSSQL.
Хочу разобраться в принципе работы. Я так понимаю это как MySQL только локальный. Покажите пожалуйста как её правильно сделать.
Вот я собрал для MySQL
Код MySQL


Add(MainForm,2953706,21,105)
{
Width=644
Height=307
}
Add(Button,14635023,70,105)
{
Width=80
Caption="Connect"
link(onClick,16017496:doEvent1,[])
}
Add(StringTableMT,4746915,616,126)
{
Top=25
Width=625
Height=240
IconsCheck=[]
MiscIcons=[]
Icons=[]
Point(StringTable)
}
Add(dbMySQL,6351194,245,14)
{
DBName="mp"
Charset=5
}
Add(Hub,16017496,119,105)
{
OutCount=3
link(onEvent1,6351194:doOpen,[(168,111)(168,20)])
link(onEvent2,6351194:doSelectDB,[(168,118)(168,34)])
link(onEvent3,5055448:doData,[])
}
Add(dbMySQL_Query,1845543,420,105)
{
Point(BlobIndex)
Point(Blob)
link(onResult,11279797:doShow,[(471,111)(471,143)(409,143)(409,174)])
link(dbHandle,14143950:getVar,[])
}
Add(dbMySQL_ShowQuery,11279797,420,168)
{
link(Rows,1845543:Rows,[])
link(Fields,1845543:Fields,[])
link(StringTable,4169761:getVar,[])
}
Add(LineBreakEx,6973778,245,56)
{
Caption="BD"
Type=3
link(_Data,6351194:dbHandle,[])
}
Add(LineBreakEx,14143950,420,77)
{
Caption="BD"
Type=2
}
Add(DoData,5055448,175,119)
{
Data=String(SELECT * FROM `fakePhone` )
link(onEventData,9779478:doWork,[])
}
Add(LineBreakEx,6019866,630,175)
{
Caption="tabl"
Type=3
link(_Data,4746915:StringTable,[])
}
Add(LineBreakEx,3029138,350,105)
{
Caption="SELECT"
Type=1
link(OnEvent,1845543:doQuery,[])
}
Add(LineBreakEx,9779478,217,119)
{
Caption="SELECT"
}
Add(LineBreakEx,4169761,434,140)
{
Caption="tabl"
Type=2
}
Add(ChildForm,2553540,70,175)
{
link(onEvent1,14158823:doWork,[])
}
BEGIN_SDK
Add(EditMulti,10991567,21,21)
{
EventCount=1
WorkCount=1
Height=445
link(doWork1,10437466:doVisible,[(39,27)(39,69)])
}
Add(MainForm,10437466,56,35)
{
Left=35
Top=105
Width=277
Height=219
Visible=1
Caption="Поиск"
Point(doVisible)
}
Add(Edit,7650178,77,126)
{
Left=15
Top=25
Width=235
Text=""
}
Add(Button,489420,35,175)
{
Left=185
Top=150
Width=65
link(onClick,5600964:doString,[])
}
Add(FormatStr,5600964,77,175)
{
DataCount=1
Mask="SELECT * FROM `fakePhone` WHERE `Date` LIKE '%%1%' "
Point(FString)
link(onFString,12430602:doWork,[])
link(Str1,7650178:Text,[])
}
Add(LineBreakEx,12430602,119,175)
{
Caption="SELECT"
}
Add(Label,9937628,336,21)
{
Left=15
Top=5
Width=234
Height=17
Caption="По дате"
Alignment=2
}
Add(LineBreakEx,4777035,252,28)
{
Caption="SELECT"
Type=1
link(OnEvent,10991567:onEvent1,[(317,34)(317,27)])
}
END_SDK
Add(Button,11020378,21,175)
{
Left=85
Width=80
Caption="Поиск"
link(onClick,2553540:doWork1,[])
}
Add(LineBreakEx,14158823,112,175)
{
Caption="SELECT"
}
Add(ChildForm,8127545,70,224)
{
link(onEvent1,430420:doWork,[])
}
BEGIN_SDK
Add(EditMulti,5516343,21,21)
{
EventCount=1
WorkCount=1
Height=445
link(doWork1,7630075:doVisible,[(39,27)(39,69)])
}
Add(MainForm,7630075,56,35)
{
Left=35
Top=105
Width=277
Height=279
Visible=1
Caption="Добавить"
Point(doVisible)
}
Add(Edit,12425440,56,91)
{
Left=15
Top=25
Width=235
Text=""
}
Add(Button,12405949,35,175)
{
Left=15
Top=215
Width=235
Caption="Добавить"
link(onClick,4758017:doString,[])
}
Add(FormatStr,4758017,77,175)
{
DataCount=5
Mask="INSERT INTO `fakePhone` (`id`, `PhoneFake`, `PhoneReal`, `LinkObject`, `IDObject`, `LinkUser`, `Date`) VALUES (NULL, '%1', '%2', '%3', '%4', '%5', CURRENT_TIMESTAMP);"
Point(FString)
link(onFString,8576538:doWork,[])
link(Str1,12425440:Text,[(83,149)(62,149)])
link(Str2,14963072:Text,[(90,149)(104,149)])
link(Str3,2470256:Text,[(97,149)(146,149)])
link(Str4,1302273:Text,[(104,149)(188,149)])
link(Str5,5049837:Text,[(111,149)(230,149)])
}
Add(LineBreakEx,8576538,140,175)
{
Caption="SELECT"
}
Add(Label,3672942,336,21)
{
Left=15
Top=5
Width=234
Height=17
Caption="Фейковый номер"
Alignment=2
}
Add(LineBreakEx,555574,252,28)
{
Caption="SELECT"
Type=1
link(OnEvent,5516343:onEvent1,[(317,34)(317,27)])
}
Add(Edit,14963072,98,91)
{
Left=15
Top=65
Width=235
Text=""
}
Add(Label,7763520,336,56)
{
Left=15
Top=45
Width=235
Height=17
Caption="Реальный номер"
Alignment=2
}
Add(Edit,2470256,140,91)
{
Left=15
Top=105
Width=235
Text=""
}
Add(Label,2112165,336,98)
{
Left=15
Top=85
Width=232
Height=17
Caption="Ссылка на объект"
Alignment=2
}
Add(Edit,1302273,182,91)
{
Left=15
Top=145
Width=235
Text=""
}
Add(Label,12858485,336,140)
{
Left=15
Top=125
Width=235
Height=17
Caption="ID объекта"
Alignment=2
}
Add(Edit,5049837,224,91)
{
Left=15
Top=190
Width=235
Text=""
}
Add(Label,14681159,336,182)
{
Left=15
Top=170
Width=235
Height=17
Caption="Ссылка на профель"
Alignment=2
}
END_SDK
Add(Button,14545104,21,224)
{
Left=170
Width=80
Caption="Добавить"
link(onClick,8127545:doWork1,[])
}
Add(LineBreakEx,430420,112,224)
{
Caption="SELECT"
}

Можно сделать что-то похожее только для локального пользования. Чтобы также можно было забросы делать?
карма: 0

0