посидел бы минут 20 и всё сделал бы
2. нужна отдельная схема для сортировки по алфавиту (ну есть еще буквенные айпи адресса) и цифровые, чтобы все шло по порядку.
ну это уже прям
------------ Дoбавленo в 15.38:
вот сортировочка:
Add(MainForm,16510308,63,21)
{
Width=348
Height=265
}
Add(StrList,1856281,273,224)
{
Point(doSort)
}
Add(Memo,11662081,133,98)
{
Left=5
Top=10
Width=125
Height=175
Strings=#13:93.178.81.207|13:93.178.83.123|13:92.241.165.66|12:92.113.95.18|13:195.58.234.22|11:83.149.3.76|13:87.118.102.58|13:93.178.68.211|14:144.124.32.130|14:174.36.178.106|14:157.138.251.11|13:93.178.94.147|12:87.117.56.40|11:83.234.11.5|13:118.69.71.191|13:24.130.63.118|12:62.75.155.83|13:93.178.68.211|14:109.123.78.198|13:24.249.224.98|11:77.23.44.93|12:217.15.193.7|13:208.71.63.135|13:220.157.99.10|14:61.192.198.104|11:66.8.46.244|14:200.105.231.18|13:91.113.219.98|13:204.124.80.26|13:93.178.68.211|13:184.72.57.170|15:124.124.105.138|13:24.180.245.37|14:83.211.210.210|13:216.229.185.7|13:93.178.84.248|13:193.106.137.6|12:94.143.40.36|13:93.178.75.214|12:78.37.37.153|13:94.178.150.32|13:95.132.14.230|13:87.117.63.248|15:193.106.137.231|13:87.117.37.243|13:93.178.79.128|13:93.178.87.175|13:92.124.108.25|13:93.178.66.235|13:93.178.66.133|12:93.178.76.69|13:93.178.78.136|13:93.178.85.234|14:91.212.226.202|13:93.178.90.195|13:87.117.60.246|13:93.178.88.245|12:87.117.56.70|12:87.117.59.64|12:87.117.9.105|13:24.21.229.202|15:193.106.137.203|12:87.117.9.105|13:87.117.13.176|12:193.233.67.4|14:196.29.192.166|13:87.117.54.198|13:128.177.27.59|13:87.117.60.220|13:92.255.132.18|
}
Add(Memo,5601546,273,105)
{
Left=145
Top=10
Width=135
Height=180
}
Add(Button,1583054,14,217)
{
Left=25
Top=195
link(onClick,7266732:doEvent1,[])
}
Add(ArrayEnum,15152260,133,182)
{
link(onItem,1856281:doAdd,[(187,188)(187,230)])
link(onEndEnum,10334420:doEvent1,[(219,195)(219,272)])
link(Array,11662081:Array,[(139,162)(153,162)])
}
Add(ArrayEnum,1585798,287,287)
{
link(onItem,5601546:doAdd,[(331,293)(331,202)(261,202)(261,111)])
link(Array,1856281:Array,[])
}
Add(Hub,10334420,231,266)
{
link(onEvent1,1856281:doSort,[])
link(onEvent2,1585798:doEnum,[(266,279)(266,293)])
}
Add(Hub,7266732,63,217)
{
OutCount=3
link(onEvent1,1856281:doClear,[(175,223)(175,237)])
link(onEvent2,5601546:doClear,[(175,230)(175,118)])
link(onEvent3,15152260:doEnum,[(105,237)(105,188)])
}