<?xml version="1.0" encoding="utf-8"?>
<rss version="2.0" xmlns:atom="http://www.w3.org/2005/Atom">
	<channel>
		<title><![CDATA[My Visual Database — Помогите со свертыванием окон...]]></title>
		<link>https://myvisualdatabase.com/forum/viewtopic.php?id=5778</link>
		<atom:link href="https://myvisualdatabase.com/forum/extern.php?action=feed&amp;tid=5778&amp;type=rss" rel="self" type="application/rss+xml" />
		<description><![CDATA[The most recent posts in Помогите со свертыванием окон....]]></description>
		<lastBuildDate>Mon, 25 Nov 2019 09:47:32 +0000</lastBuildDate>
		<generator>PunBB</generator>
		<item>
			<title><![CDATA[Re: Помогите со свертыванием окон...]]></title>
			<link>https://myvisualdatabase.com/forum/viewtopic.php?pid=33785#p33785</link>
			<description><![CDATA[<p>Спасибо, Но как понял никто не понял, что я хотел сказать, а именно главное слово &quot;содержимое&quot;, т.е. таблицы, кнопки, текстовые поля... Намекая, что, если взять одну форму и ее растянуть на весь экран... А вот как раз использование &quot;формы в форме&quot;, делает это выполнимо. Еще раз сп.</p>]]></description>
			<author><![CDATA[null@example.com (vit007)]]></author>
			<pubDate>Mon, 25 Nov 2019 09:47:32 +0000</pubDate>
			<guid>https://myvisualdatabase.com/forum/viewtopic.php?pid=33785#p33785</guid>
		</item>
		<item>
			<title><![CDATA[Re: Помогите со свертыванием окон...]]></title>
			<link>https://myvisualdatabase.com/forum/viewtopic.php?pid=33784#p33784</link>
			<description><![CDATA[<div class="quotebox"><cite>vit007 wrote:</cite><blockquote><p>... Как, я понял, отцентровать содержимое формы сложно, ...</p></blockquote></div><p>Если требуется отцентрировать форму, которая запихивается в форму, то можно так:<br /></p><div class="codebox"><pre><code>procedure Form1_OnResize (Sender: TObject);
begin
    if Form2 &lt;&gt; nil then
    begin
        Form2.Left:= Form1.ClientWidth div 2 - Form2.Width div 2;
        Form2.Top:= Form1.ClientHeight div 2 - Form2.Height div 2;
    end;
end;

procedure Form1_OnShow (Sender: TObject; Action: string);
begin
    Form2.Show;
    Form2.Parent:= Form1;
    Form2.Align:= alCustom;
end;

procedure Form2_Button1_OnClick (Sender: TObject; var Cancel: boolean);
begin
    Form1.WindowState := wsMinimized;
end;

procedure Form1_OnClose (Sender: TObject; Action: string);
begin
    Form2:= nil;
end;

procedure Form2_OnClose (Sender: TObject; Action: string);
begin
    Form1.Close;
end;

begin
end.</code></pre></div>]]></description>
			<author><![CDATA[null@example.com (mapcreatormail)]]></author>
			<pubDate>Mon, 25 Nov 2019 08:37:28 +0000</pubDate>
			<guid>https://myvisualdatabase.com/forum/viewtopic.php?pid=33784#p33784</guid>
		</item>
		<item>
			<title><![CDATA[Re: Помогите со свертыванием окон...]]></title>
			<link>https://myvisualdatabase.com/forum/viewtopic.php?pid=33782#p33782</link>
			<description><![CDATA[<p>Но чтобы убедиться, что формы хорошо центрированы, наиболее эффективным является проверка свойства<br />poScreenCenter (Made with Google)</p><p>JB</p>]]></description>
			<author><![CDATA[null@example.com (jean.brezhonek)]]></author>
			<pubDate>Sun, 24 Nov 2019 17:58:00 +0000</pubDate>
			<guid>https://myvisualdatabase.com/forum/viewtopic.php?pid=33782#p33782</guid>
		</item>
		<item>
			<title><![CDATA[Re: Помогите со свертыванием окон...]]></title>
			<link>https://myvisualdatabase.com/forum/viewtopic.php?pid=33781#p33781</link>
			<description><![CDATA[<p>Hello Derek, vitt007,mapcreatormail</p><p>Или для каждой созданной формы всегда включайте свойство Position = poMainFormCenter в Инспекторе объектов, я делаю это каждый раз (переведено с Google)</p><p>JB</p>]]></description>
			<author><![CDATA[null@example.com (jean.brezhonek)]]></author>
			<pubDate>Sun, 24 Nov 2019 17:34:43 +0000</pubDate>
			<guid>https://myvisualdatabase.com/forum/viewtopic.php?pid=33781#p33781</guid>
		</item>
		<item>
			<title><![CDATA[Re: Помогите со свертыванием окон...]]></title>
			<link>https://myvisualdatabase.com/forum/viewtopic.php?pid=33780#p33780</link>
			<description><![CDATA[<div class="quotebox"><cite>vit007 wrote:</cite><blockquote><p>... Как, я понял, отцентровать содержимое формы сложно, ...</p></blockquote></div><p>Первой форме цепляем на событие OnResize код:<br /></p><div class="codebox"><pre><code>procedure Form1_OnResize (Sender: TObject);
begin
    Form2.Position:= poMainFormCenter;
end;</code></pre></div><p>Вуаля! Вторая форма центрируется по первой .</p>]]></description>
			<author><![CDATA[null@example.com (mapcreatormail)]]></author>
			<pubDate>Sun, 24 Nov 2019 17:01:21 +0000</pubDate>
			<guid>https://myvisualdatabase.com/forum/viewtopic.php?pid=33780#p33780</guid>
		</item>
		<item>
			<title><![CDATA[Re: Помогите со свертыванием окон...]]></title>
			<link>https://myvisualdatabase.com/forum/viewtopic.php?pid=33779#p33779</link>
			<description><![CDATA[<p><strong>derek</strong>, по сути получилось одно и тоже, что предложено выше, но с помощью вашего примера, я смог увидеть возможность стайла окон... И, наверно, сделаю вообще без бордюра... Как, я понял, от центровать содержимое формы сложно, а когда отцентрирована форма в форме, то и все красиво выглядит на разных экранах...</p>]]></description>
			<author><![CDATA[null@example.com (vit007)]]></author>
			<pubDate>Sun, 24 Nov 2019 12:23:32 +0000</pubDate>
			<guid>https://myvisualdatabase.com/forum/viewtopic.php?pid=33779#p33779</guid>
		</item>
		<item>
			<title><![CDATA[Re: Помогите со свертыванием окон...]]></title>
			<link>https://myvisualdatabase.com/forum/viewtopic.php?pid=33776#p33776</link>
			<description><![CDATA[<p>Здравствуйте Vit007,<br />Это помогает?<br />С Уважением,<br />Derek.</p>]]></description>
			<author><![CDATA[null@example.com (derek)]]></author>
			<pubDate>Sat, 23 Nov 2019 14:05:16 +0000</pubDate>
			<guid>https://myvisualdatabase.com/forum/viewtopic.php?pid=33776#p33776</guid>
		</item>
		<item>
			<title><![CDATA[Re: Помогите со свертыванием окон...]]></title>
			<link>https://myvisualdatabase.com/forum/viewtopic.php?pid=33775#p33775</link>
			<description><![CDATA[<p>Странно, при не выборе в borderIcons - biMaximize, то панель винды пропадает... Как можно это побороть?<br />Да, как настроить чтоб активной по умолчанию была вторая форма, а не форма фона...</p>]]></description>
			<author><![CDATA[null@example.com (vit007)]]></author>
			<pubDate>Sat, 23 Nov 2019 12:58:23 +0000</pubDate>
			<guid>https://myvisualdatabase.com/forum/viewtopic.php?pid=33775#p33775</guid>
		</item>
		<item>
			<title><![CDATA[Re: Помогите со свертыванием окон...]]></title>
			<link>https://myvisualdatabase.com/forum/viewtopic.php?pid=33772#p33772</link>
			<description><![CDATA[<div class="codebox"><pre><code>procedure Form2_OnResize (Sender: TObject);
begin
  if Form2.WindowState= wsMinimized then Form1.WindowState:= wsMinimized ;
end;</code></pre></div>]]></description>
			<author><![CDATA[null@example.com (sibprogsistem)]]></author>
			<pubDate>Fri, 22 Nov 2019 14:40:15 +0000</pubDate>
			<guid>https://myvisualdatabase.com/forum/viewtopic.php?pid=33772#p33772</guid>
		</item>
		<item>
			<title><![CDATA[Re: Помогите со свертыванием окон...]]></title>
			<link>https://myvisualdatabase.com/forum/viewtopic.php?pid=33769#p33769</link>
			<description><![CDATA[<p>Немного не так... Получается, что когда сворачиваешь вторую форму, то должна и первая сворачиваться, т.е. нужен скрипт работы по которому работает сворачивание окон. Даже его можно использовать и на первой форме, а то визуально видно, что одна форма сворачивается, а вторая нет. Вот.</p>]]></description>
			<author><![CDATA[null@example.com (vit007)]]></author>
			<pubDate>Fri, 22 Nov 2019 12:29:55 +0000</pubDate>
			<guid>https://myvisualdatabase.com/forum/viewtopic.php?pid=33769#p33769</guid>
		</item>
		<item>
			<title><![CDATA[Re: Помогите со свертыванием окон...]]></title>
			<link>https://myvisualdatabase.com/forum/viewtopic.php?pid=33760#p33760</link>
			<description><![CDATA[<div class="codebox"><pre><code>procedure Form1_Button1_OnClick (Sender: TObject; var Cancel: boolean);
begin
  Form2.Show;
end;

begin
  Form1.WindowState := wsMaximized;
end.</code></pre></div><p>при сворачивании основной формы, сворачиваются и остольные</p><p>&nbsp; <br />так же можно поместить все фромы в основную форму<br /></p><div class="codebox"><pre><code>procedure Form1_Button1_OnClick (Sender: TObject; var Cancel: boolean);
begin
  Form2.Parent:=Form1;
  Form2.Show;
end;

begin
  Form1.WindowState := wsMaximized;
end.</code></pre></div>]]></description>
			<author><![CDATA[null@example.com (sibprogsistem)]]></author>
			<pubDate>Fri, 22 Nov 2019 09:29:14 +0000</pubDate>
			<guid>https://myvisualdatabase.com/forum/viewtopic.php?pid=33760#p33760</guid>
		</item>
		<item>
			<title><![CDATA[Помогите со свертыванием окон...]]></title>
			<link>https://myvisualdatabase.com/forum/viewtopic.php?pid=33759#p33759</link>
			<description><![CDATA[<p>Задумка состоит из двух форм, одна является задним фоном, вторая основная. При загрузки отображается одна над одной. Появились проблемки...</p><p>Задний фон надо развернуть на максимальный размер, пробовал два способа</p><div class="codebox"><pre><code>//frmBackground.Width := Screen.Width;
//frmBackground.Height := Screen.Height;</code></pre></div><div class="codebox"><pre><code>frmBackground.WindowState := wsMaximized;</code></pre></div><p>Но не понял, как развернуть так, чтоб панель задач винды была видна. А то, щелкаешь настройки значков, панель доступна, как-то иначе - нет... Вот, как правильно надо...</p><p>И нужен скрипт, чтоб при нажатие &quot;свертывания&quot;, обе формы сворачивались и соответственно разворачивались синхронно... Вот. Спасибо.</p>]]></description>
			<author><![CDATA[null@example.com (vit007)]]></author>
			<pubDate>Fri, 22 Nov 2019 08:58:02 +0000</pubDate>
			<guid>https://myvisualdatabase.com/forum/viewtopic.php?pid=33759#p33759</guid>
		</item>
	</channel>
</rss>
