HiAsm
HiAsm
Вверх ↑
ФорумыПрочееПомогите новичку! ← Ctrl12345678910...1213141516Ctrl →
Этот топик читают: Гость
Администрация
Ответов: 15295
Рейтинг: 1519
#76: 2009-04-12 17:03:21 ЛС | профиль | цитата
Tad писал(а):
на хинте информация по Left, Top, Width совершенно лишняя

а как среда должна узнать какая информация лишняя, а какая нет?
карма: 27
https://hiasm.com
0
Ответов: 8926
Рейтинг: 823
#77: 2009-04-12 17:58:07 ЛС | профиль | цитата
Pirr,
onEnter - неподходит
переход по onEnter:
code_12731.txt
карма: 19

0
файлы: 1code_12731.txt [306B] [279]
Ответов: 409
Рейтинг: 17
#78: 2009-04-12 20:49:20 ЛС | профиль | цитата
Tad писал(а):
Нижняя точка StrngTable.Count отними 1 и получишь индекс последней строки.

А эта точка у меня используется... она выводит на экран количество строк. А зачем отнимать 1? Оно вроде и так верную цифру показывает.
Другое дело что Count - это красный поток "Данные" а в doEnsureVisable - надо синий поток "События-Данные" заводить, вот тут у меня и загвоздка.

nesco писал(а):
Да, они вошли в последнюю версию b175, но хорошо бы обновиться, в обeих кое-что поправлено, и, в некоторых местах, очень существенно

Я так понимаю реч о StringTableMT?

Леонид писал(а):
переход по onEnter:

Спасибо за подсказку.
карма: 0

0
Разработчик
Ответов: 26151
Рейтинг: 2127
#79: 2009-04-12 21:24:57 ЛС | профиль | цитата
Pirr писал(а):
StringTableMT

А разве MTStrTbl нет в пакете С ней такие заморочки можно творить, которые StringTableMT и не снились
карма: 22

0
Ответов: 171
Рейтинг: 19
#80: 2009-04-12 21:50:11 ЛС | профиль | цитата
Pirr писал(а):
Можно ли в элементе "Таблица строк" сделать так чтобы каждая вторая строка подсвечивалась другим цветом - для удобства навигации по таблице.

Можно! Только нужна StringTableMT .
Pirr, вот посмотри пример, как можно сделать.
code_12741.txt

Только есть одна проблема придеться добавить в базу один лишний столбец...
карма: 0

0
файлы: 1code_12741.txt [2.2KB] [220]
Ответов: 16884
Рейтинг: 1239
#81: 2009-04-12 23:56:20 ЛС | профиль | цитата
Dilma писал(а):
а как среда должна узнать какая информация лишняя, а какая нет?
Без понятия, но то что в хинте много ненужной информации - бросается в глаза. И все данные Place, и Color=65535, и Font= пустышке...

Pirr, на тебе "синий поток" 

Add(StringTable,5311714,245,98)
{
 Left=10
 Top=10
 Width=275
 Height=190
 Color=65535
 Font=[Arial,8,0,0,204]
 Columns=#1:1|1:2|1:3|
 Grid=0
 Redaction=1
 Point(doEnsureVisible)
}
Add(Button,14995128,35,98)
{
 Left=10
 Top=215
 Data=String(;asdasdasd;zxczxczxczxc)
 link(onClick,11013344:doStrCat,[])
}
Add(StrCat,11013344,91,98)
{
 link(onStrCat,7136712:doEvent1,[])
 link(Str1,5839713:Var3,[(97,86)(195,86)])
}
Add(Hub,7136712,140,98)
{
 OutCount=3
 link(onEvent1,5311714:doAdd,[])
 link(onEvent2,8169809:doOperation,[(172,111)(172,139)])
 link(onEvent3,2337457:doText,[(164,118)(164,216)])
}
Add(Math,8169809,189,133)
{
 OpType=1
 Op2=1
 ResultType=0
 link(onResult,5311714:doEnsureVisible,[])
 link(Op1,5839713:Var2,[])
}
Add(GetDataEx,5839713,182,112)
{
 Angle=1
 link(Data,5311714:Count,[(232,121)(232,154)(251,154)])
}
Add(Label,2337457,175,210)
{
 Left=230
 Top=220
 link(Text,5839713:Var1,[(181,121)])
}

Borka писал(а):
Только есть одна проблема придеться добавить в базу один лишний столбец...
А это зачем ?
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 409
Рейтинг: 17
#82: 2009-04-13 19:25:57 ЛС | профиль | цитата
nesco писал(а):
А разве MTStrTbl нет в пакете С ней такие заморочки можно творить, которые StringTableMT и не снились

А в каком разделе он должен быть? Вроде все просмотрел но MTStrTbl - ненашол.

Borka писал(а):
Можно! Только нужна StringTableMT .
Pirr, вот посмотри пример, как можно сделать.
code_12741.txt

Интересное решение, попробую приладить своей схеме.

Tad писал(а):
на тебе "синий поток"

Спасибо. Вот до такого - точно недогадался бы.

[i] Просьба к администратору форума - если можно переименуйте топик в что-нибудь типа "Схема для работы с MySQL" - думаю вопросы разбираемые здесь будут интересны и другим пользователям осваивающим HIASM+MySQL.
Вот схема получившейся программы, думаю её вполне можно включить в Examples - как практическую демонстрацию работы с MySQL базой. [/i] 

Add(MainForm,2953706,7,7)
{
 Width=562
 Height=445
 Caption="Редактирование БД"
 Icon=[ZIPBE08000078DA6596093C94F91FC73FE45F52AF7637FC93C89086CA51B63651C8B656CE55B28E74E9707638CA519A41A2A263C99046CA9DA392D8D48656A5328B6CBB548E15C639AE19839979F619D6DFFEEB33AFCFEB9999F7F7F9FEBECFF39DEFEF1940827C512898549634F05FF2A8495AFC95096909484F4129CC48E21F932208028209218EEF8A46A47F1C22F64481713C11671DC370D53D1A57ED827063E749A4D9F822C7702F1E6C76C3AFABED51B77C2B5A1537E19DA2314664B431345F17030BF4C096D30701750825A918FF8F2678D2AB202484A81C788EDC81FB08664781C6B98473C475B40BBB1030741E1E7527715A100F7AD74FD837180A9F8F91707AE80D9FF711881BCFC285C6641C1E89C5FE261A4E11C9A08D24C3EF8F6828682B83D6928072010B016309F06FBF82E4CA0CBC19FB8013649CEF501C86845C78765F866B7528249464B0FB69384C6276035FCDC10F5901F06DBF09ED6396D8511585BDBF5D86555938FAF843181DE3631E85BC9B6AB2B0AF4F828C011558380F0E2F93B1D8521FDF5526626F433E307736B6DEB908AAE906D879EE83E2D75A58AAB312CC3BB9586F6B01C9C5F258FFAA085B8BD2A0577803562F8A61D6CC825BCF7B1C09A3615DDBEF70186C079D5505194D0D9871FB61D9DB01170E1B878413901612905054843C793420AD5F570FC7B1719C20DF47F04671BA9F83F3090928282EC6308F0711D94FA1480481500895090216E3041823A3C824E3F1D5426CF8D8078B3E2E823AFBF15040A08AB464AF08327D04E47A0928F41358DAD88345EBD623A0878B33FD5C84FEF214905F84591D42C87792DDED21B0A99BC08E6775F0E208E0FBFA2DA4DEF1B1A04D84A5ED04CC1B3998FF5E048985F2906B22A0DB4CA0BEF11DF06602732BBA30AF5E88594B2850ACE541A99180E68B2E9CF9B31B52AFC630EBF130E458640D35A42BFAB1FCE7BFB0EE7711D6E4B230FB5E370E663D42620B8FAC4789EC8702142BC8FC898F219DD606D91C36B4C8CFF30A26205B4260517223A2926EC2B2B01D76574BF057071BDC513E340A092807E541215304B51C11F4629E433E990FA34C0EE29F77A1B4BC12CB985CAC4C1941687E2DD49309AC4915E1FBB85AE00B6550E205D0D8198385D102C846F1201FC985C245F2FE1DAB8172D40028E747A11AC906F5B208EE774691533B8A098110B34FF020174E408936008B78368C8E17C13A241F8B03BB70EE5E2BE61F6AC1DCC5DAD0A3B7C32322034B0209287AB7817A720CABF7E5C0EB3A1B9AFE5D58133A8C2F0F08B0C0F609D678D5C03FBE1EB29655503E2880AAEB9FD0706343DFAF175F6EE360A96337D4DDB8D878B80316010D70F5BE0E1A3D6572EEED6604CC12B6B4B60AC91DC1EE3301AD25E96909893167E2D2D22BE6FC7F04ECD092CB4C8CBF79BFFC97A2A4A4D888E492991C24040A9999E56FFF78DDDCD0D0FC96DD5D9E1A9ED68A192A4C4F7D39C2ADB877E98AEBA5732D7D5D5DDD2FE3C32A30B52EA9F4E23E41CF1357EB6F3534340C4D5C7CB2EB079A32A60226F183E1AAD32EDF6929ABEBE8A82BAB52BF753E70ABEF436A58E7142FBCDED376CC568BAAA447D9606646D15BB18C6A1D5CC965855F8078F58AB4FA7BFB6CB5D497484EEB1B95E5B647DBC68B3D6E8B797AD940B6AD9AFA379233A2A8683947F13EC478882F9CD9F4C4D950F97FF8DA1E47FB671495B5793C4EB147A91D72EF8EFD66A2AC348D9F6DDFB8D5CADC574F75DBC38F35E191405A4D8B9BA13A65FAECED4EABCDCD37AE5EA7B2E9400987E905309BF2761BAE9094F47F24E6BE564EE60E0EE61BED57A81DCCE2177BC9B42674DC7255236BF775F423B9BDB1B1E335BF1DE68EEA9ABB2E0F3EF092AA60BE3EBA5393E47B1C7CC5DCCACA5E1CB57DE5AA5D21BDC55E9D150983575DC5FC919F99A4E4634786E7FE3DBE3B8CB7ABAFDD15DC5C1C282A4DE097F8A8ADFC7EAABC4767190C869D9D15C3467FB37B6513D35B0AE1EFEB7D36E9FE38C57F2E604CCACA48FB87D7A3AC186FE0C2D3E127DB548D9E4D5EDDD99414274F06A3DA52ED6BD7A69157B1A1C04F197C419EAEA6A9EFB56B3F3A7AB6B77B3A3939791A2DB338F5E25566D025E076F887896817034DD3FD2905292905A4AA9D4CC9EA72FA73028F881F686177C7C8F6AAEA1B5916545733AC180C4B239DCDCEDED9AC78F75BE2FE657BB1B895879C0DB4A926A636676D6C8C745718EC8CA2B73DF50E114DFE3EC2236A072B22F75A5057692F5BABBF5E45C7DA35B8B1E1D71B215598E49D1E4C0EBFFE7EB68B8BB5C5962D5BAC6F0F0EF57697C59343FBCF64947AC415B3F97C41FED1E063076F96D4B19B9EDF8D9DC6E288D2C0C08C37EC91D1A1A1B6875D7DDDACA2D8205A3EFE3D5CA7BC036352EF96B3584DACB2CCD4A0607AD527139677D8FD70D0C5A4A49C8B414768F4CA4F47942C537425388446A7D369F9559F0D303ED10C21F82A04512641EE04204480311F5021FDC50030A7857419B92B884D23FF2DFCCB9FE9132E317D5ECB541E713E715E63728DD3E4D38C5C730E21D6DF2C2A736C]
}
Add(dbMySQL,6199375,362,78)
{
 Host=""
 DBName="test_bb"
 link(Host,12568762:Var,[(368,60)(306,60)])
 link(Login,15008101:Var,[(375,56)(356,56)])
 link(Password,5084853:Var,[(382,60)(432,60)])
 link(onError,11461195:doMessage,[])
}
Add(dbMySQL_Query,8258155,313,141)
{
 link(onResult,13153837:doShow,[])
 link(onError,3180825:doMessage,[(396,154)(396,161)])
 link(dbHandle,14321171:Var1,[(319,130)])
}
Add(dbMySQL_Exec,12880173,362,323)
{
 link(onError,3136033:doMessage,[])
 link(dbHandle,11631446:Var2,[])
 link(QueryText,4849043:Var1,[(375,299)(76,299)])
}
Add(GetDataEx,14321171,355,121)
{
 link(Data,6199375:dbHandle,[])
}
Add(Message,11461195,446,78)
{
 Caption="Ошибка подключения"
}
Add(Message,3180825,404,155)
{
 Caption="Ошибка чтения"
}
Add(Message,3136033,446,337)
{
 Caption="Ошибка записи"
}
Add(Hub,16216464,243,78)
{
 OutCount=3
 link(onEvent1,6199375:doOpen,[])
 link(onEvent2,6199375:doSelectDB,[(348,91)(348,98)])
 link(onEvent3,15158004:doEvent5,[(267,98)(267,182)])
}
Add(dbMySQL_ShowQuery,13153837,446,141)
{
 link(Rows,8258155:Rows,[(452,126)(375,126)(375,226)(319,226)])
 link(Fields,8258155:Fields,[(459,133)(384,133)(384,219)(326,219)])
 link(StringTable,12768456:StringTable,[(466,125)(636,125)])
}
Add(Hub,15158004,278,148)
{
 InCount=5
 OutCount=3
 link(onEvent1,8258155:doQuery,[(302,154)(302,147)])
 link(onEvent2,4849043:doWork1,[(303,161)(303,210)(58,210)(58,168)])
 link(onEvent3,8169809:doOperation,[(520,168)(520,83)])
}
Add(Hub,11588217,226,323)
{
 link(onEvent1,12880173:doExec,[])
 link(onEvent2,15158004:doEvent2,[(250,336)(250,161)])
}
Add(StyleXP,9790873,7,49)
{
}
Add(ChildForm,553853,177,257)
{
 link(onEvent1,15158004:doEvent4,[(260,263)(260,175)])
 link(Data1,12768456:Select,[(183,183)(629,183)])
 link(Data2,11631446:Var1,[(190,244)])
}
BEGIN_SDK
  Add(EditMulti,7246684,0,14)
  {
   EventCount=1
   WorkCount=2
   DataCount=2
   Width=496
   Height=362
   link(doWork1,12887836:doSplit,[(84,20)(84,117)])
   link(doWork2,5071824:doVisible,[(9,27)(9,244)])
  }
  Add(Edit,13335318,168,175)
  {
   Left=65
   Top=31
   Width=130
   Text=""
  }
  Add(Edit,4829398,226,175)
  {
   Left=65
   Top=56
   Width=130
   Text=""
  }
  Add(Edit,9813523,282,175)
  {
   Left=65
   Top=81
   Width=130
   Text=""
  }
  Add(Edit,3338315,338,175)
  {
   Left=65
   Top=106
   Width=130
   Text=""
  }
  Add(Label,10657244,391,182)
  {
   Left=10
   Top=106
   Caption="Дата"
  }
  Add(Label,5976578,388,179)
  {
   Left=10
   Top=81
   Caption="Возраст"
  }
  Add(Label,3371541,385,176)
  {
   Left=10
   Top=56
   Caption="Фамилия"
  }
  Add(Label,5688088,381,173)
  {
   Left=10
   Top=31
   Caption="Имя"
  }
  Add(StrPart,12887836,168,111)
  {
   Char=";"
   link(onSplit,14315850:doSplit,[])
   link(onPart,7005056:doText,[(212,124)(212,150)(67,150)(67,184)])
   link(Str,7246684:Data1,[(174,63)(6,63)])
  }
  Add(StrPart,14315850,224,111)
  {
   Char=";"
   link(onSplit,14112336:doSplit,[])
   link(onPart,13335318:doText2,[(268,124)(268,156)(163,156)(163,188)])
  }
  Add(StrPart,14112336,280,111)
  {
   Char=";"
   link(onSplit,13061915:doSplit,[])
   link(onPart,4829398:doText2,[(322,124)(322,161)(217,161)(217,188)])
  }
  Add(StrPart,13061915,336,111)
  {
   Char=";"
   link(onSplit,3338315:doText,[(380,117)(380,149)(327,149)(327,181)])
   link(onPart,9813523:doText2,[(387,124)(387,167)(270,167)(270,188)])
  }
  Add(Label,7005056,77,178)
  {
   Left=68
   Top=10
   Width=30
   Height=17
   Caption="0"
  }
  Add(Label,1843509,119,178)
  {
   Left=10
   Top=7
   Width=18
   Height=17
   Caption="ID:"
  }
  Add(FormatStr,13172279,176,280)
  {
   DataCount=5
   Mask="UPDATE user SET Name='%2', Fam='%3', Age='%4', Date=STR_TO_DATE('%5', '%d.%m.%Y') WHERE id=%1"
   link(onFString,13624586:doExec,[])
   link(Str1,7005056:Caption,[(182,245)(83,245)])
   link(Str2,13335318:Text,[(189,237)(174,237)])
   link(Str3,4829398:Text,[(196,244)(232,244)])
   link(Str4,9813523:Text,[(203,249)(288,249)])
   link(Str5,3338315:Text,[(210,257)(344,257)])
  }
  Add(Button,9037373,105,280)
  {
   Left=205
   Top=104
   Width=110
   Caption="Сохранить"
   Data=String(select id AS ID, name AS Имя, fam AS Фамилия, age AS Возраст, DATE_FORMAT(date,'%d.%m.%Y') AS Дата from user)
   link(onClick,6776347:doEvent1,[])
  }
  Add(dbMySQL_Exec,13624586,252,280)
  {
   link(dbHandle,7246684:Data2,[(258,147)(13,147)])
  }
  Add(Hub,6776347,147,280)
  {
   OutCount=3
   link(onEvent1,13172279:doString,[])
   link(onEvent2,7246684:onEvent1,[(329,293)(329,20)])
   link(onEvent3,5071824:doClose,[(173,300)(173,327)(15,327)(15,237)])
  }
  Add(MainForm,5071824,28,210)
  {
   Left=35
   Top=105
   Width=326
   Height=162
   Visible=1
   Caption="Редактирование"
   BorderStyle=3
   Point(Close)
   Point(doVisible)
  }
END_SDK
Add(GetDataEx,11631446,355,235)
{
 link(Data,14321171:Var2,[])
}
Add(Hub,6756547,150,257)
{
 link(onEvent1,553853:doWork1,[])
 link(onEvent2,553853:doWork2,[])
}
Add(IndexToChanel,16734946,126,78)
{
 Data=String(select id AS ID, name AS Имя, fam AS Фамилия, age AS Возраст, DATE_FORMAT(date,'%d.%m.%Y') AS Дата from user)
 link(onEvent1,16216464:doEvent1,[])
 link(onEvent2,16095760:doWork1,[])
}
Add(ChildForm,16095760,189,85)
{
}
BEGIN_SDK
  Add(EditMulti,7583217,3,3)
  {
   WorkCount=1
   Width=384
   Height=172
   link(doWork1,5071824:doVisible,[(33,9)(33,111)])
  }
  Add(MainForm,5071824,168,77)
  {
   Left=35
   Top=105
   Width=280
   Height=202
   Visible=1
   Caption="Connection settings"
   BorderStyle=3
   Point(Close)
   Point(doVisible)
   link(onCreate,7622175:doLoad,[(233,97)(233,118)])
  }
  Add(ChildGroupBox,15380857,336,112)
  {
  }
  BEGIN_SDK
    Add(EditMulti,1789377,3,3)
    {
     WorkCount=1
     Width=356
     Height=221
     link(doWork1,7796760:doEvent1,[(26,9)(26,55)])
    }
    Add(GroupBox,9623165,28,154)
    {
     Left=5
     Top=10
     Width=260
     Height=126
     Caption=""
     Point(doVisible)
    }
    Add(Edit,11810057,196,49)
    {
     Left=70
     Top=25
     Width=175
     Text="root"
     link(onChange,15008101:doValue,[])
     link(Str,15008101:Var,[(202,39)(243,39)(243,73)(265,73)])
    }
    Add(Label,6522382,140,14)
    {
     Left=15
     Top=30
     Caption="Username"
    }
    Add(Label,12953386,140,77)
    {
     Left=15
     Top=60
     Height=17
     Caption="Password"
    }
    Add(Edit,13506764,196,112)
    {
     Left=70
     Top=55
     Width=175
     Text=""
     link(onChange,5084853:doValue,[])
     link(Str,5084853:Var,[(202,102)(243,102)(243,136)(265,136)])
    }
    Add(Edit,6790490,196,168)
    {
     Left=70
     Top=85
     Width=175
     Text="localhost"
     link(onChange,12568762:doValue,[])
     link(Str,12568762:Var,[(202,158)(243,158)(243,192)(265,192)])
    }
    Add(Label,1524243,140,133)
    {
     Left=15
     Top=90
     Height=17
     Caption="Host"
    }
    Add(GlobalVar,15008101,259,49)
    {
     Name="username"
    }
    Add(GlobalVar,5084853,259,112)
    {
     Name="password"
    }
    Add(GlobalVar,12568762,259,168)
    {
     Name="host"
    }
    Add(Hub,7796760,49,49)
    {
     OutCount=3
     link(onEvent1,11810057:doText,[])
     link(onEvent2,13506764:doText,[(124,62)(124,118)])
     link(onEvent3,6790490:doText,[(106,69)(106,174)])
    }
  END_SDK
  Add(Button,13078390,56,63)
  {
   Left=185
   Top=145
   Width=80
   Height=25
   Caption="OK"
   link(onClick,8165197:doEvent1,[])
  }
  Add(GVarContainer,7622175,266,112)
  {
   Section="ConnectSettings"
   FilleName="config.ini"
   VarList=#8:username|8:password|4:host|
   link(onLoad,15380857:doWork1,[])
  }
  Add(Hub,8165197,105,63)
  {
   link(onEvent1,7622175:doSave,[(222,69)(222,125)])
   link(onEvent2,5071824:doClose,[(153,76)(153,104)])
  }
END_SDK
Add(ToolBar,3213715,70,78)
{
 Width=554
 Height=25
 Align=2
 Caption=0
 Wrapable=1
 Buttons=['Connect'=[ZIP3610000078DAEDD23D4CD4601807F007F9E8A9174420C071225F4139054488C709F2E19DF2513D2320903B8ACBB93531264D0CF116879A3874ECD8C97883435D4C13192E6C75306962344D5C1A1D4C07633ADEF8FA6F6100643D6EF0DEE6D7BEED7B97FFD33E6F321DAFA760C4EB8806716DDA5743A1BD851AA2AF8D7BFCB94FE479CA65B324E572940705F89C483951240D0AA0832449A4810E0664A53C89A0809ACF930E4530C10259964901153430C086A4A8D08AACE0B9428AA290014530C1021B1C702126A9F8AD4AA2A29204A6AA92053149A3585EA32448AA46AAA6910E16D8B0A214A8502850111C70412EE864EA3A59E0800B1EF4CA065986410E7820EA45B28B45F280D74C724D933C28816959E48007256020993679B64D25F01C87B2864B92E512735D921D8F14D723E679942D968895008764E3CCAAAA2A4FD81F0B6D93C2C1115B6B3CB470E5D1B5BDFB3B0FEBFD4BC3C8702DE74F06B3174E0967C3A7BBD69AA275FE83B9CBC445075ACF6D5C1C08770B42F8C6564D281A8DD6DEEB89B69C178496F68D51AEB5950BF50F0DF575609DBB1EE7B8FEC44C2291E88B084228141E4FCEA712376767A73BF1FFE6E5CC7A7A71899F9F991DC7B2D0797F73733DBDFC80E7A72341413DB7563399F5A55424B25FFAD8D4EDA9898948FB9983EF137FDC7DEC7D750F5455551D55FB9C63075522BFE3ED28EBFC305EB1FCAE7793AC6767AE62F9BDEF53ECD26EFA44F28FF6DB17DB5965239FB6D8716BE5C84FFF7AC9167FE6D9DC77894D7D7B1A18FBFC840DEF6658AF9E0CFAD1F6E66AD9F2D7FEBCFEA7063FDFFF067E1FBA3F4E976D3F86B79B0F7FE3670D410D892F62303FAAECFB01190B3F5E04359C44DE71F97E2FEE3ADB15CB5FF9FD2AA8A152F927D9EFFFD55FD25DB665],'Config'=[ZIP3610000078DAED944F881C4514C6BF40945130740E62AB8834219A16FCD310237D512815B55018DA45A141441B85D8C67FADA0B4E2A27D92F2D617D73282B1217B68729052105A3628E58AD07B10FA38D739CE718EF1EBD98C86B8B308D91D89A486DFBCFA5ED5D47B55EF31E29913D761364E1C048ED13A173980C1F6C201E08F43DBF4F31939298822253028B9570F30E8A938570E063D950387B8998B40B9F04A178E26950B973835FDB987B8F0E096C478F0721F61E92322BEF6212BCE895B13E3C3234205087580A00AA86989D71015F2DC1021F16D88B410709540A005F70B0823E817884B09A1257292D512CA48448D44D0D24611D22442D846083A5A12C731F22CE6D93112A28857C7906DCC75FA9204599AA0C8122892586A22BA049E4C91A6244B917429C4288524624C4BFC38A3CDE0CB1C419A43902CCB61748EA2A1B539F236473CCE91906892C31105FCA8409414708B026D5D2033A4A36F5220267C249EAD789E82520AA652CC85C58A4A783D4989745AC24F3464A19111AD49A511D41AD668F0B21810A4156B58419615AAAA4239EE7D3506C4CD6A78444F6AA8690D2733EC0FC33A1AF8BD55064169581303DB18D4937EBD61DE0D3CE2AA0649DDB00E0D2ADBB0772C1CE2F7B6B4109585B6963DD652B7F00974CB5EA3262E695BD2F5BE8EBDD5B14E1D7CE2D51D421293C476FC5987AEEB301AF57B46F0884F0409EA11241186342334DD88FB46184FB8A71EF39C3104090CE744908824CD18A9ED7D1348221A5A12D9096292DA5E4F21ED94BE292EF0135B7E5FB87AD95A34DE3B7989283E7DE9B3F5D7DECCE7FAFBF3F9D7E693B5D317E55B5F6CFE7ADE7C7776EDE4CB33FDC64FEDE6CFEF7E747AEDC3B767FA97DF367FFFF1E967D7BEFAA69CE9BB3EEFF57367CF9CD9DA7AE406B8E1FB3FD4E71E7B7E7D9D6BB70D8FDC11DEFDF07D1F3CF4C4975CDEBA69B8F26878FFD1C387EE99FDF4D8919595575FB9D971AEBF75A657DF797178EEE35B0EDEE83CB59D8B1C52DF7BF4F0EDF35C5F187EFBFA030F3EF9F765E4A9C78FDF39175773EDAE718DFF03F371A57BAE2CFEEAC2F3FBB1B1B1B16FF177CB6119B117E5B0CCD83BE5B0ECD8FFC59BEF167B514FEE655E978F4BEFBD530EDBAED53DCB61A7B1A81FFE1A7DFC3DCAE11F775BF0DE97C7DD8FDED835FE3CF61EBEFDA23AEC7AF77D8AFF6FDF7CF9FF45CB8FBB4CFE04D0B38859]]
 link(onClick,16734946:doEvent,[])
}
Add(GlobalVar,5084853,426,28)
{
 Name="password"
}
Add(GlobalVar,15008101,350,28)
{
 Name="username"
}
Add(GlobalVar,12568762,300,28)
{
 Name="host"
}
Add(ChildPanel,4849043,70,162)
{
 link(onEvent1,15158004:doEvent3,[])
 link(onEvent2,6756547:doEvent1,[(138,175)(138,263)])
 link(onEvent3,15158004:doEvent1,[(130,182)(130,154)])
 link(onEvent4,11588217:doEvent1,[(130,189)(130,329)])
 link(Data1,2094339:Var1,[(76,135)])
}
BEGIN_SDK
  Add(EditMulti,11136416,21,21)
  {
   EventCount=4
   WorkCount=1
   DataCount=1
   VarCount=1
   Width=482
   Height=382
   link(doWork1,361655:doText,[(85,27)(85,133)])
   link(Var1,6860758:GetData,[(27,379)(102,379)])
  }
  Add(Panel,10390981,35,105)
  {
   Top=25
   Width=555
   Height=110
   Align=2
   BevelInner=1
  }
  Add(Edit,13335318,103,42)
  {
   Left=60
   Top=10
   Width=130
   Text=""
  }
  Add(EventFromData,6860758,96,274)
  {
   link(onEvent,7843577:doString,[])
  }
  Add(Edit,4829398,145,42)
  {
   Left=60
   Top=35
   Width=130
   Text=""
   Point(doSetFocus)
  }
  Add(Edit,9813523,187,42)
  {
   Left=60
   Top=60
   Width=130
   Text=""
   Point(doSetFocus)
  }
  Add(Button,5596024,237,246)
  {
   Left=440
   Top=33
   Width=110
   TabOrder=1
   Caption="Поиск"
   Data=String(select * from user)
   link(onClick,2369053:doString,[])
  }
  Add(GetDataEx,16429757,96,205)
  {
   link(Data,13335318:Text,[])
  }
  Add(GetDataEx,6548777,138,195)
  {
   link(Data,4829398:Text,[])
  }
  Add(GetDataEx,12437419,180,185)
  {
   link(Data,9813523:Text,[])
  }
  Add(Edit,3338315,237,42)
  {
   Left=60
   Top=85
   Width=130
   Text=""
   Point(doSetFocus)
  }
  Add(GetDataEx,10345332,230,215)
  {
   link(Data,3338315:Text,[])
  }
  Add(FormatStr,2369053,320,246)
  {
   DataCount=4
   Mask="SELECT id AS ID, name AS Имя, fam AS Фамилия, age AS Возраст, DATE_FORMAT(date,'%d.%m.%Y') AS Дата FROM user WHERE (name Like "%1%") AND (fam Like "%2%") AND (age Like "%3%") AND (date Like "%4%")"
   link(onFString,11136416:onEvent1,[(422,252)(422,27)])
   link(Str1,16429757:Var3,[(326,214)])
   link(Str2,6548777:Var3,[(333,204)])
   link(Str3,12437419:Var3,[(340,194)])
   link(Str4,10345332:Var3,[(347,224)])
  }
  Add(FormatStr,7843577,159,274)
  {
   DataCount=4
   Mask="INSERT INTO user (`Name`, `Fam`, `Age`, `date`) VALUES ('%1', '%2', '%3', STR_TO_DATE('%4', '%d.%m.%Y'))"
   link(onFString,6860758:doData,[(203,280)(203,268)(84,268)(84,280)])
   link(Str1,16429757:Var2,[(165,225)(109,225)])
   link(Str2,6548777:Var2,[(172,218)(151,218)])
   link(Str3,12437419:Var2,[(179,236)(193,236)])
   link(Str4,10345332:Var2,[(186,244)(243,244)])
  }
  Add(Label,10657244,291,48)
  {
   Left=5
   Top=85
   Caption="Дата"
  }
  Add(Label,5976578,288,45)
  {
   Left=5
   Top=60
   Caption="Возраст"
  }
  Add(Label,3371541,285,42)
  {
   Left=5
   Top=35
   Caption="Фамилия"
  }
  Add(Label,5688088,281,39)
  {
   Left=5
   Top=10
   Caption="Имя"
  }
  Add(Button,2007050,237,283)
  {
   Left=440
   Top=59
   Width=110
   TabOrder=1
   Caption="Редактировать"
   link(onClick,11136416:onEvent2,[(431,289)(431,34)])
  }
  Add(Button,10526291,237,320)
  {
   Left=440
   Top=7
   Width=110
   TabOrder=1
   Caption="Обновить таблицу"
   Data=String(select id AS ID, name AS Имя, fam AS Фамилия, age AS Возраст, DATE_FORMAT(date,'%d.%m.%Y') AS Дата from user)
   link(onClick,11136416:onEvent3,[(439,326)(439,41)])
  }
  Add(Label,361655,264,127)
  {
   Left=527
   Top=87
   Width=35
   Caption="0"
   link(Text,11136416:Data1,[(270,95)(27,95)])
  }
  Add(Label,13477847,306,127)
  {
   Left=442
   Top=87
   Width=80
   Caption="Всего записей:"
  }
  Add(Button,11101918,238,357)
  {
   Left=200
   Top=85
   Width=115
   Caption="Добавить"
   Data=String(select id AS ID, name AS Имя, fam AS Фамилия, age AS Возраст, DATE_FORMAT(date,'%d.%m.%Y') AS Дата from user)
   link(onClick,11136416:onEvent4,[(448,363)(448,48)])
  }
END_SDK
Add(StringTableMT,12768456,616,63)
{
 Top=136
 Width=554
 Height=275
 Align=5
 ColorSp=128
 ColorItems=0
 IconsCheck=[]
 MiscIcons=[]
 Icons=[]
 Point(StringTable)
 Point(doEnsureVisible)
}
Add(Math,8169809,539,77)
{
 OpType=1
 Op2=1
 ResultType=0
 link(onResult,12768456:doEnsureVisible,[(593,83)(593,104)])
 link(Op1,2094339:Var2,[(545,64)(580,64)(580,151)(594,151)])
}
Add(GetDataEx,2094339,581,126)
{
 Angle=1
 link(Data,12768456:Count,[(622,135)])
}
карма: 0

0
файлы: 1code_12752.txt [18.8KB] [275]
Ответов: 16884
Рейтинг: 1239
#83: 2009-04-13 19:52:31 ЛС | профиль | цитата
Pirr писал(а):
Вот схема получившейся программы, думаю её вполне можно включить в Examples - как практическую демонстрацию работы с MySQL базой.
И все сразу кинулись создавать БД под эту схему с неизвестным числом полей, с неизвестными именами полей и т .д.


карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 409
Рейтинг: 17
#84: 2009-04-13 20:08:01 ЛС | профиль | цитата
Tad писал(а):
И все сразу кинулись создавать БД под эту схему с неизвестным числом полей, с неизвестными именами полей и т .д.

Я вроде в "Информации" все указал или она не копируется?

Чтото - файл нехочет прикреплятся

------------ Дoбавленo в 20.24:
Программа для заполнения, редактирования и поиска в базе данных MySQL
Для работы схемы необходима база данных MySQL:
DBName: test_bb
TableName: user (id{int}, Name{var}, Fam{var}, Age{num}, Date{date}) 


Add(MainForm,2953706,7,7)
{
 Width=562
 Height=445
 Caption="Редактирование БД"
 Icon=[ZIPBE08000078DA6596093C94F91FC73FE45F52AF7637FC93C89086CA51B63651C8B656CE55B28E74E9707638CA519A41A2A263C99046CA9DA392D8D48656A5328B6CBB548E15C639AE19839979F619D6DFFEEB33AFCFEB9999F7F7F9FEBECFF39DEFEF1940827C512898549634F05FF2A8495AFC95096909484F4129CC48E21F932208028209218EEF8A46A47F1C22F64481713C11671DC370D53D1A57ED827063E749A4D9F822C7702F1E6C76C3AFABED51B77C2B5A1537E19DA2314664B431345F17030BF4C096D30701750825A918FF8F2678D2AB202484A81C788EDC81FB08664781C6B98473C475B40BBB1030741E1E7527715A100F7AD74FD837180A9F8F91707AE80D9FF711881BCFC285C6641C1E89C5FE261A4E11C9A08D24C3EF8F6828682B83D6928072010B016309F06FBF82E4CA0CBC19FB8013649CEF501C86845C78765F866B7528249464B0FB69384C6276035FCDC10F5901F06DBF09ED6396D8511585BDBF5D86555938FAF843181DE3631E85BC9B6AB2B0AF4F828C011558380F0E2F93B1D8521FDF5526626F433E307736B6DEB908AAE906D879EE83E2D75A58AAB312CC3BB9586F6B01C9C5F258FFAA085B8BD2A0577803562F8A61D6CC825BCF7B1C09A3615DDBEF70186C079D5505194D0D9871FB61D9DB01170E1B878413901612905054843C793420AD5F570FC7B1719C20DF47F04671BA9F83F3090928282EC6308F0711D94FA1480481500895090216E3041823A3C824E3F1D5426CF8D8078B3E2E823AFBF15040A08AB464AF08327D04E47A0928F41358DAD88345EBD623A0878B33FD5C84FEF214905F84591D42C87792DDED21B0A99BC08E6775F0E208E0FBFA2DA4DEF1B1A04D84A5ED04CC1B3998FF5E048985F2906B22A0DB4CA0BEF11DF06602732BBA30AF5E88594B2850ACE541A99180E68B2E9CF9B31B52AFC630EBF130E458640D35A42BFAB1FCE7BFB0EE7711D6E4B230FB5E370E663D42620B8FAC4789EC8702142BC8FC898F219DD606D91C36B4C8CFF30A26205B4260517223A2926EC2B2B01D76574BF057071BDC513E340A092807E541215304B51C11F4629E433E990FA34C0EE29F77A1B4BC12CB985CAC4C1941687E2DD49309AC4915E1FBB85AE00B6550E205D0D8198385D102C846F1201FC985C245F2FE1DAB8172D40028E747A11AC906F5B208EE774691533B8A098110B34FF020174E408936008B78368C8E17C13A241F8B03BB70EE5E2BE61F6AC1DCC5DAD0A3B7C32322034B0209287AB7817A720CABF7E5C0EB3A1B9AFE5D58133A8C2F0F08B0C0F609D678D5C03FBE1EB29655503E2880AAEB9FD0706343DFAF175F6EE360A96337D4DDB8D878B80316010D70F5BE0E1A3D6572EEED6604CC12B6B4B60AC91DC1EE3301AD25E96909893167E2D2D22BE6FC7F04ECD092CB4C8CBF79BFFC97A2A4A4D888E492991C24040A9999E56FFF78DDDCD0D0FC96DD5D9E1A9ED68A192A4C4F7D39C2ADB877E98AEBA5732D7D5D5DDD2FE3C32A30B52EA9F4E23E41CF1357EB6F3534340C4D5C7CB2EB079A32A60226F183E1AAD32EDF6929ABEBE8A82BAB52BF753E70ABEF436A58E7142FBCDED376CC568BAAA447D9606646D15BB18C6A1D5CC965855F8078F58AB4FA7BFB6CB5D497484EEB1B95E5B647DBC68B3D6E8B797AD940B6AD9AFA379233A2A8683947F13EC478882F9CD9F4C4D950F97FF8DA1E47FB671495B5793C4EB147A91D72EF8EFD66A2AC348D9F6DDFB8D5CADC574F75DBC38F35E191405A4D8B9BA13A65FAECED4EABCDCD37AE5EA7B2E9400987E905309BF2761BAE9094F47F24E6BE564EE60E0EE61BED57A81DCCE2177BC9B42674DC7255236BF775F423B9BDB1B1E335BF1DE68EEA9ABB2E0F3EF092AA60BE3EBA5393E47B1C7CC5DCCACA5E1CB57DE5AA5D21BDC55E9D150983575DC5FC919F99A4E4634786E7FE3DBE3B8CB7ABAFDD15DC5C1C282A4DE097F8A8ADFC7EAABC4767190C869D9D15C3467FB37B6513D35B0AE1EFEB7D36E9FE38C57F2E604CCACA48FB87D7A3AC186FE0C2D3E127DB548D9E4D5EDDD99414274F06A3DA52ED6BD7A69157B1A1C04F197C419EAEA6A9EFB56B3F3A7AB6B77B3A3939791A2DB338F5E25566D025E076F887896817034DD3FD2905292905A4AA9D4CC9EA72FA73028F881F686177C7C8F6AAEA1B5916545733AC180C4B239DCDCEDED9AC78F75BE2FE657BB1B895879C0DB4A926A636676D6C8C745718EC8CA2B73DF50E114DFE3EC2236A072B22F75A5057692F5BABBF5E45C7DA35B8B1E1D71B215598E49D1E4C0EBFFE7EB68B8BB5C5962D5BAC6F0F0EF57697C59343FBCF64947AC415B3F97C41FED1E063076F96D4B19B9EDF8D9DC6E288D2C0C08C37EC91D1A1A1B6875D7DDDACA2D8205A3EFE3D5CA7BC036352EF96B3584DACB2CCD4A0607AD527139677D8FD70D0C5A4A49C8B414768F4CA4F47942C537425388446A7D369F9559F0D303ED10C21F82A04512641EE04204480311F5021FDC50030A7857419B92B884D23FF2DFCCB9FE9132E317D5ECB541E713E715E63728DD3E4D38C5C730E21D6DF2C2A736C]
}
Add(dbMySQL,6199375,362,78)
{
 Host=""
 DBName="test_bb"
 link(Host,12568762:Var,[(368,60)(306,60)])
 link(Login,15008101:Var,[(375,56)(356,56)])
 link(Password,5084853:Var,[(382,60)(432,60)])
 link(onError,11461195:doMessage,[])
}
Add(dbMySQL_Query,8258155,313,141)
{
 link(onResult,13153837:doShow,[])
 link(onError,3180825:doMessage,[(396,154)(396,161)])
 link(dbHandle,14321171:Var1,[(319,130)])
}
Add(dbMySQL_Exec,12880173,362,323)
{
 link(onError,3136033:doMessage,[])
 link(dbHandle,11631446:Var2,[])
 link(QueryText,4849043:Var1,[(375,299)(76,299)])
}
Add(GetDataEx,14321171,355,121)
{
 link(Data,6199375:dbHandle,[])
}
Add(Message,11461195,446,78)
{
 Caption="Ошибка подключения"
}
Add(Message,3180825,404,155)
{
 Caption="Ошибка чтения"
}
Add(Message,3136033,446,337)
{
 Caption="Ошибка записи"
}
Add(Hub,16216464,243,78)
{
 OutCount=3
 link(onEvent1,6199375:doOpen,[])
 link(onEvent2,6199375:doSelectDB,[(348,91)(348,98)])
 link(onEvent3,15158004:doEvent5,[(267,98)(267,182)])
}
Add(dbMySQL_ShowQuery,13153837,446,141)
{
 link(Rows,8258155:Rows,[(452,126)(375,126)(375,226)(319,226)])
 link(Fields,8258155:Fields,[(459,133)(384,133)(384,219)(326,219)])
 link(StringTable,12768456:StringTable,[(466,125)(636,125)])
}
Add(Hub,15158004,278,148)
{
 InCount=5
 link(onEvent1,8258155:doQuery,[(302,154)(302,147)])
 link(onEvent2,4849043:doWork1,[(303,161)(303,210)(58,210)(58,168)])
}
Add(Hub,11588217,226,323)
{
 link(onEvent1,12880173:doExec,[])
 link(onEvent2,15158004:doEvent2,[(250,336)(250,161)])
}
Add(StyleXP,9790873,7,49)
{
}
Add(ChildForm,553853,177,257)
{
 link(onEvent1,15158004:doEvent4,[(260,263)(260,175)])
 link(Data1,12768456:Select,[(183,183)(629,183)])
 link(Data2,11631446:Var1,[(190,244)])
}
BEGIN_SDK
  Add(EditMulti,7246684,0,14)
  {
   EventCount=1
   WorkCount=2
   DataCount=2
   Width=496
   Height=362
   link(doWork1,12887836:doSplit,[(84,20)(84,117)])
   link(doWork2,5071824:doVisible,[(9,27)(9,244)])
  }
  Add(Edit,13335318,168,175)
  {
   Left=65
   Top=31
   Width=130
   Text=""
  }
  Add(Edit,4829398,226,175)
  {
   Left=65
   Top=56
   Width=130
   Text=""
  }
  Add(Edit,9813523,282,175)
  {
   Left=65
   Top=81
   Width=130
   Text=""
  }
  Add(Edit,3338315,338,175)
  {
   Left=65
   Top=106
   Width=130
   Text=""
  }
  Add(Label,10657244,391,182)
  {
   Left=10
   Top=106
   Caption="Дата"
  }
  Add(Label,5976578,388,179)
  {
   Left=10
   Top=81
   Caption="Возраст"
  }
  Add(Label,3371541,385,176)
  {
   Left=10
   Top=56
   Caption="Фамилия"
  }
  Add(Label,5688088,381,173)
  {
   Left=10
   Top=31
   Caption="Имя"
  }
  Add(StrPart,12887836,168,111)
  {
   Char=";"
   link(onSplit,14315850:doSplit,[])
   link(onPart,7005056:doText,[(212,124)(212,150)(67,150)(67,184)])
   link(Str,7246684:Data1,[(174,63)(6,63)])
  }
  Add(StrPart,14315850,224,111)
  {
   Char=";"
   link(onSplit,14112336:doSplit,[])
   link(onPart,13335318:doText2,[(268,124)(268,156)(163,156)(163,188)])
  }
  Add(StrPart,14112336,280,111)
  {
   Char=";"
   link(onSplit,13061915:doSplit,[])
   link(onPart,4829398:doText2,[(322,124)(322,161)(217,161)(217,188)])
  }
  Add(StrPart,13061915,336,111)
  {
   Char=";"
   link(onSplit,3338315:doText,[(380,117)(380,149)(327,149)(327,181)])
   link(onPart,9813523:doText2,[(387,124)(387,167)(270,167)(270,188)])
  }
  Add(Label,7005056,77,178)
  {
   Left=68
   Top=10
   Width=30
   Height=17
   Caption="0"
  }
  Add(Label,1843509,119,178)
  {
   Left=10
   Top=7
   Width=18
   Height=17
   Caption="ID:"
  }
  Add(FormatStr,13172279,176,280)
  {
   DataCount=5
   Mask="UPDATE user SET Name='%2', Fam='%3', Age='%4', Date=STR_TO_DATE('%5', '%d.%m.%Y') WHERE id=%1"
   link(onFString,13624586:doExec,[])
   link(Str1,7005056:Caption,[(182,245)(83,245)])
   link(Str2,13335318:Text,[(189,237)(174,237)])
   link(Str3,4829398:Text,[(196,244)(232,244)])
   link(Str4,9813523:Text,[(203,249)(288,249)])
   link(Str5,3338315:Text,[(210,257)(344,257)])
  }
  Add(Button,9037373,105,280)
  {
   Left=205
   Top=104
   Width=110
   Caption="Сохранить"
   Data=String(select id AS ID, name AS Имя, fam AS Фамилия, age AS Возраст, DATE_FORMAT(date,'%d.%m.%Y') AS Дата from user)
   link(onClick,6776347:doEvent1,[])
  }
  Add(dbMySQL_Exec,13624586,252,280)
  {
   link(dbHandle,7246684:Data2,[(258,147)(13,147)])
  }
  Add(Hub,6776347,147,280)
  {
   OutCount=3
   link(onEvent1,13172279:doString,[])
   link(onEvent2,7246684:onEvent1,[(329,293)(329,20)])
   link(onEvent3,5071824:doClose,[(173,300)(173,327)(15,327)(15,237)])
  }
  Add(MainForm,5071824,28,210)
  {
   Left=35
   Top=105
   Width=326
   Height=162
   Visible=1
   Caption="Редактирование"
   BorderStyle=3
   Point(Close)
   Point(doVisible)
  }
END_SDK
Add(GetDataEx,11631446,355,235)
{
 link(Data,14321171:Var2,[])
}
Add(Hub,6756547,150,257)
{
 link(onEvent1,553853:doWork1,[])
 link(onEvent2,553853:doWork2,[])
}
Add(IndexToChanel,16734946,126,78)
{
 Data=String(select id AS ID, name AS Имя, fam AS Фамилия, age AS Возраст, DATE_FORMAT(date,'%d.%m.%Y') AS Дата from user)
 link(onEvent1,16216464:doEvent1,[])
 link(onEvent2,16095760:doWork1,[])
}
Add(ChildForm,16095760,189,85)
{
}
BEGIN_SDK
  Add(EditMulti,7583217,3,3)
  {
   WorkCount=1
   Width=384
   Height=172
   link(doWork1,5071824:doVisible,[(33,9)(33,111)])
  }
  Add(MainForm,5071824,168,77)
  {
   Left=35
   Top=105
   Width=280
   Height=202
   Visible=1
   Caption="Connection settings"
   BorderStyle=3
   Point(Close)
   Point(doVisible)
   link(onCreate,7622175:doLoad,[(233,97)(233,118)])
  }
  Add(ChildGroupBox,15380857,336,112)
  {
  }
  BEGIN_SDK
    Add(EditMulti,1789377,3,3)
    {
     WorkCount=1
     Width=356
     Height=221
     link(doWork1,7796760:doEvent1,[(26,9)(26,55)])
    }
    Add(GroupBox,9623165,28,154)
    {
     Left=5
     Top=10
     Width=260
     Height=126
     Caption=""
     Point(doVisible)
    }
    Add(Edit,11810057,196,49)
    {
     Left=70
     Top=25
     Width=175
     Text="root"
     link(onChange,15008101:doValue,[])
     link(Str,15008101:Var,[(202,39)(243,39)(243,73)(265,73)])
    }
    Add(Label,6522382,140,14)
    {
     Left=15
     Top=30
     Caption="Username"
    }
    Add(Label,12953386,140,77)
    {
     Left=15
     Top=60
     Height=17
     Caption="Password"
    }
    Add(Edit,13506764,196,112)
    {
     Left=70
     Top=55
     Width=175
     Text=""
     link(onChange,5084853:doValue,[])
     link(Str,5084853:Var,[(202,102)(243,102)(243,136)(265,136)])
    }
    Add(Edit,6790490,196,168)
    {
     Left=70
     Top=85
     Width=175
     Text="localhost"
     link(onChange,12568762:doValue,[])
     link(Str,12568762:Var,[(202,158)(243,158)(243,192)(265,192)])
    }
    Add(Label,1524243,140,133)
    {
     Left=15
     Top=90
     Height=17
     Caption="Host"
    }
    Add(GlobalVar,15008101,259,49)
    {
     Name="username"
    }
    Add(GlobalVar,5084853,259,112)
    {
     Name="password"
    }
    Add(GlobalVar,12568762,259,168)
    {
     Name="host"
    }
    Add(Hub,7796760,49,49)
    {
     OutCount=3
     link(onEvent1,11810057:doText,[])
     link(onEvent2,13506764:doText,[(124,62)(124,118)])
     link(onEvent3,6790490:doText,[(106,69)(106,174)])
    }
  END_SDK
  Add(Button,13078390,56,63)
  {
   Left=185
   Top=145
   Width=80
   Height=25
   Caption="OK"
   link(onClick,8165197:doEvent1,[])
  }
  Add(GVarContainer,7622175,266,112)
  {
   Section="ConnectSettings"
   FilleName="config.ini"
   VarList=#8:username|8:password|4:host|
   link(onLoad,15380857:doWork1,[])
  }
  Add(Hub,8165197,105,63)
  {
   link(onEvent1,7622175:doSave,[(222,69)(222,125)])
   link(onEvent2,5071824:doClose,[(153,76)(153,104)])
  }
END_SDK
Add(ToolBar,3213715,70,78)
{
 Width=554
 Height=25
 Align=2
 Caption=0
 Wrapable=1
 Buttons=['Connect'=[ZIP3610000078DAEDD23D4CD4601807F007F9E8A9174420C071225F4139054488C709F2E19DF2513D2320903B8ACBB93531264D0CF116879A3874ECD8C97883435D4C13192E6C75306962344D5C1A1D4C07633ADEF8FA6F6100643D6EF0DEE6D7BEED7B97FFD33E6F321DAFA760C4EB8806716DDA5743A1BD851AA2AF8D7BFCB94FE479CA65B324E572940705F89C483951240D0AA0832449A4810E0664A53C89A0809ACF930E4530C10259964901153430C086A4A8D08AACE0B9428AA290014530C1021B1C702126A9F8AD4AA2A29204A6AA92053149A3585EA32448AA46AAA6910E16D8B0A214A8502850111C70412EE864EA3A59E0800B1EF4CA065986410E7820EA45B28B45F280D74C724D933C28816959E48007256020993679B64D25F01C87B2864B92E512735D921D8F14D723E679942D968895008764E3CCAAAA2A4FD81F0B6D93C2C1115B6B3CB470E5D1B5BDFB3B0FEBFD4BC3C8702DE74F06B3174E0967C3A7BBD69AA275FE83B9CBC445075ACF6D5C1C08770B42F8C6564D281A8DD6DEEB89B69C178496F68D51AEB5950BF50F0DF575609DBB1EE7B8FEC44C2291E88B084228141E4FCEA712376767A73BF1FFE6E5CC7A7A71899F9F991DC7B2D0797F73733DBDFC80E7A72341413DB7563399F5A55424B25FFAD8D4EDA9898948FB9983EF137FDC7DEC7D750F5455551D55FB9C63075522BFE3ED28EBFC305EB1FCAE7793AC6767AE62F9BDEF53ECD26EFA44F28FF6DB17DB5965239FB6D8716BE5C84FFF7AC9167FE6D9DC77894D7D7B1A18FBFC840DEF6658AF9E0CFAD1F6E66AD9F2D7FEBCFEA7063FDFFF067E1FBA3F4E976D3F86B79B0F7FE3670D410D892F62303FAAECFB01190B3F5E04359C44DE71F97E2FEE3ADB15CB5FF9FD2AA8A152F927D9EFFFD55FD25DB665],'Config'=[ZIP3610000078DAED944F881C4514C6BF40945130740E62AB8834219A16FCD310237D512815B55018DA45A141441B85D8C67FADA0B4E2A27D92F2D617D73282B1217B68729052105A3628E58AD07B10FA38D739CE718EF1EBD98C86B8B308D91D89A486DFBCFA5ED5D47B55EF31E29913D761364E1C048ED13A173980C1F6C201E08F43DBF4F31939298822253028B9570F30E8A938570E063D950387B8998B40B9F04A178E26950B973835FDB987B8F0E096C478F0721F61E92322BEF6212BCE895B13E3C3234205087580A00AA86989D71015F2DC1021F16D88B410709540A005F70B0823E817884B09A1257292D512CA48448D44D0D24611D22442D846083A5A12C731F22CE6D93112A28857C7906DCC75FA9204599AA0C8122892586A22BA049E4C91A6244B917429C4288524624C4BFC38A3CDE0CB1C419A43902CCB61748EA2A1B539F236473CCE91906892C31105FCA8409414708B026D5D2033A4A36F5220267C249EAD789E82520AA652CC85C58A4A783D4989745AC24F3464A19111AD49A511D41AD668F0B21810A4156B58419615AAAA4239EE7D3506C4CD6A78444F6AA8690D2733EC0FC33A1AF8BD55064169581303DB18D4937EBD61DE0D3CE2AA0649DDB00E0D2ADBB0772C1CE2F7B6B4109585B6963DD652B7F00974CB5EA3262E695BD2F5BE8EBDD5B14E1D7CE2D51D421293C476FC5987AEEB301AF57B46F0884F0409EA11241186342334DD88FB46184FB8A71EF39C3104090CE744908824CD18A9ED7D1348221A5A12D9096292DA5E4F21ED94BE292EF0135B7E5FB87AD95A34DE3B7989283E7DE9B3F5D7DECCE7FAFBF3F9D7E693B5D317E55B5F6CFE7ADE7C7776EDE4CB33FDC64FEDE6CFEF7E747AEDC3B767FA97DF367FFFF1E967D7BEFAA69CE9BB3EEFF57367CF9CD9DA7AE406B8E1FB3FD4E71E7B7E7D9D6BB70D8FDC11DEFDF07D1F3CF4C4975CDEBA69B8F26878FFD1C387EE99FDF4D8919595575FB9D971AEBF75A657DF797178EEE35B0EDEE83CB59D8B1C52DF7BF4F0EDF35C5F187EFBFA030F3EF9F765E4A9C78FDF39175773EDAE718DFF03F371A57BAE2CFEEAC2F3FBB1B1B1B16FF177CB6119B117E5B0CCD83BE5B0ECD8FFC59BEF167B514FEE655E978F4BEFBD530EDBAED53DCB61A7B1A81FFE1A7DFC3DCAE11F775BF0DE97C7DD8FDED835FE3CF61EBEFDA23AEC7AF77D8AFF6FDF7CF9FF45CB8FBB4CFE04D0B38859]]
 link(onClick,16734946:doEvent,[])
}
Add(GlobalVar,5084853,426,28)
{
 Name="password"
}
Add(GlobalVar,15008101,350,28)
{
 Name="username"
}
Add(GlobalVar,12568762,300,28)
{
 Name="host"
}
Add(ChildPanel,4849043,70,162)
{
 link(onEvent1,15158004:doEvent3,[])
 link(onEvent2,6756547:doEvent1,[(138,175)(138,263)])
 link(onEvent3,15158004:doEvent1,[(130,182)(130,154)])
 link(onEvent4,11588217:doEvent1,[(130,189)(130,329)])
 link(Data1,12768456:Count,[(76,118)(622,118)])
}
BEGIN_SDK
  Add(EditMulti,11136416,21,21)
  {
   EventCount=4
   WorkCount=1
   DataCount=1
   VarCount=1
   Width=482
   Height=382
   link(doWork1,361655:doText,[(85,27)(85,133)])
   link(Var1,6860758:GetData,[(27,379)(102,379)])
  }
  Add(Panel,10390981,35,105)
  {
   Top=25
   Width=555
   Height=110
   Align=2
   BevelInner=1
  }
  Add(Edit,13335318,103,42)
  {
   Left=60
   Top=10
   Width=130
   Text=""
  }
  Add(EventFromData,6860758,96,274)
  {
   link(onEvent,7843577:doString,[])
  }
  Add(Edit,4829398,145,42)
  {
   Left=60
   Top=35
   Width=130
   Text=""
   Point(doSetFocus)
  }
  Add(Edit,9813523,187,42)
  {
   Left=60
   Top=60
   Width=130
   Text=""
   Point(doSetFocus)
  }
  Add(Button,5596024,237,246)
  {
   Left=440
   Top=33
   Width=110
   TabOrder=1
   Caption="Поиск"
   Data=String(select * from user)
   link(onClick,2369053:doString,[])
  }
  Add(GetDataEx,16429757,96,205)
  {
   link(Data,13335318:Text,[])
  }
  Add(GetDataEx,6548777,138,195)
  {
   link(Data,4829398:Text,[])
  }
  Add(GetDataEx,12437419,180,185)
  {
   link(Data,9813523:Text,[])
  }
  Add(Edit,3338315,237,42)
  {
   Left=60
   Top=85
   Width=130
   Text=""
   Point(doSetFocus)
  }
  Add(GetDataEx,10345332,230,215)
  {
   link(Data,3338315:Text,[])
  }
  Add(FormatStr,2369053,320,246)
  {
   DataCount=4
   Mask="SELECT id AS ID, name AS Имя, fam AS Фамилия, age AS Возраст, DATE_FORMAT(date,'%d.%m.%Y') AS Дата FROM user WHERE (name Like "%1%") AND (fam Like "%2%") AND (age Like "%3%") AND (date Like "%4%")"
   link(onFString,11136416:onEvent1,[(422,252)(422,27)])
   link(Str1,16429757:Var3,[(326,214)])
   link(Str2,6548777:Var3,[(333,204)])
   link(Str3,12437419:Var3,[(340,194)])
   link(Str4,10345332:Var3,[(347,224)])
  }
  Add(FormatStr,7843577,159,274)
  {
   DataCount=4
   Mask="INSERT INTO user (`Name`, `Fam`, `Age`, `date`) VALUES ('%1', '%2', '%3', STR_TO_DATE('%4', '%d.%m.%Y'))"
   link(onFString,6860758:doData,[(203,280)(203,268)(84,268)(84,280)])
   link(Str1,16429757:Var2,[(165,225)(109,225)])
   link(Str2,6548777:Var2,[(172,218)(151,218)])
   link(Str3,12437419:Var2,[(179,236)(193,236)])
   link(Str4,10345332:Var2,[(186,244)(243,244)])
  }
  Add(Label,10657244,291,48)
  {
   Left=5
   Top=85
   Caption="Дата"
  }
  Add(Label,5976578,288,45)
  {
   Left=5
   Top=60
   Caption="Возраст"
  }
  Add(Label,3371541,285,42)
  {
   Left=5
   Top=35
   Caption="Фамилия"
  }
  Add(Label,5688088,281,39)
  {
   Left=5
   Top=10
   Caption="Имя"
  }
  Add(Button,2007050,237,283)
  {
   Left=440
   Top=59
   Width=110
   TabOrder=1
   Caption="Редактировать"
   link(onClick,11136416:onEvent2,[(431,289)(431,34)])
  }
  Add(Button,10526291,237,320)
  {
   Left=440
   Top=7
   Width=110
   TabOrder=1
   Caption="Обновить таблицу"
   Data=String(select id AS ID, name AS Имя, fam AS Фамилия, age AS Возраст, DATE_FORMAT(date,'%d.%m.%Y') AS Дата from user)
   link(onClick,11136416:onEvent3,[(439,326)(439,41)])
  }
  Add(Label,361655,264,127)
  {
   Left=527
   Top=87
   Width=35
   Caption="0"
   link(Text,11136416:Data1,[(270,95)(27,95)])
  }
  Add(Label,13477847,306,127)
  {
   Left=442
   Top=87
   Width=80
   Caption="Всего записей:"
  }
  Add(Button,11101918,238,357)
  {
   Left=200
   Top=85
   Width=115
   Caption="Добавить"
   Data=String(select id AS ID, name AS Имя, fam AS Фамилия, age AS Возраст, DATE_FORMAT(date,'%d.%m.%Y') AS Дата from user)
   link(onClick,11136416:onEvent4,[(448,363)(448,48)])
  }
END_SDK
Add(StringTableMT,12768456,616,63)
{
 Top=136
 Width=554
 Height=275
 Align=5
 ColorSp=128
 ColorItems=0
 IconsCheck=[]
 MiscIcons=[]
 Icons=[]
 Point(StringTable)
 Point(doEnsureVisible)
}
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#85: 2009-04-14 00:08:45 ЛС | профиль | цитата
Информация присутствует только в сохраненном sha файле. А если копируешь схему из HiAsm? то ам информации 0.
И не верится мне, что там есть информация - как создать базу test_bb.
Если "включить в Examples", то наверное это предназначено для начинающих, а начинающий запускает твою схему и... Error 2.
И посыппались вопросы: а почему, а как и т.д.
Если очень хочется, то заархивируй sha и пустую базу и выложи в "Схемы" - заодно посмотришь сколько человек скачает и почитаешь отзывы (если будут)
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Разработчик
Ответов: 26151
Рейтинг: 2127
#86: 2009-04-14 00:10:59 ЛС | профиль | цитата
Tad писал(а):
Если "включить в Examples", то наверное это предназначено для начинающих

Совсем не обязательно. Иногда, и продвинутыым пользователям надо глянуть -- а как работает новый компонент
карма: 22

0
Ответов: 16884
Рейтинг: 1239
#87: 2009-04-14 00:29:10 ЛС | профиль | цитата
nesco писал(а):
как работает новый компонент
Согласен 100%. Но не как появляется Error 2.
А продвинутые чаще жмут на Ctrl+F
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Разработчик
Ответов: 26151
Рейтинг: 2127
#88: 2009-04-14 00:58:45 ЛС | профиль | цитата
Tad писал(а):
А продвинутые чаще жмут на Ctrl+F

Да, но не всегда. Ингда, бывают очень интересные параллельные схемные решения и в примерах.
карма: 22

0
Ответов: 409
Рейтинг: 17
#89: 2009-04-14 21:55:47 ЛС | профиль | цитата
Почему я предложил схему добавить в Examples?
Не чистолюбия ради, а только лиш из-за того, что именно такой схемы мне и нехватало при освоении.
В нынешнем состоянии схема не сильно сложна, и показывает три основных элемента при работе с базами данных: добавление, поиск, редактирование.
В примере "Администрирование базы данных MySQL" - этого нет.

Насчет сложности создания базы MySQL - думаю если человек решил использовать MySQL, то он должен уметь это делать, да и инфы по данному вопросу полно.
Вобщем как говорится: "Мое дело предложить...."

А я продолжаю усложнять свою схему
Поэтому вопросы:
1. Может кто нибуть показать пример с динамическим созданием элементов "текстовое поле ввода" и их размещение в интерфейсе программы?
2. Tad - наверное я что-то в этой жизни не понимаю, сделал всё как в твоей схеме и нифига не работает отображение последней строки


карма: 0

0
Ответов: 3851
Рейтинг: 159
#90: 2009-04-14 22:11:29 ЛС | профиль | цитата
Pirr писал(а):
пример с динамическим созданием элементов "текстовое поле ввода" и их размещение в интерфейсе программы

code_12772.txt..
карма: 0
начавший
0
файлы: 1code_12772.txt [878B] [276]
ФорумыПрочееПомогите новичку! ← Ctrl12345678910...1213141516Ctrl →
Сообщение
...
Прикрепленные файлы
(файлы не залиты)
HiAsm Studio 2003 - 2024
Пользовательское соглашение | support@hiasm.com
Яндекс.Метрика