Все тодже IF!!! - Общие вопросы Delphi

MAKEDON · 23.12.2007, 14:56

С использованием нескольких условий всу ОК!!! Но теперь проблема: мне нужно чтобы после Then программа выполняла несколько оппераций! Например зделать несколько объектов видимыми!

Романнн · 23.12.2007, 15:18

if условие then
begin
код;
end
else
begin
другой_код;
end;

Yurk@ · 23.12.2007, 15:18

Код:

if (условие) then
begin
....
....
....
end     // обрати внимание - точки с запятой нет
else 
begin
....
....
....
end;

SunKnight · 23.12.2007, 15:19

If n>0 then
begin
Button1.Visible:=true;
Combobox1.Visible:=true;
......
end
else
Button1.Visible:=false;
Combobox1.Visible:=false;

Если я правильно понял вопрос.

mihali4 · 23.12.2007, 15:48

Цитата:

Сообщение от MAKEDON

С использованием нескольких условий всу ОК!!! Но теперь проблема: мне нужно чтобы после Then программа выполняла несколько оппераций! Например зделать несколько объектов видимыми!

Несколько операций объединяются в один контейнер операторами BEGIN...END

zAlexandrz · 23.12.2007, 15:50

Цитата:

Сообщение от SunKnight

Код:

If n>0 then begin Button1.Visible:=true; Combobox1.Visible:=true; ...... end else Button1.Visible:=false; Combobox1.Visible:=false;

Если я правильно понял вопрос.

Правельнее так

Код:

If n>0 then 
begin
  Button1.Visible:=true;
  Combobox1.Visible:=true;
  ......
end
else
begin
  Button1.Visible:=false;
  Combobox1.Visible:=false;
end;

SunKnight · 23.12.2007, 15:57

Согласен с zAlexandrz!! Забыл дописать...

23.12.2007, 14:56	#1
MAKEDON The First Person! Форумчанин Регистрация: 07.08.2007 Сообщений: 228	Все тодже IF!!! С использованием нескольких условий всу ОК!!! Но теперь проблема: мне нужно чтобы после Then программа выполняла несколько оппераций! Например зделать несколько объектов видимыми! Программа обычно делает то что вы ей сказали сделать, а не то что бы вы хотели, чтобы она сделала.

23.12.2007, 15:18	#3
Yurk@ Участник клуба Регистрация: 19.12.2007 Сообщений: 1,100	Код: `if (условие) then begin .... .... .... end // обрати внимание - точки с запятой нет else begin .... .... .... end;` На форуме: Помогаю за спасибо ICQ\Skype: Это моё личное время ...

23.12.2007, 15:19	#4
SunKnight Участник клуба Подтвердите свой е-майл Регистрация: 14.12.2007 Сообщений: 1,434	If n>0 then begin Button1.Visible:=true; Combobox1.Visible:=true; ...... end else Button1.Visible:=false; Combobox1.Visible:=false; Если я правильно понял вопрос. Проповедую design patterns, верую в MVC, доверяю eXtrime programming.

23.12.2007, 15:57	#7
SunKnight Участник клуба Подтвердите свой е-майл Регистрация: 14.12.2007 Сообщений: 1,434	Согласен с zAlexandrz!! Забыл дописать... Проповедую design patterns, верую в MVC, доверяю eXtrime programming.

23.12.2007, 15:18	#2
Романнн Пользователь Регистрация: 04.11.2007 Сообщений: 64	if условие then begin код; end else begin другой_код; end;