Format function/fi: what changed

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

Old	New		Line
1	1		Muotoilu [[Function/fi\|funktio]] format muodostaa arvoja [[String/fi\|merkkijonoksi]]. Format funktio löytyy käännösyksiköstä [[SysUtils unit\|SysUtils]]. Katso [`sysutils.format`](https://www.freepascal.org/docs-html/rtl/sysutils/format.html) on line -dokumentaatiosta perusteellinen selitys.
2	2
3	3		## Syntaksi
4	4
5	5		Format on ylikuormitettu kahdella tavalla:
6	6
7	7		``` pascal
8	8		function Format( const Fmt: String; const Args: array of Const) : String;
9	9		function Format( const Fmt: String; const Args: array of Const; const FormatSettings: TFormatSettings) : String;
10	10		```
11	11
12	12		Fmt-merkkijono-argumentti sisältää formaatin määrittelijöitä tai paikkamerkkejä (esim. %d), jotka vastaavat ja korvataan tulos merkkijonossa Args-taulukon arvoilla. [[Const\|array of const]] voi olla vaihtelevia määriä eri tyyppisiä arvoja, ja sovellustyyppejä varten käytettävät tyypit ovat [[Real/fi\|Real]], [[Integer/fi\|Integer]], [[Pointer/fi\|Pointer]] ja [[String/fi\|String]]-tyyppejä. [[TFormatSettings]] on [[Record/fi\|tietue]], joka sisältää numeron, ajan, päivämäärän ja valuutan arvojen haluttuun muotoiluun liittyviä tietoja.
13	13
14	14		Kunkin tietyn muotoilun määrittelijän muotoilusääntö on:
15	15
16		-	~~`% [ArgumentIndex] ['-'] [width] [. precision] ArgumentType`~~
	16	+	```text
	17	+	% [ArgumentIndex] ['-'] [width] [. precision] ArgumentType
	18	+	```
17	19
18	20		\| \| \|
19	21		\|-----\|-------------------\|
20	22		\| d \| Decimal (integer) \|
21	23		\| e \| Scientific \|
22	24		\| f \| Fixed \|
23	25		\| g \| General \|
24	26		\| m \| Money \|
25	27		\| n \| Number (floating) \|
26	28		\| p \| Pointer \|
27	29		\| s \| String \|
28	30		\| u \| Unsigned decimal \|
29	31		\| x \| Heksadesimaali \|
30	32
31	33		### Kokonaisluvun muotoilu
32	34
33	35		\| \| \|
34	36		\|----\|----\|
35	37		\| %d \| Tulostaa kokonaisluvun sellaisenaan. \|
36	38		\| %8d \| Tulostaa kokonaisluvun sellaisenaan. Jos numeroiden lukumäärä on pienempi kuin 8 niin luku on vasemmassa reunassa . \|
37	39		\| %-8d \| Tulostaa kokonaisluvun sellaisenaan. Jos numeroiden lukumäärä on pienempi kuin 8 niin luku on oikeassa reunassa (vie 8 merkkiä tilaa). \|
38	40		\| %.8d \| Tulostaa kokonaisluvun sellaisenaan. Jos numeroiden lukumäärä on pienempi kuin 8 niin luvun edessä on etunollat. \|
39	41
40	42		### Merkkijonon muotoilu
41	43
42	44		\| \| \|
43	45		\|----\|----\|
44	46		\| %s \| Tulostaa merkkijonon sellaisenaan. \|
45	47		\| %8s \| Tulostaa merkkijonon sellaisenaan. Jos merkkijonossa on vähemmän kuin 8 merkkiä, tuloste on siirretty oikealle. (right-justified). \|
46	48		\| %-8s \| Tulostaa merkkijonon sellaisenaan. Jos merkkijonossa on vähemmän kuin 8 merkkiä, tuloste on vasemmassa reunassa ja loput ovat välilyöntejä (left-justified). \|
47	49
48	50		## Esimerkki käytöstä
49	51
50	52		``` pascal
51	53		procedure TForm1.Button1Click(Sender: TObject);
52	54		var
53	55		title, title2,
54	56		underline,
55	57		line, row1, row2, row3,
56	58		fmt : string;
57	59		i : integer;
58	60		begin
59	61		fmt := '%-12s';
60	62		title := format(fmt,['Column 1']) + format(fmt,['Column 2']) ;
61	63		for i := 1 to 12 do underline := underline + '-';
62	64		underline := underline + underline ;
63	65		fmt := '%-12d';
64	66		line := format(fmt,[15]) + format(fmt,[8]) ;
65	67		fmt := '%12s';
66	68		title2 := format(fmt,['Column 1']) + format(fmt,['Column 2']) ;
67	69		fmt := '%12d';
68	70		row1 := format(fmt,[15]) + format(fmt,[8]) ;
69	71		row2 := format(fmt,[1005]) + format(fmt,[809]) ;
70	72		fmt := '%12.5d';
71	73		row3 := format(fmt,[1005]) + format(fmt,[809]) ;
72	74		Memo1.Lines.Add( title );
73	75		Memo1.Lines.Add( underline );
74	76		Memo1.Lines.Add( line );
75	77		Memo1.Lines.Add( '' );
76	78		Memo1.Lines.Add( title2 );
77	79		Memo1.Lines.Add( underline );
78	80		Memo1.Lines.Add( row1 );
79	81		Memo1.Lines.Add( row2 );
80	82		Memo1.Lines.Add( row3 );
81	83		end;
82	84		```
83	85
84	86		Edellä olevat lausekkeet luovat joukon merkkijonoja, jotka näyttävät:
85	87
86		-	~~`Column 1 Column 2 `\~~
87		-	~~`------------------------`\~~
88		-	~~`15 8 `~~
	88	+	```text
	89	+	Column 1 Column 2
	90	+	------------------------
	91	+	15 8
	92	+	```
89	93
90		-	~~` Column 1 Column 2`\~~
91		-	~~`------------------------`\~~
92		-	~~` 15 8`\~~
93		-	~~` 1005 809`\~~
94		-	~~` 01005 00809`~~
	94	+	```text
	95	+	Column 1 Column 2
	96	+	------------------------
	97	+	15 8
	98	+	1005 809
	99	+	01005 00809
	100	+	```
95	101
96	102		## Katso myös
97	103
98	104		- [[doc:rtl/sysutils/format.html\|Format]]
99	105		- [[doc:rtl/sysutils/floattostrf.html\|FloatToStrF]]
100	106		- [[doc:rtl/sysutils/formatfloat.html\|FormatFloat]]
101	107		- [[doc:rtl/sysutils/inttohex.html\|IntToHex]] - Muuntaa kokonaisluvun [[Hexadecimal/fi\|heksadesimaaliluvuksi]].
102	108
103	109		---
104	110		From the Free Pascal wiki, page "Format function/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