Как реализовать переключение форм?

22.09.2011, 23:32. **Просмотров** 4428. **Ответов** 1

Всем привет

.

Пишу курсовой, нужно сделать оконный интерфейс. С Lazarus только познакомился, ООП не знаю совсем, до этого изучал только Паскаль.

Есть две формы, эмулятор и калькулятор. Переключение из одной в другую выполняется через меню Навигация. Сами формы создал, а вот как реализовать переключение из одной в другую - не могу разобраться. После гугления и поисков на форумах набросал кое-как работающий код, но это явно не то...

Подскажите кто-нибудь пожалуйста, как это можно сделать или где найти понятные примеры.

Исходники прикрепил. Использую Lazarus 0.9.30 + FPC 2.4.2.

24.09.2011, 11:56

Оказывается, нужно всего 4 строчки:

Delphi

form1.visible:=false; {прячем текущую форму}
form2.left:=form1.left; {устанавливаем новую форму}
form2.top:=form1.top; {на место предыдущей}
form2.show; {показываем другую форму}

Тему можно закрыть.

Опции темы

Как реализовать переключение форм?

Решение