Вверх ↑
Этот топик читают: Гость
Ответов: 1925
Рейтинг: 172
#1: 2007-08-08 12:25:35 ЛС | профиль | цитата
Для себя компоненты делал, они просто могут быть заменены схемами, но, на мой взгляд, удобнее компонентом. Если кому надо - скачивайте.

1. Компонент для подсчёта числа символов в массиве (например, Memo);
2. = для проверки нахождения чила в заданном диапазоне;
3. = для соединения неизвестного заранее кол-ва строк;
4. = для добавления объекта пользователя к имени папки, откуда запущена прога (совсем примитивный;
5. = для ограничения числа в Edit по значению (тупее нет:-))
6. = разбиение строки на символы с выдачей при каждой итерации определённого кол-ва их;
7. = разбиения текста на слова. Исопльзуется немного другой принцип, в отличие от компонента 6.
карма: 9
0
vip
#1.1контекстная реклама от партнеров
Ответов: 305
Рейтинг: 4
#2: 2010-04-02 19:42:28 ЛС | профиль | цитата
Not Found
карма: 0

0
Ответов: 1841
Рейтинг: 369
#3: 2010-04-02 19:55:18 ЛС | профиль | цитата

карма: 1
0
Ответов: 970
Рейтинг: 270
#4: 2010-04-02 19:57:16 ЛС | профиль | цитата
http://hiasm.com/xf/attach/files/%d4%f3%ed%ea%f6%e8%e8.rar

[block][imgl]http://icons.hiasm.com/img/8/4437_icon13.ico[/img]Смотрим файлы с латиницей
Некоторые файлы не открываются, потому что залиты с именем в виде русских или других нестандартных букв. Чтобы скачать такие файлы заходим по адресу http://hiasm.com/xf/attach/files/ и ищем искомый файл. (Например по размеру, расширению) [/block]
карма: 0

0
Ответов: 19
Рейтинг: 7
#5: 2010-04-03 02:23:32 ЛС | профиль | цитата
hi смотрел по расширению по размеру ничего нет.
карма: 0

0
Ответов: 1328
Рейтинг: 69
#6: 2010-04-03 16:17:00 ЛС | профиль | цитата
Buns, ссылка, что дал Genius рабочая, просто переименуй после скачки, чтоб расширение было .rar
карма: 2

0
Ответов: 19
Рейтинг: 7
#7: 2010-04-05 04:28:09 ЛС | профиль | цитата
Konst, Genius, thank you all work
карма: 0

0
Ответов: 56
Рейтинг: 2
#8: 2018-02-10 06:35:39 ЛС | профиль | цитата
3042 писал(а):
Если кому надо - скачивайте

3042, если будет время, перезалейте пожалуйста файлы.
карма: 2
На этом форуме, самые умные и добрые люди, всегда помогут! СПАСИБО!
0
Разработчик
Ответов: 26069
Рейтинг: 2121
#9: 2018-02-10 12:24:06 ЛС | профиль | цитата
Часть из этого уже есть в пакете

2-- компонент Between
3 -- реализуется на одном из компонентов StrCat или StrCatDelim в режиме накопителя.
6 и 7-- компонент Str_Enum
карма: 22

0
Ответов: 16884
Рейтинг: 1239
#10: 2018-02-10 13:07:47 ЛС | профиль | цитата
1. http://forum.hiasm.com/getfile/36306
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 56
Рейтинг: 2
#11: 2018-02-10 18:43:08 ЛС | профиль | цитата
nesco писал(а):
Часть из этого уже есть в пакете


Tad писал(а):
http://forum.hiasm.com/getfile/36306


Спасибо)
карма: 2
На этом форуме, самые умные и добрые люди, всегда помогут! СПАСИБО!
0
Ответов: 1925
Рейтинг: 172
#12: 2018-02-11 19:59:12 ЛС | профиль | цитата
1. CalcSymbArr.rar
2.
nesco писал(а):
2-- компонент Between

3. Без всяких компонентов:
Add(StrCat,5207725,329,308)
{
link(Str1,5207725:Result,[(335,296)(323,296)(323,352)(335,352)])
}
4. CurDirAndUserObj.rar (тоже реализуется на штатных, но часто удобнее)
5. Не смог найти. Можно так:
Add(Edit,10681569,329,217)
{
Left=100
Top=65
Width=130
Text="0"
DataType=2
link(onChange,16732761:doCompare,[])
}
Add(If_else,16732761,392,217)
{
Type=2
link(onTrue,7047508:doData,[])
link(Op2,645559:Var2,[])
}
Add(VisualStrings,2514421,399,168)
{
Lines=#2:10|
}
Add(DoData,7047508,448,217)
{
Data=Integer(0)
link(onEventData,10681569:doText,[(492,223)(492,211)(317,211)(317,223)])
link(Data,645559:Var3,[(454,201)])
}
Add(GetDataEx,645559,399,196)
{
link(Data,2514421:Text,[])
}
6, 7.
nesco писал(а):
компонент Str_Enum


Компоненты делал, когда впервые научился писать на Object Pascal и чуть ли не каждый участок схемы стремился переделать в код. Сейчас уже не страдаю этим: зачастую на компонентах быстрее и понятнее.

Редактировалось 1 раз(а), последний 2018-02-11 19:59:58
карма: 9
0
файлы: 2CalcSymbArr.rar [1KB] [578], CurDirAndUserObj.rar [1.6KB] [600]
Разработчик
Ответов: 26069
Рейтинг: 2121
#13: 2018-02-11 20:16:04 ЛС | профиль | цитата
3042 писал(а):
3. Без всяких компонентов:

Это как-бы не без всяких компонентов, это на штатном компоненте. Но бывают случаи, когда надо сшить или с пробелами, или с переводом строки, тогда поможет компонент StrCatDelim

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

0
Ответов: 56
Рейтинг: 2
#14: 2018-02-11 20:19:56 ЛС | профиль | цитата
3042, спасибо!
карма: 2
На этом форуме, самые умные и добрые люди, всегда помогут! СПАСИБО!
0
Ответов: 1925
Рейтинг: 172
#15: 2018-02-11 21:27:26 ЛС | профиль | цитата
nesco писал(а):
Это как-бы не без всяких компонентов, это на штатном компоненте. Но бывают случаи, когда надо сшить или с пробелами, или с переводом строки, тогда поможет компонент StrCatDelim

Ну, само собой
карма: 9
0
15
Сообщение
...
Прикрепленные файлы
(файлы не залиты)