Текущий архив: 2007.04.29;
Скачать: CL | DM;
Вниз
Утекает память? али нет... Найти похожие ветки
← →
Степан (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]Спасибо
Страницы: 1 вся ветка
Текущий архив: 2007.04.29;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.067 c
