| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Структура
asdf © (2008-01-17 13:34:00)Как лучше сделать обработку след. данных:
Есть датасет. Из него вытаскивается поле(FieldForPars), передается в класс(MyParser, скажем), который рызбирает эту строку на сост. эл-ты. MyParser загоняет все сост. поля в запись(ParsRec). В FieldForPars может содержаться нес-ко эл-тов для анализа, т.е. надо рез-т запихнуть в несколько записей Pars, поэтому я все это дело загоняю в указатели, а указатели в TList, который передается в метод Parse. Получается следующее:
while not DataSetPars.Eof do
begin
MyParser.Parse(DataSetPars.FieldByName('FieldForPars').AsString, List);
DataSetPars.Next;
end;
// что-то делаю с данными List
//а вот следующее, как мне кажется дрянь
for i := Pred(List.Count) downto do
Dispose(PParseRec(List[i]));
List.Clear;
как сделать-то, чтоб указатели в одном месте выделялись и освобождались?
asdf (2008-01-17 14:33:00) [1]
> ketmar © (17.01.08 14:22) [2]
Ну да, точно.
спс
Dennis I. Komarov (2008-01-17 14:24:00) [2]> [1] asdf (17.01.08 14:15)
begin
WriteLn('Hello World');
end;
:)
ketmar (2008-01-17 14:22:00) [3]а что, унаследовать/агрегировать TList и сделать всё «в одном месте» — в своём классе — никак не выходит?
asdf (2008-01-17 14:15:00) [4]Ладно, а как сделать программу Hello World?
| |
