Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как идеологически правильно? [D5, Win2k]

deffer © (2002-11-06 18:24:00)
Функция (мною написанная)

getObjectsByMask(mask:string):TStrings

Формирует список строк и возвращает как TStrings

ts:=TStringList.create;
.... // заполняем строками, соответствующими маске
result:=ts;

"Пользователи" данной функции использую результат только для отображения его в TListBox-ах (и прочих списках).

Кто должен разрушать созданный в моей функции список? Учитывая, что разрушать надо не перед завершением приложения, а как только объект(список) больше не нужен (сразу после заполнения listBox-ов)? Ну как-то неправильно, если разрушать будет та функция, которая вызывала getObjectsByMask. А как иначе -- не представляю...

Alex4444444444 (2002-11-06 19:30:00) [1]
A ne luchshe

procedure BlaBla(mask: something; Dest: TStrings);

i potom

BlaBla(mask, ListBox.Items);

T.e., kto ego sozdaet, tot i razrushaet (esli voobshe nuzhno sozdavat").

oomneeq (2002-11-06 19:11:00) [2]
imho не заморачиваться заботами о разрушении можно не создавая обекты внутри функций.
в описаном случае можно передавать TStrings(TStringList) в процедуру параметром, а процедура соответственно предполагает наличие уже созданного объекта

getObjectsByMask(mask:string;Items:TStrings);
а вызвать так
getObjectsByMask(mask,ListBox.Items);

down (2002-11-06 18:35:00) [3]
можно возвращать не TStrings, а TStrings.Text:
ListBox.Items.Text := get...

Marcus (2002-11-06 18:32:00) [4]
Дело вкуса, на самом деле. Хотя мне больше нравится так:
ts:=TStringList.create;
try
getObjectsByMask(ts);
// что-то делаем, н-р, заполняем ListBox
finally
ts.Free;
end;

Конструкция try-finally гарантирует, что не будет утечек памяти, какие бы исключения не выскочили в процессе обработки строк

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »