cool web a perfektni rs- Doporucuji

Sunday, March 11, 2007

Vlastnosti,

které jste výše nastavili v návrhovém režimu, můžete nastavovat také až při běhu a dynamicky
tak měnit rozměry, pozici a jiné vlastnosti formuláře (a také ovládacích prvků, které později nakladete na
formulář):
' Formulář vždy nahoře
Me.TopMost = True
' Změna absolutních souřadnic (šířka a výška formuláře)
Me.Width = 500
Me.Height = 400
' Změna absolutní pozice (souřadnice levého horního rohu formuláře)
Me.Left = 500
Me.Top = 1000
' Změna relativních souřadnic
Me.Width += 100
Me.Height += 100
Operátor += přičte hodnotu k původnímu obsahu proměnné (vlastnosti) a přiřadí výsledek do proměnné
(vlastnosti). Podobě lze „zkracovat“ zápis u operátorů odčítání (-), násobení (*), dělení (/), celočíselné dělení
(\), mocnění (^) a řetězení (&).
VB6. Tyto operátory jsou ve VB.NET nové.
Šířku a výšku můžete také nastavovat současně, využijete-li strukturu Size pojmenovaného prostoru
System.Drawing. Tato struktura reprezentuje uspořádanou dvojici šířka, výška obdélníkové oblasti:
Me.Size = New System.Drawing.Size(600, 600)
Úplný zápis se System.Drawing.Size není v našem případě nutný, protože pojmenovaný prostor
System.Drawing je dostupný díky automaticky vygenerovanému příkazu Imports. Kdybyste ale v kódu
příkaz Imports System.Drawing neměli, došlo by při pokusu spustit aplikaci obsahující příkaz typu:
Me.Size = New Size(600, 600)
k chybě při běhu (spouštět a testovat aplikaci se naučíte za chvilku).
Jakmile je objekt Size definovaný, lze upravovat rozměry formuláře také takto:
Me.Size = New Size(Me.Size.Width, 400)
Je to ale poněkud méně přehledné než prosté nastavení vlastností Width resp. Height.
Podobně se dá nastavovat pozice formuláře. Například relativní změna o 100 směrem doprava a dolů:
Me.Left += 100
Me.Top += 100
Nebo najednou přes vlastnost Location a strukturu Point pojmenovaného prostoru System.Drawing:
Me.Location = New Point(300, 300)
Styl okraje formuláře se dá nastavit i při běhu, pomocí výčtového typu FormBorderStyle (pracuje se
s ním ve třídě Form pojmenovaného prostoru System.WinForms):
Me.BorderStyle = FormBorderStyle.FixedDialog

Labels: