eljárás settextstyle
SetTextStyle eljárást használják, hogy módosítsa a betűtípus szöveg kibocsátás, úti cél, és a szimbólum nagyságát.
SetTextStyle eljárás Pascal.
№3 húr. A programban fogjuk használni a hurok, így meg kell, hogy hozzanak egy változót, amelyeket használni fognak, mint egy számlálót a ciklust.
Húr №20. Állítsa be a szín a megjelenített szöveget.
A №21 vonal írási ciklus, és írjuk be a szolgáltató 3 elvégzendő egy ciklusban (line №23, №24, №25). Hadd emlékeztessem önöket, hogy ha el kell végezni egy sor több üzemeltető, úgy csatolni kell a zárójel kezdődik ... end (line №22 és №26).
Összhangban №23 levelet az első állítást. Ez SetTextStyle eljárást. Ez az eljárás meghatározza a font a szöveget, hogy az irányt a megjelenített szöveg, valamint az érték a leveleket. Az első paraméter az eljárás meghatározza a betűtípust szöveges kimenet (ebben a példában, az első paraméter kerül az érték változó «i» és hála ciklusban változhat 0 és 10).
A második paraméter megadja az irányt a szöveges kimenetet. Ez a paraméter esetén csak a két érték - 0 vagy 1. Ha 0 (mint a mi példánkban), akkor a szöveg jelenik meg balról jobbra. Ha van egy 1, akkor a szöveg jelenik meg fejjel lefelé.
A harmadik paraméter a karakterek méretét. Meg lehet venni értékek 1-10 (1 - a legkisebb méretű, 10 - a legnagyobb méret). Az alábbi táblázat mutatja a betűk és a hozzájuk tartozó konstansok.
Az első betűtípust a táblázat az alapértelmezett környezet Free Pascal. Azt is meg kell mondani, hogy ez az egyetlen betűtípust, amelyek segítségével a szabványos szerelvény fordító Free Pascal. Függetlenül attól, hogy milyen betűtípust adja az eljárás SetTextStyle, a szöveg csak akkor jelenik dot font DefaultFont. Annak érdekében, hogy képes legyen megjeleníteni szöveget más betűtípus kell betölteni a program mappát. Ehhez töltse le a fájlt betűtípusokat. csomagolja ki, és hozza meg a C: \ FPC \ 2.2.2 \ bin \ i386-win32 \.
Így a mappa C: \ FPC \ 2.2.2 \ bin \ i386-win32 \ lesz 10 kiterjesztésű fájlok .CHR.
Most már tudjuk használni 11 különböző betűtípusok (egy - normál és 10 - kivett Turbo Pascal fordító).
Összhangban №24 megjelenítéséhez szó «pascal». Mivel a ciklus ezt a szót fog megjelenni 11 alkalommal. Sőt, az összes 11 szavak megjelennek egymás után, mint OutText eljárás megjeleníti a szöveget a képernyőn, és mozgatja a mutatót, hogy a végén a szöveget.
Húr №25. Minden 11 szó jelenik meg a késedelem 1 másodperc.
Amellett, hogy az anyag.
Tartsuk szem előtt, hogy ha elkezd egy programot a környezet Free Pascal (Ctrl + F9), a betűtípusokat kell lennie egy mappában bin \ i386-win32. Ha azonban akkor először össze egy programot, majd futtassa a lefordított EXE-fájl, a betűtípusokat kell lennie ugyanabban a mappában, mint a program (fájl EXE). Ie Ha át a programot egy másik könyvtárba (vagy egy másik számítógépen), majd ugyanaz a font fájlokat átvinni kívánt.
DefaultFont (0) betűtípus szerepel a Graph modul és fel lehet használni bármikor. Ez a font egy mátrix, így változik a mérete karakterek jelennek meg ebben a betűtípust, nagyban befolyásolja a minőséget a szöveget.
A betűtípusok 1-10 vektorszabályozással és változó szöveg méretének, minőségét nem befolyásolja.
Betűtípusok 0-4 van egy állandó, amelyet fel lehet használni az eljárás SetTextStyle helyett numerikus állandók. Például SetTextStyle string (3,0,4) felírható SetTextStyle (SansSerifFont, 0,4). Betűtípusok 5-10 nem állandó, így csak egy numerikus konstans lehet alkalmazni a használatukra.
DefaultFont font (0) nincs file-t, ez már benne van a Graph egység. Betűtípusok 1-10 megvannak a fájlok, így ezeket a betűtípus megfelelő fájlokat kell a mappa C: \ FPC \ 2.2.2 \ bin \ i386-win32.