![]() |
|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
Опции темы | Поиск в этой теме |
![]() |
#1 | ||
Новичок
Джуниор
Регистрация: 17.11.2012
Сообщений: 4
|
![]()
Всем привет!
Помогите дописать программу до рабочего состояния нужно чтобы pos() двигался дальше первой строки и переписывал значиения pos1 и pos2, которые выводятся с помощью showmessage(), чтобы я видела, правильно ли работает программа Код программы: Код:
использовать pos() (!!не posex()) ![]() Текстовой файл: Цитата:
Цитата:
|
||
![]() |
![]() |
![]() |
#2 |
Старожил
Регистрация: 17.11.2010
Сообщений: 18,922
|
![]()
Если уж в цикле идете по StrinList, то зачем Text парсите? Есть StringList.Strings[i] и легко посчитать по каждой строке позиции
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
|
![]() |
![]() |
![]() |
#3 |
Новичок
Джуниор
Регистрация: 17.11.2012
Сообщений: 4
|
![]() |
![]() |
![]() |
![]() |
#4 |
Старожил
Регистрация: 17.11.2010
Сообщений: 18,922
|
![]()
StringList.Strings[i] возвращает каждую строку в отдельности. В ней и ищите с помощью Pos позицию "-". Второй Pos не нужен, достаточно длину строки показать с помощью Length
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
|
![]() |
![]() |
![]() |
#5 | ||
Новичок
Джуниор
Регистрация: 17.11.2012
Сообщений: 4
|
![]() Цитата:
Цитата:
|
||
![]() |
![]() |
![]() |
#6 |
Старожил
Регистрация: 17.11.2010
Сообщений: 18,922
|
![]() Код:
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
|
![]() |
![]() |
![]() |
#7 | |
Старожил
Регистрация: 20.04.2008
Сообщений: 5,527
|
![]() Цитата:
begin s:=list.strings[j]; pos1:=pos('-',s); showmessage(format('s(%d)=%s pos=%d after=%d', [j, s,pos1, length(s)=pos1]); end;
программа — запись алгоритма на языке понятном транслятору
|
|
![]() |
![]() |
![]() |
#8 |
Старожил
Регистрация: 17.11.2010
Сообщений: 18,922
|
![]()
[i, s,pos1, length(s)-pos1]
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
|
![]() |
![]() |
![]() |
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Как зациклить? | novuiPolzovatel | Помощь студентам | 6 | 23.04.2012 19:06 |
Зациклить макрос. | Константин С | Microsoft Office Excel | 9 | 10.11.2011 15:24 |
Как зациклить код? | boldoc | Паскаль, Turbo Pascal, PascalABC.NET | 23 | 23.07.2011 13:14 |
Зациклить галерею | krotik_06 | JavaScript, Ajax | 2 | 24.06.2011 19:55 |
Не могу зациклить макрос | Frommerrr | Microsoft Office Word | 2 | 25.03.2010 10:57 |