Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.03.06;
Скачать: CL | DM;

Вниз

Вопрос о создании TStrings   Найти похожие ветки 

 
IVANOV ©   (2003-02-22 08:15) [0]

Привет, мастера!
Есть функция, возвращаемый рез-т типа TStrings. Где создавать TStringList для результата? Я делал это в самой ф-и, но тогда нельзя сделать ему Free. Дайте пожалуйста пример обращения к такой ф-и.
Спасибо.


 
Романов Р.В. ©   (2003-02-22 08:26) [1]

http://delphi.mastak.ru/cgi-bin/forum.pl?look=1&id=1045775858&n=3


 
IVANOV ©   (2003-02-23 08:29) [2]

To Романов Р.В.: я наверное туп, но не нашел там ответа на свой вопрос. Вообще хотелось бы понять как сделать ф-ю что-бы ее можно было вызывать так:
Memo1.Lines:= Моя_Функция;


 
Song ©   (2003-02-23 09:53) [3]

Так нельзя, потому что ты не осовободишь созданный объект.
Делается так:

Procedure MyProc(S: TStrings);
Begin
...
End;

Str:=TStringList.Create;
try
MyProc(Str);
Memo1.Lines.Assign(Str);
finally
Str.Free;
end;


 
MBo ©   (2003-02-23 12:17) [4]

>Song
зачем лишний список?

Procedure MyProc(S: TStrings);
Begin
S.Clear;//если надо очищать
...
End;


MyProc(Memo1.Lines);


 
Song ©   (2003-02-23 12:22) [5]

2MBo © (23.02.03 12:17)
С праздником!
Спасибо, упустил, что можно сразу с Lines работать. :)


 
oomneeq ©   (2003-02-23 13:05) [6]

Если результат вызова такой функции присваивать переменной, то можно делать фри этой переменной, после использования.




Страницы: 1 вся ветка

Текущий архив: 2003.03.06;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.02 c
14-17303
Фикус
2003-02-20 08:06
2003.03.06
Прикольно :)


1-17110
ers
2003-02-26 09:20
2003.03.06
Как записать в ини цвет?


14-17322
Не влюбленный
2003-02-14 11:32
2003.03.06
А мне некого поздравлять &(


14-17365
Dracula2000
2003-02-18 16:34
2003.03.06
Service pack for Delphi 5


3-16925
Владимир
2003-02-16 15:34
2003.03.06
Индекс в БД