Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Один из компонентов Tedit на панели не должен входить в условиие [D7, WinXP]

Kat © (2005-02-25 15:57:00)
Пишу так:
if (paTop.Controls[i] is TEdit)
Компонент sbName не должен входить в это условие.
Подскажите, а как написать. Все варианты перерыл :(

Алхимик (2005-02-25 16:27:00) [1]

> [4] Anatoly Podgoretsky © (25.02.05 16:07)

Верно. Не прав был.

begin...end (2005-02-25 16:14:00) [2]
> Kat (25.02.05 16:10) [5]

var
Control: TControl;
begin
Control := paTop.Controls[i];
if (Control is TEdit) and (Control <> sbName) then
...
end.

Kat (2005-02-25 16:10:00) [3]
sbName это компонент класса TEdit

Anatoly Podgoretsky (2005-02-25 16:07:00) [4]
Алхимик © (25.02.05 16:03) [3]
А ты уверен, что sbName это строка?

Алхимик (2005-02-25 16:03:00) [5]
if (paTop.Controls[i] is TEdit) AND (paTop.Controls[i].Name <> sbName)

begin...end (2005-02-25 16:02:00) [6]
> Kat (25.02.05 15:57)

> if (paTop.Controls[i] is TEdit)
> Компонент sbName не должен входить в это условие.

А он и так в него не входит :-)

Не совсем понятно, что нужно. Может, поясните?

Anatoly Podgoretsky (2005-02-25 16:01:00) [7]
Используй логический оператор AND

Наверх

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