HiAsm
HiAsm
Вверх ↑
ФорумыПомощь по пакетуОтделение чисел из таблицы ← Ctrl1Ctrl →
Этот топик читают: Гость
Ответов: 33
Рейтинг: 0
#1: 2013-09-18 13:02:32 ЛС | профиль | цитата
Добрый день форумчане!
Подскажите как реализовать. Есть таблица с данными "ФИО Тел Почта" нужен вывод телефонов с 9 значными значениями в список
Заранее большое спасибо
карма: 1

0
Ответов: 16884
Рейтинг: 1239
#2: 2013-09-18 13:08:58 ЛС | профиль | цитата
MatrixRW
ArrayRW
ArrayEnum
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 33
Рейтинг: 0
#3: 2013-09-18 13:22:56 ЛС | профиль | цитата
Я понимаю что это просто, если не затруднит скиньте примерчик пожалуйста, чето совсем туплю не могу сообразить
карма: 1

0
Ответов: 16884
Рейтинг: 1239
#4: 2013-09-18 13:35:49 ЛС | профиль | цитата
Нажми на те ссылки, что я дал - там и по 2-3 примера есть.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 33
Рейтинг: 0
#5: 2013-09-18 15:37:08 ЛС | профиль | цитата
Мучелся мучелся не чего не получилось.
Как переделать, чтобы отделить мобильные телефоны от городских и вывести их в разные списки 
Add(Button,8261156,556,169)
{
 Left=140
 Top=110
 Caption=">>>"
 link(onClick,14257659:doEnum,[(626,175)(626,230)(691,230)(691,189)])
}
Add(ListBox,12819431,703,120)
{
 Left=28
 Top=60
 Width=100
 Height=110
 Strings=#11:89090000000|11:89091234567|6:777777|6:898989|11:89090000000|6:222777|
}
Add(ArrayEnum,14257659,703,183)
{
 link(onItem,16008469:doCompare,[(783,189)(783,318)])
 link(Array,12819431:Array,[(709,174)(723,174)])
}
Add(ListBox,6372019,976,197)
{
 Left=265
 Top=25
}
Add(If_else,16008469,832,312)
{
 Op2=Integer(777777)
 link(onTrue,6372019:doAdd,[(923,318)(923,203)])
 link(onFalse,992660:doAdd,[(927,325)(927,273)])
}
Add(ListBox,992660,983,267)
{
 Left=265
 Top=120
}
Add(MainForm,12785983,420,490)
{
 Caption="Пример использования ArrayEnum"
}
[/cоde]
карма: 1

0
Разработчик
Ответов: 26322
Рейтинг: 2147
#6: 2013-09-18 15:47:32 ЛС | профиль | цитата
alexragulin писал(а):
чтобы отделить мобильные телефоны от городских и вывести их в разные списки

Как-то так можно

Add(Button,8261156,420,245)
{
 Left=140
 Top=110
 Caption=">>>"
 link(onClick,14257659:doEnum,[])
}
Add(ListBox,12819431,490,182)
{
 Left=28
 Top=60
 Width=100
 Height=110
 Strings=#11:89090000000|11:89091234567|6:777777|6:898989|11:89090000000|6:222777|
}
Add(ArrayEnum,14257659,504,245)
{
 link(onItem,5887940:doLength,[])
 link(Array,12819431:Array,[])
}
Add(ListBox,6372019,735,245)
{
 Left=265
 Top=25
 Width=100
 link(Str,16389358:Var3,[(741,236)])
}
Add(If_else,16008469,609,245)
{
 Type=2
 Op2=Integer(6)
 link(onTrue,6372019:doAdd,[])
 link(onFalse,992660:doAdd,[(658,258)(658,265)])
}
Add(ListBox,992660,693,259)
{
 Left=265
 Top=120
 Width=100
 link(Str,16389358:Var2,[])
}
Add(MainForm,12785983,420,196)
{
 Caption="Пример использования ArrayEnum"
}
Add(Length,5887940,560,245)
{
 link(onLength,16008469:doCompare,[])
}
Add(GetDataEx,16389358,693,231)
{
 Angle=3
 link(Data,14257659:Item,[(601,236)(601,285)(510,285)])
}
карма: 22

0
Ответов: 16884
Рейтинг: 1239
#7: 2013-09-18 15:53:55 ЛС | профиль | цитата
code_31850.txt
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
файлы: 1code_31850.txt [1.4KB] [101]
Ответов: 33
Рейтинг: 0
#8: 2013-09-18 15:54:13 ЛС | профиль | цитата
nesco, большое спасибо, все гениальное просто
карма: 1

0
Ответов: 16884
Рейтинг: 1239
#9: 2013-09-18 15:56:05 ЛС | профиль | цитата
Пока заполнял таблицу,nesco опередил.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 1536
Рейтинг: 176
#10: 2013-09-19 12:44:08 ЛС | профиль | цитата
alexragulin писал(а):
Мучелся мучелся не чего не получилось.
Вариантов куча. 
Add(ListBox,12819431,294,126)
{
 Left=28
 Top=60
 Width=100
 Height=110
 Strings=#15:8-909-000-00-00|15:8-909-123-45-67|8:77-77-77|8:89-89-89|15:8-909-000-00-00|8:22-27-77|
}
Add(StrMask,4958136,357,189)
{
 Mask="#-###-###-##-##"
 link(onFalse,7571385:doCompare,[(405,195)(405,160)])
 link(onTrue,7837447:doAdd,[])
}
Add(StrMask,7571385,420,154)
{
 Mask="##-##-##"
 link(onTrue,13403331:doAdd,[])
}
Add(ListBox,13403331,469,161)
{
 Left=200
 Top=30
 Width=100
}
Add(ListBox,7837447,420,196)
{
 Left=200
 Top=125
 Width=100
}
Add(Button,2353088,259,189)
{
 Left=135
 Top=105
 Caption=">>>"
 link(onClick,13751889:doEnum,[])
}
Add(ArrayEnum,13751889,308,189)
{
 link(onItem,4958136:doCompare,[])
 link(Array,12819431:Array,[])
}
карма: 1
Не так страшна ошибка, как опасность её не заметить.

0
Ответов: 16884
Рейтинг: 1239
#11: 2013-09-19 14:46:05 ЛС | профиль | цитата
ser_davkin писал(а):
Вариантов куча.
Одно не понятно : Зачем нужен "голый" список телефонов без Ф.И.О. их владельцев ?
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 1376
Рейтинг: 198
#12: 2013-09-19 14:48:54 ЛС | профиль | цитата
Tad писал(а):
Зачем нужен "голый" список телефонов без Ф.И.О. их владельцев ?
Для синхронизации с головой, наверно
карма: 1

1
Голосовали:Tad
Ответов: 1536
Рейтинг: 176
#13: 2013-09-19 15:58:49 ЛС | профиль | цитата
Tad, так ведь, очевидно же!
alexragulin писал(а):
Мучелся мучелся не чего не получилось.
Как переделать, чтобы отделить мобильные телефоны от городских и вывести их в разные списки
Я, лишь, указал на возможность применения StrMask!
карма: 1
Не так страшна ошибка, как опасность её не заметить.

0
Ответов: 16884
Рейтинг: 1239
#14: 2013-09-19 17:55:00 ЛС | профиль | цитата
ser_davkin, список можно и так разделить - кликом по колонке "телефон"
code_31857.txt
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
файлы: 1code_31857.txt [749B] [87]
Ответов: 1536
Рейтинг: 176
#15: 2013-09-19 20:04:19 ЛС | профиль | цитата
....
карма: 1
Не так страшна ошибка, как опасность её не заметить.

0
15
ФорумыПомощь по пакетуОтделение чисел из таблицы ← Ctrl1Ctrl →
Сообщение
...
Прикрепленные файлы
(файлы не залиты)
HiAsm Studio 2003 - 2025
Пользовательское соглашение | support@hiasm.com
Яндекс.Метрика