Условия if, then, else - Общие вопросы Delphi

SKS · 24.03.2011, 05:36

Всем привет уважаемые форумчане!
Делаю программу и не могу заставить выполнять условия.
на кнопку я прописал, чтобы она показывала panel2 и выполнялось условие, но не получается, delphi указывает что ошибка, и устанавливает курсор на знак (

, перепробовал разные варианты не получается, что можете посоветовать???
Заранее благодарю!

Код:

procedure TForm1.Button1Click(Sender: TObject);
begin
if panel2.Visible:=true; then panel2.Visible:=false; else panel2.Visible:=true;
end;

________
Код нужно оформлять по правилам:
тегом [CODE]..[/СODE] (это кнопочка с решёточкой #)
Не забывайте об этом!
Модератор.

Sparkman · 24.03.2011, 05:47

Цитата:

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

...

Код:

if panel2.Visible=true then panel2.Visible:=false else panel2.Visible:=true;

SKS · 24.03.2011, 06:12

Sparkman огромное СПАСИБО! Этот вариант, упустил я.

unbanned · 24.03.2011, 07:10

Код:

panel2.Visible:=not(panel2.Visible);

можно так еще сделать

Johnson · 24.03.2011, 07:40

перед и после ключевых слов if, then, else не должно быть знака ; никогда.

MyLastHit · 24.03.2011, 13:23

Перед if должно

Перед end'ами можно и не ставить.

24.03.2011, 05:36	#1
SKS Форумчанин Регистрация: 05.01.2009 Сообщений: 242	Условия if, then, else Всем привет уважаемые форумчане! Делаю программу и не могу заставить выполнять условия. на кнопку я прописал, чтобы она показывала panel2 и выполнялось условие, но не получается, delphi указывает что ошибка, и устанавливает курсор на знак (, перепробовал разные варианты не получается, что можете посоветовать??? Заранее благодарю! Код: `procedure TForm1.Button1Click(Sender: TObject); begin if panel2.Visible:=true; then panel2.Visible:=false; else panel2.Visible:=true; end;` ________ Код нужно оформлять по правилам: тегом [CODE]..[/СODE] (это кнопочка с решёточкой #) Не забывайте об этом! Модератор. Последний раз редактировалось Serge_Bliznykov; 24.03.2011 в 07:15.

24.03.2011, 07:10	#4
unbanned Форумчанин Регистрация: 23.11.2010 Сообщений: 530	Код: `panel2.Visible:=not(panel2.Visible);` можно так еще сделать

24.03.2011, 07:40	#5
Johnson кривокодер ;) Форумчанин Регистрация: 20.06.2008 Сообщений: 707	перед и после ключевых слов if, then, else не должно быть знака ; никогда. "А как написать праграму?, "ришыти задачьку очинь нада" ©с форума. Жить становится интереснее, жить становится веселее... {Быть или не быть} {Неуспешный суицид}

24.03.2011, 13:23	#6
MyLastHit Очень суровый Участник клуба Регистрация: 17.12.2009 Сообщений: 1,988	Перед if должно Перед end'ами можно и не ставить. Ненавижу быть как все, но люблю, чтобы все были как я.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
while 2 условия - ошибка	SwiP	Общие вопросы Delphi	2	24.05.2010 21:04
Условия	DartDayring	Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM	1	02.04.2010 10:08
условия	glupayastudentka	Помощь студентам	7	25.06.2009 09:43
Проверка условия	artemavd	БД в Delphi	21	07.05.2009 18:20

24.03.2011, 06:12	#3
SKS Форумчанин Регистрация: 05.01.2009 Сообщений: 242	Sparkman огромное СПАСИБО! Этот вариант, упустил я.