Войти
NeoBooker.ru
Добро пожаловать к нам в гости!
Наш сайт посвящён программе NeoBook, с помощью которой вы легко сможете создавать собственные мультимедиа-приложения без необходимости изучать сложные языки программирования! Зарегистрируйтесь, чтобы стать членом нашего сообщества.
  • Страница 1 из 1
  • 1
Модератор форума: Peter, DEMBEL, YURIY  
Вставление символов в строку
misha25Дата: Вс, 22 Мая 2011, 16:12 | Сообщение # 1
Новичок
Всем привет!!!
Не можете помочь? Мне нужно вставить цифру 1 в начало каждой строки файла.
Попробывал с StrIns но там это не возможно.
 
СообщениеВсем привет!!!
Не можете помочь? Мне нужно вставить цифру 1 в начало каждой строки файла.
Попробывал с StrIns но там это не возможно.

Автор - misha25
Дата добавления - 22 Мая 2011 в 16:12
GorezcaidДата: Вс, 22 Мая 2011, 16:19 | Сообщение # 2
Ветеран форума
Читайте справку...
Code
.Для текстовых файлов
SetVar "[v_nachalo]" "1"
FileRead "файл.txt" "All" "[all_file]"
FileWrite "файл.txt" "All" "[v_nachalo][all_file]"


Win7 Pro SP1 x64; NBv5.5.4rus,v5.6.2rus, v5.7.0en, Opera
 
СообщениеЧитайте справку...
Code
.Для текстовых файлов
SetVar "[v_nachalo]" "1"
FileRead "файл.txt" "All" "[all_file]"
FileWrite "файл.txt" "All" "[v_nachalo][all_file]"

Автор - Gorezcaid
Дата добавления - 22 Мая 2011 в 16:19
PeterДата: Вс, 22 Мая 2011, 16:44 | Сообщение # 3
Админ NeoBook
misha25, NeoBook умеет работать только с текстовыми файлами.
Наиболее простое решение (хотя и не единственное) в вашем случае может выглядеть так:
Code
FileLen "[FileName]" "[Len]"
Loop "1" "[Len]" "[n]"
     FileRead "[FileName]" "[n]" "[String]"
     FileWrite "[FileName]" "[n]" "1[String]"
EndLoop

Gorezcaid, ему в начало каждой строки нужно вставить единицу, а не в начало файла.


- А вам какую операционку поставить - экспи, семерку или висту?
- Это ты сейчас о чем?
- Олег Георгиевич, вам какой компьютер хотелось бы - молодежный или надежный?
- Ну, конечно, надежный!
- Вот, значит - экспи, без вопросов! Сейчас сделаем...

(Улицы разбитых фонарей, сезон 10, серия 17)

Единственная инновация Windows 8 это - Metro, чтобы дебилы по иконкам не промахивались!


При модном втюхе модоподдающимся начинает нравиться
 
Сообщениеmisha25, NeoBook умеет работать только с текстовыми файлами.
Наиболее простое решение (хотя и не единственное) в вашем случае может выглядеть так:
Code
FileLen "[FileName]" "[Len]"
Loop "1" "[Len]" "[n]"
     FileRead "[FileName]" "[n]" "[String]"
     FileWrite "[FileName]" "[n]" "1[String]"
EndLoop

Gorezcaid, ему в начало каждой строки нужно вставить единицу, а не в начало файла.


Автор - Peter
Дата добавления - 22 Мая 2011 в 16:44
misha25Дата: Вс, 22 Мая 2011, 18:43 | Сообщение # 4
Новичок
Peter, большое спасибо вам.

Добавлено (22 Май 2011, 18:43)
---------------------------------------------
И если не затруднит, можно ли добавить цифру 2 в конец строки?

 
СообщениеPeter, большое спасибо вам.

Добавлено (22 Май 2011, 18:43)
---------------------------------------------
И если не затруднит, можно ли добавить цифру 2 в конец строки?


Автор - misha25
Дата добавления - 22 Мая 2011 в 18:43
DEMBELДата: Вс, 22 Мая 2011, 18:50 | Сообщение # 5
Наш дизайнер
Code
  FileWrite "[FileName]" "[n]" "1[String]2"


Как задавать вопросы

Win7x64 SP1 Neobook v5.70 (Trial)
WinXP SP3 Neobook v5.62
 
Сообщение
Code
  FileWrite "[FileName]" "[n]" "1[String]2"

Автор - DEMBEL
Дата добавления - 22 Мая 2011 в 18:50
AlienДата: Вс, 22 Мая 2011, 18:51 | Сообщение # 6
Quote (misha25)
И если не затруднит, можно ли добавить цифру 2 в конец строки?

:) А догадаться трудно? Я думаю здесь все очевидно.

Code
FileLen "[FileName]" "[Len]"
Loop "1" "[Len]" "[n]"
     FileRead "[FileName]" "[n]" "[String]"
     FileWrite "[FileName]" "[n]" "1[String]2"
EndLoop
 
Сообщение
Quote (misha25)
И если не затруднит, можно ли добавить цифру 2 в конец строки?

:) А догадаться трудно? Я думаю здесь все очевидно.

Code
FileLen "[FileName]" "[Len]"
Loop "1" "[Len]" "[n]"
     FileRead "[FileName]" "[n]" "[String]"
     FileWrite "[FileName]" "[n]" "1[String]2"
EndLoop

Автор - Alien
Дата добавления - 22 Мая 2011 в 18:51
DEMBELДата: Вс, 22 Мая 2011, 18:54 | Сообщение # 7
Наш дизайнер
видимо трудно...

Как задавать вопросы

Win7x64 SP1 Neobook v5.70 (Trial)
WinXP SP3 Neobook v5.62
 
Сообщениевидимо трудно...

Автор - DEMBEL
Дата добавления - 22 Мая 2011 в 18:54
misha25Дата: Вс, 22 Мая 2011, 19:00 | Сообщение # 8
Новичок
Пардон, пробывал:
Code
FileLen "[FileName]" "[Len]"
Loop "1" "[Len]" "[n]"
     FileRead "[FileName]" "[n]" "[String]"
     FileWrite "[FileName]" "[n]" "[String]2"
EndLoop

А до использования обеих не додумался.

Добавлено (22 Май 2011, 18:57)
---------------------------------------------

Добавлено (22 Май 2011, 19:00)
---------------------------------------------

 
СообщениеПардон, пробывал:
Code
FileLen "[FileName]" "[Len]"
Loop "1" "[Len]" "[n]"
     FileRead "[FileName]" "[n]" "[String]"
     FileWrite "[FileName]" "[n]" "[String]2"
EndLoop

А до использования обеих не додумался.

Добавлено (22 Май 2011, 18:57)
---------------------------------------------

Добавлено (22 Май 2011, 19:00)
---------------------------------------------


Автор - misha25
Дата добавления - 22 Мая 2011 в 19:00
AlienДата: Вс, 22 Мая 2011, 19:01 | Сообщение # 9
 
Сообщение

Автор - Alien
Дата добавления - 22 Мая 2011 в 19:01
YURIYДата: Вс, 22 Мая 2011, 19:09 | Сообщение # 10
WebMaster
 
Сообщение

Автор - YURIY
Дата добавления - 22 Мая 2011 в 19:09
GorezcaidДата: Вс, 22 Мая 2011, 19:25 | Сообщение # 11
Ветеран форума
Quote (Peter)
Gorezcaid, ему в начало каждой строки нужно вставить единицу, а не в начало файла.



Win7 Pro SP1 x64; NBv5.5.4rus,v5.6.2rus, v5.7.0en, Opera
 
Сообщение
Quote (Peter)
Gorezcaid, ему в начало каждой строки нужно вставить единицу, а не в начало файла.


Автор - Gorezcaid
Дата добавления - 22 Мая 2011 в 19:25
misha25Дата: Вс, 22 Мая 2011, 19:39 | Сообщение # 12
Новичок
Нашел я плагин Aliena. За, что ему спасибо(Если плагин работает).
Занчит мне нужно найти то, что между 1 и 2. У меня там стоит Михаил Назаров
Я написал:
Code
FileLen "[FileName]" "[Len]"
Loop "1" "[Len]" "[n]"
     FileRead "[FileName]" "[n]" "[String]"
     FileWrite "[FileName]" "[n]" "1[String]2"
EndLoop
SetVar "[12]" "1"
SetVar "[21]" "2"
Call "tagParse" "[FileName]" "[12]" "[21]" "[rezul]"

Но почему то в [rezul] не чего не выводится.

Добавлено (22 Май 2011, 19:39)
---------------------------------------------

 
СообщениеНашел я плагин Aliena. За, что ему спасибо(Если плагин работает).
Занчит мне нужно найти то, что между 1 и 2. У меня там стоит Михаил Назаров
Я написал:
Code
FileLen "[FileName]" "[Len]"
Loop "1" "[Len]" "[n]"
     FileRead "[FileName]" "[n]" "[String]"
     FileWrite "[FileName]" "[n]" "1[String]2"
EndLoop
SetVar "[12]" "1"
SetVar "[21]" "2"
Call "tagParse" "[FileName]" "[12]" "[21]" "[rezul]"

Но почему то в [rezul] не чего не выводится.

Добавлено (22 Май 2011, 19:39)
---------------------------------------------


Автор - misha25
Дата добавления - 22 Мая 2011 в 19:39
DEMBELДата: Вс, 22 Мая 2011, 19:55 | Сообщение # 13
Наш дизайнер
Использование:

Call "tagParse" "Привет <b>мир</b>!" "<b>" "</b>" "[result]"

а у вас что? во первых, в [Filename] у вас остается имя файла, а должно быть содержимое строк файла после чтения.
Call "tagParse" "[String]" "[12]" "[21]" "[rezul]"
во вторых, что за бред с setvar когда можно прописать непосредственно: Call "tagParse" "[FileName]" "1" "2" "[rezul]"
в третьих... ну попробуйте сначала разобраться с этим.


Как задавать вопросы

Win7x64 SP1 Neobook v5.70 (Trial)
WinXP SP3 Neobook v5.62
 
СообщениеИспользование:

Call "tagParse" "Привет <b>мир</b>!" "<b>" "</b>" "[result]"

а у вас что? во первых, в [Filename] у вас остается имя файла, а должно быть содержимое строк файла после чтения.
Call "tagParse" "[String]" "[12]" "[21]" "[rezul]"
во вторых, что за бред с setvar когда можно прописать непосредственно: Call "tagParse" "[FileName]" "1" "2" "[rezul]"
в третьих... ну попробуйте сначала разобраться с этим.


Автор - DEMBEL
Дата добавления - 22 Мая 2011 в 19:55
misha25Дата: Вс, 22 Мая 2011, 19:58 | Сообщение # 14
Новичок
 
Сообщение

Автор - misha25
Дата добавления - 22 Мая 2011 в 19:58
GorezcaidДата: Вс, 22 Мая 2011, 20:00 | Сообщение # 15
Ветеран форума
Надо передавать не имя файла ([FileName]) а его содержимое.
И текст должен выглядеть вида: <1>Текст</2>
И не должно быть повторений
----------------------
что-то я сегодня опаздываю с сообщениями


Win7 Pro SP1 x64; NBv5.5.4rus,v5.6.2rus, v5.7.0en, Opera

Сообщение отредактировано
Gorezcaid - Вс, 22 Мая 2011, 20:01
 
СообщениеНадо передавать не имя файла ([FileName]) а его содержимое.
И текст должен выглядеть вида: <1>Текст</2>
И не должно быть повторений
----------------------
что-то я сегодня опаздываю с сообщениями

Автор - Gorezcaid
Дата добавления - 22 Мая 2011 в 20:00
DEMBELДата: Вс, 22 Мая 2011, 20:00 | Сообщение # 16
Наш дизайнер
запустите проект по F9 и контролируйте в дебаггере значения всех переменных, а также ход выполнения программы. если чтото не получается, попробуйте искать причину самостоятельно.

Как задавать вопросы

Win7x64 SP1 Neobook v5.70 (Trial)
WinXP SP3 Neobook v5.62
 
Сообщениезапустите проект по F9 и контролируйте в дебаггере значения всех переменных, а также ход выполнения программы. если чтото не получается, попробуйте искать причину самостоятельно.

Автор - DEMBEL
Дата добавления - 22 Мая 2011 в 20:00
  • Страница 1 из 1
  • 1
Поиск: