Есть несколько рабочих форм, хочется перенести во вкладки, но не мешать код

antox
Дата: 29.07.2019 03:14:20
Подскажите единственно верный путь )))

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

Хотелось бы перевести формы во вкладки (+ сейчас это модно, даже Win планирует переход на вкладки), но при этом не хочется мешать код. Как лучше реализовать? Фреймы и только они? Если они, то можно где-нибудь глянуть примеры и есть ли личный опыт такого использования фреймов?
Близнец1980
Дата: 29.07.2019 06:49:15
antox,
Я в одном небольшом проекте использовал TCardPanel. Но код-то в одном модуле для всех TCard.
Gerasimenko
Дата: 29.07.2019 08:26:09
antox
Подскажите единственно верный путь )))

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

Хотелось бы перевести формы во вкладки (+ сейчас это модно, даже Win планирует переход на вкладки), но при этом не хочется мешать код. Как лучше реализовать? Фреймы и только они? Если они, то можно где-нибудь глянуть примеры и есть ли личный опыт такого использования фреймов?

Можно фреймы, можно формы.
Я делаю с формами. TPageControl + динамическое создание формы.
DimaBr
Дата: 29.07.2019 08:26:33
Form.Parent := TabSheet
antox
Дата: 30.07.2019 04:18:12
Что-то не получается:

Пробовал с автосозданием формы

  if Assigned(form3) then form3.Parent := ts1;


Пробовал сам создавать:

  var   f3: TForm3;
...
  f3:=TForm3.Create(self);
  if Assigned(f3) then f3.Parent := ts1;
  ts1.Repaint;


Не появляется содержимое формы на вкладке :(
Ghost Writer
Дата: 30.07.2019 07:46:20
antox,

f3.Show / f3.Visible := True;
DimaBr
Дата: 30.07.2019 07:50:20
Картинка с другого сайта.
antox
Дата: 30.07.2019 10:16:04
Ghost Writer
antox,

f3.Show / f3.Visible := True;


Лето, мозг начал плавиться ))) Спасибо, забыл
antox
Дата: 30.07.2019 10:17:26
DimaBr,

Шикарное демо, спасибо ))