| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

try..finally

Страницы:   < 1 2 >

valer4 ©   (2008-07-23 21:54:00) 

как правильно cделать  1) или 2)?

1)
with ExampleForm.Create(Self) do
 try
   Caption := 'Example';
   ShowModal;
 finally
   Free;
 end;
2)
with ExampleForm.Create(Self) do
begin
 Caption := 'Example';
 try
   ShowModal;
 finally
   Free;
 end;
end;

---

Johnmen   (2008-07-23 22:19:00) [21]

Если Caption := 'Example'; приводит к исключению, это значит, что не работает процессор, или память сбоит :))

---

Anatoly Podgoretsky   (2008-07-23 22:11:00) [22]

> valer4  (23.07.2008 21:54:00)  [0]

А почему ты спрашиваешь.
Попробуй сам объяснить почему в 1 Caption выше, а в 2 ниже. Как ты понимаешь работу этого кода.

---

easy   (2008-07-23 22:03:00) [23]

1)

---

palva   (2008-07-23 22:02:00) [24]

> иначе 2)

то есть 1)

---

Сергей М.   (2008-07-23 22:01:00) [25]

Если ты уверен в том, что строчка

Caption := 'Example';

не вызовет исключения, то оба варианта имеют право на "правильность",
иначе 2)

---

Страницы:   < 1 2 >

Наверх