Утекает память? али нет...

← →
Степан (2007-04-07 21:59) [0]

Проще показать на примере. Вот заготовочка:

procedure TФорма.Событие(Sender: TObject); var Edit: TComponent; ... begin ... Edit := FindComponent(ИмяКомпонента); if (Edit <> nil) and (Edit is TEdit) then with (Edit as TEdit) do Text := "Текст"; end;

Один едиственный вопрос, не возникает ли при этом к-н утечек к-н памяти. Внутренний голос говорит, что нет, но все-таки решил посоветоваться...

← →
Anatoly Podgoretsky © (2007-04-07 22:03) [1]

> Степан (07.04.2007 21:59:00) [0]

Не утекает, только без with красивее

(Edit as TEdit).Text := "Текст";
или
TEdit(Edit).Text := "Текст";

← →
Степан (2007-04-07 22:29) [2]

Спасибо

Утекает память? али нет... Найти похожие ветки