Программа, разделяющая тексты - Delphi - Обсуждение 759951 |
|
|
Обсуждение
Всего сообщений: 22
|
||||
| Имя | Дата | Сообщение | ||
|
Читать обсуждение полностью: Программа, разделяющая тексты |
||||
| kurljuta | 12.01.2013 22:39 |
https://www.cyberforum.ru/post3992178.html
Всем привет. Для себя решил написать небольшую програмку,...
|
||
| angstrom | 12.01.2013 23:14 |
https://www.cyberforum.ru/post3992355.html
А так не пойдёт?
procedure TForm1.Button1Click(Sender:...
|
||
| kurljuta | 12.01.2013 23:19 |
https://www.cyberforum.ru/post3992383.html
Почему-то ругается на
if Pos( '---', s) then
|
||
| angstrom | 12.01.2013 23:22 |
https://www.cyberforum.ru/post3992398.html
Конечно :)
if Pos( '---', s) > 0 then
|
||
| kurljuta | 12.01.2013 23:38 |
https://www.cyberforum.ru/post3992481.html
Все равно ругается...
Missing operator or semicolon
|
||
| angstrom | 12.01.2013 23:58 |
https://www.cyberforum.ru/post3992552.html
Что-то я не вижу на что может ругаться, строку укажи.
|
||
| kurljuta | 13.01.2013 00:00 |
https://www.cyberforum.ru/post3992563.html
if Pos( '---', s) > 0 then
Сразу после открывающей...
|
||
| angstrom | 13.01.2013 00:10 |
https://www.cyberforum.ru/post3992599.html
Где-то напутал.
|
||
| kurljuta | 13.01.2013 00:24 |
https://www.cyberforum.ru/post3992643.html
Все-таки не работает. Точнее работает, но если мы пишем...
|
||
| angstrom | 13.01.2013 00:28 |
https://www.cyberforum.ru/post3992659.html
Делает то, что просил - не более.
|
||
| kurljuta | 13.01.2013 00:34 |
https://www.cyberforum.ru/post3992673.html
angstrom, :)
|
||
| angstrom | 13.01.2013 00:37 |
https://www.cyberforum.ru/post3992685.html
Игнорировать пустую строку можно так:
...
if (Pos(...
|
||
| kurljuta | 13.01.2013 00:47 |
https://www.cyberforum.ru/post3992721.html
angstrom, пустую строку... а с интером проблема осталась.
|
||
| Lirrk | 13.01.2013 01:00 |
https://www.cyberforum.ru/post3992760.html
текст нужно грузить в memo
И использовать PosEx
Но я бы...
|
||
| Lirrk | 13.01.2013 02:24 |
https://www.cyberforum.ru/post3992982.html
Вот готовый проект
|
||
| FIL | 13.01.2013 12:42 |
https://www.cyberforum.ru/post3993819.html
procedure TForm1.Button1Click(Sender: TObject);
var
i,...
|
||
| Alex_pac | 13.01.2013 12:47 |
https://www.cyberforum.ru/post3993843.html
https://www.cyberforum.ru/blogs/178692/blog543.html
//...
|
||
| kurljuta | 13.01.2013 15:53 |
https://www.cyberforum.ru/post3994884.html
Lirrk, спасибо, но.
Прикрепил архив, там и текстовый...
|
||
| Lirrk | 13.01.2013 17:09 |
https://www.cyberforum.ru/post3995274.html
kurljuta,
Я просто не отработал этот момент до конца. Не...
|
||
| Lirrk | 13.01.2013 17:23 |
https://www.cyberforum.ru/post3995350.html
Ну так и есть. забыл сбросить счётчик.
Готово. Вроде...
|
||
| Mawrat | 13.01.2013 18:11 |
https://www.cyberforum.ru/post3995610.html
Pos() и PosEx() здесь вообще не нужны. Разделитель разделов...
|
||
| Lirrk | 13.01.2013 18:29 |
https://www.cyberforum.ru/post3995701.html
ну как, работает?
|
||
|
|
||||
| Similar |
Разделяющая линия Процедура, разделяющая исходный текст на предложения Координаты белых и черных точек.Разделяющая прямая между ними Как сделать разные тексты разными цветами. Не несколько слов, а разные тексты разными цветами |
|||
| Ads |
|
|||
| MoreAnswers |
тексты
Тексты Seo тексты |
|||
