Sign in Join
Wiki copytemporary

TSplitter/fi: what changed

Revision 0 to 1. Removed lines have a minus sign; added lines have a plus sign.

Title: TSplitter/fi

OldNewLine
1+TSplitter ![](/wiki-images/0/03/Tsplitter.png) on komponentti joka voidaan sijoittaa paneeliin tai lomakkeelle pystysuoraan tai vaakasuoraan. Palkki erottaa alipaneelit toisistaan.
2+
3+Komponenttia käytetään visuaalisena erottimena lomakkeen kahden puoliskon välillä ja sen ansiosta sovelluksen käyttäjä voi muuttaa komponentin kokoa joko pystysuoraan tai vaakasuoraan. Se löytyy [[Component Palette/fi|komponenttipaletin]] [[Additional tab/fi|Additional]] -välilehdeltä .
4+
5+TSplitter voi työskennellä pohjimmiltaan kahdella eri tavalla: [[Autosize / Layout|Align]] "linjaamalla" ([[Delphi/fi|Delphin]] tapaan) tai [[Autosize / Layout|AnchorSidesin]] kautta (Tätä ominaisuutta ei ole Delphissä).
6+
7+## Splitter ja Align
8+
9+TSplitter:ä voidaan käyttää monissa yksinkertaisissa asettelukohteissa, kuten esim. kahden komponentin välillä. Esimerkiksi kun tarvitaan vapaasti muokattavaa koon säätämistä muistion ja listboxin tmv. välillä.
10+
11+Seuraava esimerkki osoittaa tämän.
12+
13+### Suunnitteluaikana
14+
15+1. Luo uusi [[TForm/fi|lomake]]
16+2. Pudota [[TMemo/fi|TMemo]] lomakkeelle (Klikkaa hiiren vasemmalla näppäimellä TMemo-kuvaketta komponenttivalikoissa valitaksesi sen ja sitten vasemmalla klikkaa lomaketta)
17+3. Aseta [[IDE Window: Object Inspector/fi|komponenttimuokkaimessa]] Memo1:n Align ominaisuus arvoon `alLeft`.
18+4. Pudota TSplitter lomakkeelle
19+5. Oletuksena sen Align ominaisuus on jo arvossa `alLeft`.
20+6. Pudota toinen TMemo lomakkeelle.
21+7. Aseta komponenttimuokkaimessa Memo2:n Align ominaisuus arvoon `alClient`.
22+
23+### [[runtime/fi|Ajonaikana]]
24+
25+Voidaan samat toiminnot kuin yllä oleva myös suorittaa koodilla suunnitteluaikaisen / komponenttimuokkaimen käytön sijasta:
26+
27+``` pascal
28+procedure TMainForm.FormCreate(Sender: TObject);
29+var
30+ Memo1: TMemo;
31+ Splitter1: TSplitter;
32+ Memo2: TMemo;
33+begin
34+ Memo1:=TMemo.Create(Self);
35+ with Memo1 do begin
36+ Name:='Memo1';
37+ Parent:=Self;
38+ Align:=alLeft;
39+ end;
40+ Splitter1:=TSplitter.Create(Self);
41+ with Splitter1 do begin
42+ Name:='Splitter1';
43+ Parent:=Self;
44+ Left:=1; // position it right of Memo1
45+ Align:=alLeft;
46+ end;
47+ Memo2:=TMemo.Create(Self);
48+ with Memo2 do begin
49+ Name:='Memo2';
50+ Parent:=Self;
51+ Align:=alClient;
52+ end;
53+end;
54+```
55+
56+## Splitter ja AnchorSides
57+
58+AnchorSides sallii hienosäädetyt asettelut. Kohdistus täyttää kaiken tilan. AnchorSides antaa ankkuroida ohjaimet mihin tahansa muun sisaruksen hallintaan.
59+
60+### Suunnitteluaikana
61+
62+1. Luo uusi [[TForm|lomake]]
63+2. Pudota [[TMemo]] lomakkeelle (Klikkaa hiiren vasemmalla näppäimellä TMemo-kuvaketta komponenttivalikoissa valitaksesi sen ja sitten vasemmalla klikkaa lomaketta)
64+3. Aseta komponenttimuokkaimessa Memo1:n Align ominaisuus arvoon `alLeft`.
65+4. Pudota TSplitter lomakkeelle
66+5. Aseta sen Align ominaisuus arvoon `alNone`
67+6. Valitse Memo1
68+7. Näytä -\> Anchor Editor
69+8. Ankkuroi Memo1 oikea puoli Splitter1: een
70+9. Pudota toinen TMemo lomakkeelle.
71+10. Aseta komponenttimuokkaimessa Memo2:n Align ominaisuus arvoon `alRight`.
72+11. ankkuroi Memo2: n vasen puoli Splitter1: een. Varmista, että ankkuroit Splitter1: n oikealle puolelle (Anchor-editorin painike Comboboxin alapuolella).
73+
74+### Ajonaikana
75+
76+Voidaan samat toiminnot kuin yllä oleva myös suorittaa koodilla suunnitteluaikaisen / komponenttimuokkaimen käytön sijasta:
77+
78+``` pascal
79+procedure TMainForm.FormCreate(Sender: TObject);
80+var
81+ Memo1: TMemo;
82+ Splitter1: TSplitter;
83+ Memo2: TMemo;
84+begin
85+ Memo1:=TMemo.Create(Self);
86+ with Memo1 do begin
87+ Name:='Memo1';
88+ Parent:=Self;
89+ Align:=alLeft;
90+ end;
91+ Splitter1:=TSplitter.Create(Self);
92+ with Splitter1 do begin
93+ Name:='Splitter1';
94+ Parent:=Self;
95+ Align:=alNone;
96+ Left:=100; // some value
97+ AnchorParallel(akBottom,0,Parent);
98+ end;
99+ Memo1.AnchorToNeighbour(akRight,0,Splitter1);
100+ Memo2:=TMemo.Create(Self);
101+ with Memo2 do begin
102+ Name:='Memo2';
103+ Parent:=Self;
104+ Align:=alRight;
105+ AnchorToNeighbour(akLeft,0,Splitter1);
106+ end;
107+end;
108+```
109+
110+## Katso myös
111+
112+- [[doc:lcl/extctrls/tsplitter.html|TSplitter doc]]
113+- [[TPairSplitter]]
114+
115+---
116+*From the Free Pascal wiki, page "TSplitter/fi", as it stood on 2022-08-06 after a change by Kai Burghardt, out of the wiki's dump of 2024-05-26. Copyright stays with the author who wrote it, according to the old wiki's [[Licensing]] page. If you have concerns about this material, [message the admin](/wiki-contact).*

Back to history