Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 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.049 c
8-1155501773
Jimmy
2006-08-14 00:42
2007.04.29
Не работает большой Image


2-1175816300
Чайник
2007-04-06 03:38
2007.04.29
Что это: Unsatisfied forward or external declaration: P1202_AdsP


15-1175512484
Kot Andrei
2007-04-02 15:14
2007.04.29
MSDN offline


15-1175616972
И. Павел
2007-04-03 20:16
2007.04.29
Документация и бета тестирование


15-1175457900
Nic (ro)
2007-04-02 00:05
2007.04.29
Delphi 2007