|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
04.06.2015, 15:55 | #1 |
Форумчанин
Регистрация: 11.10.2010
Сообщений: 152
|
Что делает эта функция
Доброго времени суток, форумчане! Разбираю код своего предшественника и вот не могу понять, что делает эта функция, подскажите:
Код:
|
04.06.2015, 16:34 | #2 | |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
явно есть список TNotesItem, в котором хранятся TStringList'ы (a'ля Memo).
Функция проходит по списку, сравнивая имя в списке с переданным параметром, если совпало, то результату присваивается данный стринглист. кстати, я бы был с этой функцией настороже: она внутри делает Create, а кто будет чистить созданное - не совсем понятно... Цитата:
Последний раз редактировалось Serge_Bliznykov; 04.06.2015 в 16:51. |
|
04.06.2015, 17:19 | #3 |
Форумчанин
Регистрация: 11.10.2010
Сообщений: 152
|
Далее вызывается в коде таким образом:
Код:
SL содержит в себе memolist из двух строк так называемые tnotesitem: 0 - ZakInOtdel 1 - ZakInArhiv И каждая в себе содержит здоровенный sql-запрос Тогда вопрос вдогонку - есть набор написанных компонентов. Чтобы с ними работать - надо их устанавливать (устанавливая через .bpl файлы). Как сделать так, чтобы не приходилось их устанавливать на каждой машине, чтобы работать с кодом? Последний раз редактировалось nactyx; 04.06.2015 в 17:31. |
05.06.2015, 08:51 | #4 |
Форумчанин
Регистрация: 11.10.2010
Сообщений: 152
|
Т.е. имеется ли возможность их напрямую привязать сразу к проекту, без установки каждый раз?
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Обьясните пожалуста как и что делает эта программа и почему она это делает. | Dimka-novitsek | Общие вопросы C/C++ | 7 | 16.10.2013 12:02 |
Что делает эта процедура? (не студент) | hon | Общие вопросы Delphi | 3 | 29.07.2012 21:00 |
Что делает эта строчка??? | marselik | Общие вопросы C/C++ | 2 | 02.11.2009 13:54 |
Что делает эта прога | StudentPolitech | Общие вопросы C/C++ | 1 | 25.03.2009 22:54 |
FindEgual-что делает эта функция? | stasig | Паскаль, Turbo Pascal, PascalABC.NET | 1 | 14.12.2008 23:02 |