Home

Page 152
Page 152
background image

Простые приемы работы с сетью

менной он выглядит как одна длинная строка, в которой разделителем тек-

стовых строк является

 символ #ю. Чтобы текст выгля-

дел нормально, мы должны отформатировать содержимое переменной

FindResult.

Для форматирования запускается цикл:
while

 0 do

begin

end;

Как он работает? Пока длина (Length) строки, содержащейся в переменной
FindResult, больше нуля, будет выполняться код, расположенный между

begin и end. Внутри цикла вначале ищется первый символ #ю в строке пе-
ременной FindResult с помощью Pos (#10, FindResult). Результат сохра-
няется в переменной

 Например, если в FindResult находится строка,

в которой десятый символ — это #10, то в переменную iPos попадет цифра ю.

В следующей строке кода:

 iPos -1))

копируется текст в переменную Line из переменной FindResult, начиная
с первого символа по символ #ю. Таким образом выделяется первая строка

текста. После этого можно смело добавить эту строчку в компонент

с помощью команды:

В последней строке цикла удаляется уже выбранный текст с помощью
команды:

Теперь в переменной FindResult нет текста, который скопирован из нее

и добавлен в

 После этого происходит проверка, если длина строки

в переменной FindResult больше нуля, то цикл продолжает свою работу,

чтобы извлечь следующую строку. Если переменная FindResult пустая, то

цикл остановится.

Что такое символ #10? Это код символа перевода каретки (перехода на но-

вую строку), который используется в ОС семейства *nix. В Windows принято
конец строки обозначать парой символов: #13 и #ю (конец строки и пере-
вод каретки). Если вы пишете только под *nix, то весь код по форматирова-

нию результирующего текста вам не нужен. Вы можете просто написать.

В Windows такой трюк не пройдет, потому что текст в компоненте тмето

получится неформатированным и просто непригодным для восприятия. По-
этому пришлось немного помучиться, ручное форматирование тут достаточ-

но уместное занятие.


Copyright © 2020 Файлообменник files.d-lan.dp.ua

Использование любых материалов сайта возможно только с разрешения автора.