6. Grundlegende Eigenschaften der Formen

6.1. Abgeleitet TCustomForm

Aktivieren <br/> <br/> angeben, Wenn die Form den Fokus hat.

 __property Bool aktiv = {Lesen = FActive, Nodefault};

<br/> Wenn aktiv ist, die Form den Fokus besitzt; wenn aktivieren auf false festgelegt ist, das Formular besitzt keinen Fokus.<br/> <br/> ActiveControl <br/> <br/> diese Eigenschaft dient festzustellen, welches Steuerelement den Fokus hat, wenn Sie das Formular öffnen.

 __property Steuerelemente: TWinControl ** ActiveControl = {lesen = FActiveControl, schreiben SetActiveControl, gespeichert = = IsForm;}

<br/> der folgende Ereignishandler reagiert auf Zeitgeberereignisse durch das aktive Steuerelement ein Pixel nach rechts verschieben: < Br / > void __fastcall TForm1:Timer1Timer(TObject_*Sender)

 {ActiveControl - > ActiveControl - Left = > Links + 1;}

<br/> ActivateMDIChild <br/> <br/> gibt an, dass untergeordnete MDI-Formular den Fokus hat.<br/> als seinen Wert dieser Eigenschaft gibt einen Zeiger auf das Fenster der Abfrage MDI aktive Tochter. Es ist eine nur-Lesen-Eigenschaft. Gibt NULL zurück, wenn keine aktiven Fenster MDI-Tochter oder die Anwendung nicht MDI ist. <br/> <br/> __property TForm ** ActiveMDIChild = {lesen = GetActiveMDIChild;} <br/> <br/> <em> in diesem Code wird eine Schaltfläche auf einer MDI-Anwendung. Wenn der Benutzer auf die Schaltfläche klickt, wird das aktive untergeordnete MDI-Formular Visual.

 void __fastcall TForm1:Button1Click(TObject_*Sender) {TForm ** TheForm;}

  TheForm = Form1 - > ActiveMDIChild;

  Wenn (TheForm) TheForm - > WindowState = WsMinimized;
}

BorderIcons <br/> <br/> angeben, welche Symbole in der Symbolleiste für den Titel des Formulars angezeigt.

 Enum TBorderIcon {BiSystemMenu, BiMinimize, BiMaximize, BiHelp}; Typedef Set TBorderIcons; __property TBorderIcons BorderIcons = {lesen = FBorderIcons, schreiben = SetBorderIcons, gespeichert = IsForm, Standard = 7}

Wert	Bedeutung
BiSystemMenu	das Formular verfügt über ein Steuerelementmenü (auch bekannt als ein Systemmenü).
BiMinimize	Form hat eine Minimieren-Schaltfläche
BiMaximize	Form hat eine Maximieren-Schaltfläche
BiHelp	Wenn BorderStyle ist BsDialog oder BiMinimize und BiMaximize sind ausgeschlossen, ein Fragezeichen in der Titelleiste des Formulars angezeigt und wenn geklickt, der Cursor wird zum CrHelp; andernfalls keine Fragezeichen erscheint.

Der folgende Code entfernt die Maximieren-Schaltfläche des Formulars klickt der Benutzer pro Taste:

 void __fastcall TForm1:Button1Click(TObject_*Sender) {BorderIcons = BorderIcons-(TBorderIcons() << BiMaximize);}

BorderStyle <br/> <br/> gibt an, welche Art des Randes die Form haben sollten. Der Standardwert ist BsSizable (die Fenster ändern Größe).

 Enum TFormBorderStyle {BsNone, BsSingle, BsSizeable, BsDialog, BsToolWindow, BsSizeToolWin}; __property TFormBorderStyle BorderStyle = {lesen = FBorderStyle schreiben = SetBorderStyle gespeichert = IsForm, Standard = 2};

Wert	Bedeutung
BsDialog	nicht veränderbare; standard Rand von Dialogfeldern.
BsSingle	nicht veränderbare; Rand mit einer einfachen Linie.
BsNone	veränderbarer Größe nicht; die Zeile nicht sichtbaren Rand.
BsSizeable	standard veränderbare Rand.
BsToolWindow	wie BsSingle aber mit der kleinen Beschriftung.
BsSizeToolWin	wie BsSizeable aber mit der kleinen Beschriftung.

<br/> Leinwand <br/>

ermöglicht den Zugriff auf den Clientbereich des Formulars ziehen. <br/> Camvas-Eigenschaft ermöglicht den Zugriff auf die Oberfläche des Formulars zur Laufzeit Bitmaps, Linien, Konturen und Text zeichnen. Die Label-Komponente wird normalerweise verwendet, um Text, Grafiken und Form Komponenten zeichnen Sie Konturen oder Silhouetten anzuzeigende Bild zu schreiben. Aber manchmal ist es notwendig, ziehen in der Zeit der Ausführung. dient auch dazu, die Image-Datei des Formulars speichern.

 __property Graphics: TCanvas ** Canvas = {lesen = GetCanvas;} void __fastcall TForm1:Button1Click(TObject_*Sender) {Graphics: TBitmap ** pBitmap = neue Grafiken: TBitmap;}

  versuchen {pBitmap - > LoadFromFile("C:ProgramFilesBorlandCBuilderImagesSplash256colorfactory.bmp_");}
    pBitmap - > Transparent = True;
    pBitmap - > TransparentColor = pBitmap - > Canvas - > Pixel [50,50];
    Form1 - > Canvas - > zeichnen (0,0, pBitmap);
    pBitmap - > TransparentMode = TmAuto;  
    / / Transparente Farbe ist jetzt ClDefault = 0 x 20000000;
    Form1 - > Canvas - > zeichnen (50,50, pBitmap);

  } catch (...)
  {ShowMessage("Could_not_load_or_display_bitmap");}
  } Löschen pBitmap;
} Im folgende Beispiel zeichnet Rechteck auf dem Formular, wenn der Benutzer auf Button1 klickt.

void __fastcall TForm1:Button1Click(TObject_*Sender) {Leinwand - > Rectangle (0, 0, 40, 40);}

ClientHeight <br/> <br/> gibt die Höhe (in Pixel) des Clientbereichs (in den Formularbereich).

 __property ClientHeight = {schreiben = SetClientHeight, gespeichert = IsClientSizeStored;}

In diesem Beispiel wird die Höhe des Clientbereichs des Formulars um die Hälfte reduzieren, klickt der Benutzer auf die Schaltfläche auf dem Formular:

 void __fastcall TForm1:Button1Click(TObject_*Sender) {Form1 - > ClientHeight = Form1 - > ClientHeight/2;}

}

<br/> ClientRect <br/> <br/> diese Eigenschaft enthält die Koordinaten der Grenzen oben, unten, Links und rechts des Clientbereichs des Formulars <br/> geben Sie die Abmessungen des Clientbereichs.

 ClientRec entspricht einer Rectangu (0,0, ClientWidth, ClientHeight) Rechteck.

__property Windows: TRect ClientRect = {lesen = GetClientRect;}

<br/> ClientWidth <br/> <br/> geben Sie die Breite (in Pixel) des Clientbereichs (in den Formularbereich).

 __property ClientWidth = {schreiben = SetClientWidth, gespeichert = IsClientSizeStored;}

Dieses Beispiel startet die Form in der Lage, so dass rechten Rand zeigt: gescrollt

void __fastcall TForm1:FormCreate(TObject_*Sender)

 {/ ** legen Sie die Breite des Formularfensters 300 Pixel im Clientbereich angezeigt ** / ClientWidth = 300;}

/ ** Legen Sie den Bereich der Breite Client jetzt zweimal.
Dies bedeutet, dass das Formular eine logische Größe hat, die doppelt so groß wie das physische Fenster.
Beachten Sie, dass die Palette immer mindestens so groß wie ClientWidth sein muss! ** / HorzScrollBar - > Palette = 600;

/ ** Starten voll gescrollt Form ** / HorzScrollBar - > Position = HorzScrollBar - > Range - ClientWidth;

/ ** auf die Bildlaufpfeile klicken, verschiebt die Form 10 Pixel ** / HorzScrollBar - > Schrittweite = 10;
HorzScrollBar - > Visible: = True; {/ / Die Bildlaufleiste anzeigen}

<br/> FormStyle <br/> <br/> bestimmt den Stil des Vordrucks.

 Enum TFormStyle {FsNormal, FsMDIChild, FsMDIForm, FsStayOnTop}; __property TFormStyle FormStyle = {lesen = FFormStyle, schreiben = SetFormStyle, gespeichert = IsForm, Standardwert = 0};

Wert	Bedeutung
FsNormal	Normalform (Standard).
FsMDIChild	Indikator für bilden sekundäre MDI.
FsMDIForm	MDI-Hauptformular.
FsStayOnTop	Form steht immer im Vordergrund.

In diesem Beispiel wird sichergestellt, das Hauptformular der Anwendung ist ein übergeordnetes MDI-Formular:

__fastcall TForm1:TForm1(TComponent*_Owner)

: TForm (Hersteller) {if(FormStyle_!=_fsMDIForm) FormStyle = FsMDIForm; if(FormStyle_==_fsMDIForm) Edit1 - > Text = "MDI-Formular"; sonst sieht nie verläuft Edit1 - > Text = "kein MDI-Formular";}

HelpFile <br/> <br/> gibt den Namen der Hilfedatei in der Anwendung verwendet.

 __property System: AnsiString HelpFile = {lesen = FHelpFile, schreiben = FHelpFile;}

Symbol <br/> <br/> zeigt das Symbol, das Sie in der Titelleiste sehen können, wenn das Formular zur Laufzeit angezeigt oder minimiert ist. Wenn Verbindungssymbol nicht angegeben ist, weist Windows eine standardmäßig.

 __property Graphics: TIcon ** Icon = {lesen = FIcon, schreiben = SetIcon gespeichert = IsIconStored;}

Dieser Code weist ein Symbol zu einem Formular, wenn das Formular erstellt wird:

 __fastcall TForm1:TForm1(TComponent*_Owner): TForm (Owner) {Icon - > LoadFromFile ("C:\\PROGRAM FILES\\BORLAND\\CBUILDER\\IMAGES\\ICONS\\EARTH.")}("ICO");
}

KeyPreview <br/> <br/> angeben, wann das Formular Ereignisse von der Tastatur vor dem aktiven Steuerelement empfangen werden kann.

• Si KeyPreview gilt, Tastaturereignisse treten auf dem Formular, und dann in das aktive Steuerelement.
• Wenn KeyPreview ist false, die Tastaturereignisse treten nur auf aktive Steuerung.

 __property Bool KeyPreview = {lesen = FKeyPreview, schreiben = FKeyPreview, gespeichert = IsForm, Standardwert = 0};

Ändert in diesem Beispiel wird eine Form Farbe Aqua wenn der Benutzer eine Taste drückt, auch, wenn ein Steuerelement auf dem Formular den Fokus hat. Wenn der Benutzer die Taste loslässt, gibt die Form an seine ursprüngliche Farbe.

 Farbe FormColor; void __fastcall TForm1:FormCreate(TObject_*Sender) {KeyPreview = True};


void __fastcall TForm1:FormKeyDown(TObject_*Sender,_WORD_&Key,_TShiftState_Shift) {FormColor = Form1 - > Farbe;}
Form1 - > Color = ClAqua;
} void __fastcall TForm1:FormKeyUp(TObject_*Sender,_WORD_&Key,_TShiftState_Shift) {Form1 - > Color = FormColor;}

<br/> MDIChildCount

Gibt die Anzahl der offenen Formen Kinder.

 __property Int MDIChildCount = {lesen = GetMDIChildCount, Nodefault};

Der folgende Code wird Form1 geschlossen, wenn keine untergeordnete MDI-Fenster geöffnet sind:

 void __fastcall TForm1:Button1Click(TObject_*Sender) {Close() if(MDIChildCount_==_0)};

MDIChildren

Enthält einen Index, um eine untergeordnete MDI-Fenster auf die Formulare zugreifen.

 __property TForm ** MDIChildren [Int I] = {lesen = GetMDIChildren;}

Der folgende Code schließt alle untergeordnete MDI-Fenster von Form1.

 void __fastcall TForm1:Button1Click(TObject_*Sender) {für (Int_i_ = _0; _i_ < _MDIChildCount; _i ++) MDIChildren [i] - > Close();}

Menü

<br/> <br/> die Menu-Eigenschaft wird verwendet, um zu laden und aktivieren Sie das Menü in das Formular zur Laufzeit. Die TmainMenu-Komponente in das Formular geladen werden muss.

 __property Menüs: TMainMenu ** Menü = {lesen = FMenu, schreiben = SetMenu gespeichert = IsForm;}

Durch diesen Code wird ein neues Menü mit dem Namen MyMenu, wenn der Benutzer auf die Schaltfläche klickt.

 TMenuItem ** Item1;

TMainMenu ** MyMenu;
/ / Void __fastcall TForm1:Button1Click(TObject_*Sender) {Item1 = neue TMenuItem (dies)};
Item1 - > Caption = "Neues Element";

MyMenu = neue TMainMenu (this);
MyMenu - > Gegenstände - > hinzufügen (Item1);

Menü = MyMenu;
} / / Void __fastcall TForm1:FormDestroy(TObject_*Sender) {MyMenu für (Int_i_ = _0; _i_ < _MyMenu-> Items-> Count; _i ++)-> Elemente [i].}Entfernen Sie (Item1);

Löschen Sie Item1;
Löschen Sie MyMenu;
}

ModalResult <br/> ObjectMenuItem <br/> OLE <br/> OleFormObject <br/> OLE <br/> übergeordneten <br/> PixelsPerInch <br/>

Position

bestimmt die Größe und Position des Formulars, wenn es zum ersten Mal geöffnet wird.

 Enum TPosition {PoDesigned, PoDefault, PoDefaultPosOnly, PoDefaultSizeOnly, PoScreenCenter}; __property TPosition Position = {lesen = FPosition, schreiben = SetPosition gespeichert = IsForm, Standardwert = 0};

Wert	Bedeutung
PoDesigned	dieselbe Position in der Designphase.
PoDefault	Windows legt die Größe und die Position der Z-Reihenfolge-Algorithmus gemäß.
PoDefaultPosOnly	dieselbe position in der Phase des Design Windows Wählen Sie die Position auf dem Bildschirm.
PoDefaultSizeOnly	dieselbe Position in der Phase des Entwurf. Windows wählt die Größe.
PoScreenCenter	Form liegt immer in der Mitte des Bildschirms.

PrintScale

die Proportionen der Form in den Drucker darstellt.

 Enum TPrintScale {PoNone, PoProportional, PoPrintToFit}; __property TPrintScale PrintScale = {lesen = FPrintScale, schreiben = FPrintScale, gespeichert = IsForm, Standardwert = 1};

Wert	Bedeutung
PoNone	gilt keiner Größenordnung. Die Ausgabe des Formulars variiert zwischen einem Drucker und einen anderen Drucker.
PoProportional	die proportionale Option soll drucken Sie das Formular als annähernd, was auf dem Bildschirm wie möglich aussieht.
PoPrintToFit	erhöht oder verringert die Größe des Bildes entsprechend die Druckereinstellungen.

Folgende Code behält die Proportionen des Formulars, wenn es gedruckt wird.

 Form1 - > PrintScale = PoProportional;

Form1 - > Print();

Skaliert <br/> TileMode <br/> MDI <br/>

Sichtbar

Gibt an, ob die Form zunächst sichtbar ist, oder nicht. Diese Eigenschaft ist sehr nützlich zur Laufzeit, legt fest, ob ein Formular sichtbar ist oder nicht.

 __property Visible = {schreiben = instanziiert, Standardwert = 0;}

Der folgende Code verwendet zwei Formen. Form1 wird eine Schaltfläche. Das zweite Formular dient als ein Tool-Palette. Dieser Code macht die Palette sichtbare Form und stellt sicher, dass es die Top-Form bringen es die Rezeption innerhalb <br/> um dieses Beispiel auszuführen, müssen Sie Unit2.h in der Unit1 Quelldatei einschließen.

 void __fastcall TForm1:ShowPaletteButtonClick(TObject_*Sender) {Wenn (!)}Form2-> Visible) {Form2 - > Visible = True;}
Form2 - > BringToFront();
}
}

WindowMenu

Verwendet die WindowsMenu Eigenschaft Laden und aktivieren Sie das Menü des übergeordneten MDI-Element Formular zur Laufzeit. Die TmainMenu-Komponente in das Formular geladen werden muss.

 __property Menüs: TMenuItem ** WindowMenu = {lesen = FWindowMenu, schreiben SetWindowMenu, gespeichert = = IsForm;}

<br/> <em> dieser Code ausgeführt, zum Element namens MyWindows vorhanden, auf eine MDI sein muss-Menü übergeordneten Formular Formular. Diese Codezeile benennt das MyWindows Menü zu Menü Fenster das Menü, das alle geöffneten untergeordneten Fenster einer MDI-Anwendung auflistet:

 WindowMenu = MyWindows;

WindowState

Ist diese Eigenschaft zur Verfügung, um den aktuellen Status des Formulars (minimiert, maximiert, oder normal) zu bestimmen. Es kann auch verwendet werden, um anzugeben, wie das Formular zunächst zeigen sollte. Die Optionen sind WsMinimized, WsMaximized und WsNormal.

 Enum TWindowState {WsNormal, WsMinimized, WsMaximized}; __property TWindowState WindowState = {lesen = FWindowState, schreiben = SetWindowState gespeichert = IsForm, Standardwert = 0}

Wert	Bedeutung
WsNormal	Form erscheint in seinem normalen Zustand (d. h. den Zustand nicht-visuellen, nicht maximiert).
WsMinimized	Form erscheint in seiner visuellen Zustand.
WsMaximized	Form erscheint im maximierten Zustand.

Der folgende Code reagiert auf die Benutzer klicken auf die Schaltfläche mit dem Namen Shrink durch Minimierung der Form:

 void __fastcall TForm1:ShrinkClick(TObject_*Sender) {WindowState = WsMinimized};