Функция CloseWindow

Назначение

Закрывает окно с номером iWindow.

Описание

function CloseWindow (iWindow : integer) : boolean;

Параметры

iWindow : integer - окно, которое необходимо закрыть.

Возвращаемое значение

В случае успешного завершения операции возвращает true, иначе - false.

Примечание

После описания окна становится доступной константа с идентификатором, совпадающим с идентификатором окна и со значением равным номеру окна.

Пример

В примере описаны два окна, второе из которых считается подчиненным первому и поэтому не может быть открыто, если закрыто первое окно.

Для этого в обработчике события cmDone первого окна вызывается функция закрывающая второе окно.

interface example1 'Основной интеpфейс! ';
  show at(,7,,12);
  create view
	as select * from Employee;
  screen first;
	buttons
	cmOpenFirst;
<<
  <. Открыть Первое окно .>
>>
  end;
  window window2 'Окно #2';
	show at(,11,,18);
	screen third;
<<
		 Это последнее (втоpое окно)
>>
	end;
  end;
  window window1 'Окно #1 ';
	show at(,,,10);
	screen second;
	buttons
		cmOpenSecond;
<<
	 Вместе с закрытием текущего окна закроется и 
второе (последнее) окно 
			 <. Открыть окно2 .>
>
	end;  // screen
	handleEvent
	cmOpenSecond: RunWindow(window2);
	cmDone:	 CloseWindow(window2);
	end;
  end;
  handleEvent
   cmOpenFirst: RunWindow(window1);
  end;
end.