GraphWPF - TextOut и DrawText для произвольного объекта, а также с параметром - точка
This commit is contained in:
Mikhalkovich Stanislav
parent
734c4480d7
commit
59d8774688
|
|
@ -15,7 +15,7 @@ internal static class RevisionClass
|
|||
public const string Major = "3";
|
||||
public const string Minor = "8";
|
||||
public const string Build = "3";
|
||||
public const string Revision = "3257";
|
||||
public const string Revision = "3259";
|
||||
|
||||
public const string MainVersion = Major + "." + Minor;
|
||||
public const string FullVersion = Major + "." + Minor + "." + Build + "." + Revision;
|
||||
|
|
|
|||
|
|
@ -1,4 +1,4 @@
|
|||
%MINOR%=8
|
||||
%REVISION%=3257
|
||||
%REVISION%=3259
|
||||
%COREVERSION%=3
|
||||
%MAJOR%=3
|
||||
|
|
|
|||
|
|
@ -6,4 +6,4 @@ cd DocGenForStandardUnits
|
|||
cd ..
|
||||
"C:\Program Files (x86)\HTML Help Workshop\hhc.exe" PascalABCNETNew.hhp
|
||||
copy PascalABCNET.chm ..\bin\PascalABCNET.chm
|
||||
copy PascalABCNET.chm ..\Release\PascalABCNET.chm
|
||||
copy PascalABCNET.chm ..\Release\PascalABCNET.chm
|
||||
|
|
|
|||
Binary file not shown.
|
|
@ -7,6 +7,8 @@
|
|||
</HEAD><body><H1>Ìåòîäû ðàñøèðåíèÿ ñëîâàðåé</H1>
|
||||
<table border=0 cellpadding=5><tr><td><code><b>function</b> Each<Key,Source,Res>(Self: <b>sequence </b> <b>of</b> System.Linq.IGrouping<Key,Source>; grOperation: System.Linq.IGrouping<Key,Source> -> Res): Dictionary<Key,Res>;</code>
|
||||
<br> Âîçâðàùàåò ñëîâàðü, ñîïîñòàâëÿþùèé êëþ÷ó ãðóïïû ðåçóëüòàò ãðóïïîâîé îïåðàöèè</td></tr>
|
||||
<tr><td><code><b>function</b> Each<Key,Res>(Self: <b>sequence </b> <b>of</b> Key; proj: Key -> Res): Dictionary<Key,Res>;</code>
|
||||
<br> Âîçâðàùàåò ñëîâàðü, ñîïîñòàâëÿþùèé ýëåìåíòàì ïîñëåäîâàòåëüíîñòè îïðåäåë¸ííûå çíà÷åíèÿ</td></tr>
|
||||
<tr><td><code><b>function</b> EachCount<Key,Source>(Self: <b>sequence </b> <b>of</b> System.Linq.IGrouping<Key,Source>): Dictionary<Key,integer>;</code>
|
||||
<br> Âîçâðàùàåò ñëîâàðü, ñîïîñòàâëÿþùèé êëþ÷ó ãðóïïû êîëè÷åñòâî ýëåìåíòîâ ñ äàííûì êëþ÷îì</td></tr>
|
||||
<tr><td><code><b>function</b> EachCount<T>(Self: <b>sequence </b> <b>of</b> T): Dictionary<T,integer>;</code>
|
||||
|
|
|
|||
|
|
@ -3,6 +3,7 @@
|
|||
<param name="Keyword" value="ArrEqual">
|
||||
<param name="Keyword" value="BinarySearch">
|
||||
<param name="Keyword" value="Cartesian">
|
||||
<param name="Keyword" value="CartesianPower">
|
||||
<param name="Keyword" value="Combinations">
|
||||
<param name="Keyword" value="ConvertAll">
|
||||
<param name="Keyword" value="Fill">
|
||||
|
|
@ -29,21 +30,24 @@
|
|||
<param name="Keyword" value="Slice">
|
||||
<param name="Keyword" value="Sort">
|
||||
<param name="Keyword" value="SortDescending">
|
||||
<param name="Keyword" value="Transform"></object>
|
||||
<param name="Keyword" value="Transform">
|
||||
<param name="Keyword" value="ðàñøèðåíèå"></object>
|
||||
<meta http-equiv="Content-Type" content="text/html; charset=windows-1251"><link rel="StyleSheet" href="../../../default.css">
|
||||
</HEAD><body><H1>Ìåòîäû ðàñøèðåíèÿ îäíîìåðíûõ äèíàìè÷åñêèõ ìàññèâîâ</H1>
|
||||
<table border=0 cellpadding=5><tr><td><code><b>function</b> AdjacentFind<T>(Self: <b>array</b> <b>of</b> T; eq: (T,T)->boolean; start: integer := 0): integer;</code>
|
||||
<table border=0 cellpadding=5><tr><td><code>(ðàñøèðåíèå <b>sequence </b> <b>of</b> T) <b>function</b> Cartesian<T, T1>(b: <b>sequence </b> <b>of</b> T1): <b>sequence </b> <b>of</b> (T, T1);</code>
|
||||
<br> Âîçâðàùàåò äåêàðòîâî ïðîèçâåäåíèå ïîñëåäîâàòåëüíîñòåé â âèäå ïîñëåäîâàòåëüíîñòè ïàð</td></tr>
|
||||
<tr><td><code><b>function</b> AdjacentFind<T>(Self: <b>array</b> <b>of</b> T; eq: (T,T)->boolean; start: integer := 0): integer;</code>
|
||||
<br> Íàõîäèò ïåðâóþ ïàðó ïîäðÿä èäóùèõ îäèíàêîâûõ ýëåìåíòîâ, èñïîëüçóÿ ôóíêöèþ ñðàâíåíèÿ eq, è âîçâðàùàåò èíäåêñ ïåðâîãî ýëåìåíòà ïàðû. Åñëè íå íàéäåí, âîçâðàùàåòñÿ -1</td></tr>
|
||||
<tr><td><code><b>function</b> ArrEqual<T>(Self,b: <b>array</b> <b>of</b> T): boolean;</code>
|
||||
<br> Âîçâðàùàåò, ñîâïàäàþò ëè ìàññèâû</td></tr>
|
||||
<tr><td><code><b>function</b> BinarySearch<T>(Self: <b>array</b> <b>of</b> T; x: T): integer;</code>
|
||||
<br> Âûïîëíÿåò áèíàðíûé ïîèñê â îòñîðòèðîâàííîì ìàññèâå</td></tr>
|
||||
<tr><td><code><b>function</b> Cartesian<T>(Self: <b>array</b> <b>of</b> T; n: integer): <b>sequence </b> <b>of</b> <b>array</b> <b>of</b> T;</code>
|
||||
<br> Âîçâðàùàåò n-òóþ äåêàðòîâó ñòåïåíü ìíîæåñòâà ýëåìåíòîâ, çàäàííîãî ìàññèâîì</td></tr>
|
||||
<tr><td><code><b>function</b> Cartesian<T>(Self: <b>sequence </b> <b>of</b> T; n: integer): <b>sequence </b> <b>of</b> <b>array</b> <b>of</b> T;</code>
|
||||
<br> Âîçâðàùàåò n-òóþ äåêàðòîâó ñòåïåíü ìíîæåñòâà ýëåìåíòîâ, çàäàííîãî ïîñëåäîâàòåëüíîñòüþ</td></tr>
|
||||
<tr><td><code><b>function</b> Cartesian(Self: string; n: integer): <b>sequence </b> <b>of</b> string;</code>
|
||||
<br> Âîçâðàùàåò n-òóþ äåêàðòîâó ñòåïåíü ìíîæåñòâà ñèìâîëîâ, çàäàííîãî ñòðîêîé</td></tr>
|
||||
<tr><td><code><b>function</b> CartesianPower<T>(Self: <b>array</b> <b>of</b> T; n: integer): <b>sequence </b> <b>of</b> <b>array</b> <b>of</b> T;</code>
|
||||
<br> Âîçâðàùàåò n-òóþ äåêàðòîâó ñòåïåíü ìíîæåñòâà ýëåìåíòîâ, çàäàííîãî ìàññèâîì</td></tr>
|
||||
<tr><td><code><b>function</b> CartesianPower<T>(Self: <b>sequence </b> <b>of</b> T; n: integer): <b>sequence </b> <b>of</b> <b>array</b> <b>of</b> T;</code>
|
||||
<br> Âîçâðàùàåò n-òóþ äåêàðòîâó ñòåïåíü ìíîæåñòâà ýëåìåíòîâ, çàäàííîãî ïîñëåäîâàòåëüíîñòüþ</td></tr>
|
||||
<tr><td><code><b>function</b> Combinations<T>(Self: <b>array</b> <b>of</b> T; m: integer): <b>sequence </b> <b>of</b> <b>array</b> <b>of</b> T;</code>
|
||||
<br> Âîçâðàùàåò âñå ñî÷åòàíèÿ ïî m ýëåìåíòîâ</td></tr>
|
||||
<tr><td><code><b>function</b> Combinations<T>(Self: <b>sequence </b> <b>of</b> T; m: integer): <b>sequence </b> <b>of</b> <b>array</b> <b>of</b> T;</code>
|
||||
|
|
|
|||
|
|
@ -75,7 +75,7 @@
|
|||
<tr><td><code><b>function</b> Max(a: ÷èñëî, b: ÷èñëî): ÷èñëî;</code>
|
||||
<br> Âîçâðàùàåò ìàêñèìàëüíîå èç ÷èñåë a,b</td></tr>
|
||||
<tr><td><code><b>function</b> Max(a,b,...: T): T;</code>
|
||||
<br> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> a,b,...</td></tr>
|
||||
<br> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> a,b,...</td></tr>
|
||||
<tr><td><code><b>function</b> Min(a: ÷èñëî, b: ÷èñëî): ÷èñëî;</code>
|
||||
<br> Âîçâðàùàåò ìèíèìàëüíîå èç ÷èñåë a,b</td></tr>
|
||||
<tr><td><code><b>function</b> Min(a,b,...: T): T;</code>
|
||||
|
|
|
|||
|
|
@ -1,18 +1,29 @@
|
|||
<HTML><HEAD><object type="application/x-oleobject" classid="clsid:1e2a7bd0-dab9-11d0-b93a-00c04fc99f9e">
|
||||
<param name="Keyword" value="Dict">
|
||||
<param name="Keyword" value="DictInt">
|
||||
<param name="Keyword" value="DictStr">
|
||||
<param name="Keyword" value="DictStrInt">
|
||||
<param name="Keyword" value="HSet">
|
||||
<param name="Keyword" value="HSetInt">
|
||||
<param name="Keyword" value="HSetStr">
|
||||
<param name="Keyword" value="KV">
|
||||
<param name="Keyword" value="LLst">
|
||||
<param name="Keyword" value="Lst">
|
||||
<param name="Keyword" value="SSet"></object>
|
||||
<param name="Keyword" value="LstInt">
|
||||
<param name="Keyword" value="LstStr">
|
||||
<param name="Keyword" value="SSet">
|
||||
<param name="Keyword" value="SSetInt">
|
||||
<param name="Keyword" value="SSetStr"></object>
|
||||
<meta http-equiv="Content-Type" content="text/html; charset=windows-1251"><link rel="StyleSheet" href="../../../default.css">
|
||||
</HEAD><body><H1>Êîðîòêèå ôóíêöèè Lst, LLst, HSet, SSet, Dict, KV</H1>
|
||||
<table border=0 cellpadding=5><tr><td><code><b>function</b> Dict<TKey, TVal>(<b>params</b> pairs: <b>array</b> <b>of</b> KeyValuePair<TKey, TVal>): Dictionary<TKey, TVal>;</code>
|
||||
<br> Âîçâðàùàåò ñëîâàðü ïàð ýëåìåíòîâ (êëþ÷, çíà÷åíèå)</td></tr>
|
||||
<tr><td><code><b>function</b> Dict<TKey, TVal>(<b>params</b> pairs: <b>array</b> <b>of</b> (TKey, TVal)): Dictionary<TKey, TVal>;</code>
|
||||
<br> Âîçâðàùàåò ñëîâàðü ïàð ýëåìåíòîâ (êëþ÷, çíà÷åíèå)</td></tr>
|
||||
<tr><td><code><b>function</b> Dict<TKey, TVal>(pairs: <b>sequence </b> <b>of</b> (TKey, TVal)): Dictionary<TKey, TVal>;</code>
|
||||
<br> Âîçâðàùàåò ñëîâàðü ïàð ýëåìåíòîâ (êëþ÷, çíà÷åíèå), ïîñòðîåííûé íà çíà÷åíèÿõ ïîñëåäîâàòåëüíîñòè</td></tr>
|
||||
<tr><td><code><b>function</b> DictInt(<b>params</b> pairs: <b>array</b> <b>of</b> (integer, integer)): Dictionary<integer, integer>;</code>
|
||||
<br> Âîçâðàùàåò ñëîâàðü ïàð ýëåìåíòîâ (öåëîå, öåëîå)</td></tr>
|
||||
<tr><td><code><b>function</b> DictStr(<b>params</b> pairs: <b>array</b> <b>of</b> (string, string)): Dictionary<string, string>;</code>
|
||||
<br> Âîçâðàùàåò ñëîâàðü ïàð ýëåìåíòîâ (ñòðîêà, ñòðîêà)</td></tr>
|
||||
<tr><td><code><b>function</b> DictStrInt(<b>params</b> pairs: <b>array</b> <b>of</b> (string, integer)): Dictionary<string, integer>;</code>
|
||||
|
|
@ -25,6 +36,10 @@
|
|||
<br> Âîçâðàùàåò ìíîæåñòâî íà áàçå õåø òàáëèöû, çàïîëíåííîå äèàïàçîíîì çíà÷åíèé</td></tr>
|
||||
<tr><td><code><b>function</b> HSet(a: CharRange): HashSet<char>;</code>
|
||||
<br> Âîçâðàùàåò ìíîæåñòâî íà áàçå õåø òàáëèöû, çàïîëíåííîå çàïîëíåííûé äèàïàçîíîì çíà÷åíèé</td></tr>
|
||||
<tr><td><code><b>function</b> HSetInt(<b>params</b> a: <b>array</b> <b>of</b> integer): HashSet<integer>;</code>
|
||||
<br> Âîçâðàùàåò ìíîæåñòâî íà áàçå õåø òàáëèöû, çàïîëíåííîå öåëûìè çíà÷åíèÿìè</td></tr>
|
||||
<tr><td><code><b>function</b> HSetStr(<b>params</b> a: <b>array</b> <b>of</b> string): HashSet<string>;</code>
|
||||
<br> Âîçâðàùàåò ìíîæåñòâî íà áàçå õåø òàáëèöû, çàïîëíåííîå ñòðîêîâûìè çíà÷åíèÿìè</td></tr>
|
||||
<tr><td><code><b>function</b> KV<TKey, TVal>(key: TKey; value: TVal): KeyValuePair<TKey, TVal>;</code>
|
||||
<br> Âîçâðàùàåò ïàðó ýëåìåíòîâ (êëþ÷, çíà÷åíèå)</td></tr>
|
||||
<tr><td><code><b>function</b> LLst<T>(<b>params</b> a: <b>array</b> <b>of</b> T): LinkedList<T>;</code>
|
||||
|
|
@ -43,13 +58,21 @@
|
|||
<br> Âîçâðàùàåò ñïèñîê, çàïîëíåííûé äèàïàçîíîì çíà÷åíèé</td></tr>
|
||||
<tr><td><code><b>function</b> Lst(a: CharRange): List<char>;</code>
|
||||
<br> Âîçâðàùàåò ñïèñîê, çàïîëíåííûé äèàïàçîíîì çíà÷åíèé</td></tr>
|
||||
<tr><td><code><b>function</b> LstInt(<b>params</b> a: <b>array</b> <b>of</b> integer): List<integer>;</code>
|
||||
<br> Âîçâðàùàåò ñïèñîê, çàïîëíåííûé óêàçàííûìè öåëûìè çíà÷åíèÿìè</td></tr>
|
||||
<tr><td><code><b>function</b> LstStr(<b>params</b> a: <b>array</b> <b>of</b> string): List<string>;</code>
|
||||
<br> Âîçâðàùàåò ñïèñîê, çàïîëíåííûé óêàçàííûìè öåëûìè çíà÷åíèÿìè</td></tr>
|
||||
<tr><td><code><b>function</b> SSet<T>(<b>params</b> a: <b>array</b> <b>of</b> T): SortedSet<T>;</code>
|
||||
<br> Возвращает множество на базе бинарного дерева поиска, заполненное значениями из последовательности</td></tr>
|
||||
<br> Âîçâðàùàåò ìíîæåñòâî íà áàçå áèíàðíîãî äåðåâà ïîèñêà, çàïîëíåííîå óêàçàííûìè çíà÷åíèÿìè</td></tr>
|
||||
<tr><td><code><b>function</b> SSet<T>(a: <b>sequence </b> <b>of</b> T): SortedSet<T>;</code>
|
||||
<br> Âîçâðàùàåò ìíîæåñòâî íà áàçå áèíàðíîãî äåðåâà ïîèñêà, çàïîëíåííîå çíà÷åíèÿìè èç ïîñëåäîâàòåëüíîñòè</td></tr>
|
||||
<tr><td><code><b>function</b> SSet(a: IntRange): SortedSet<integer>;</code>
|
||||
<br> Âîçâðàùàåò ìíîæåñòâî íà áàçå áèíàðíîãî äåðåâà ïîèñêà, çàïîëíåííîå äèàïàçîíîì çíà÷åíèé</td></tr>
|
||||
<tr><td><code><b>function</b> SSet(a: CharRange): SortedSet<char>;</code>
|
||||
<br> Âîçâðàùàåò ìíîæåñòâî íà áàçå áèíàðíîãî äåðåâà ïîèñêà, çàïîëíåííîå äèàïàçîíîì çíà÷åíèé</td></tr>
|
||||
<tr><td><code><b>function</b> SSetInt(<b>params</b> a: <b>array</b> <b>of</b> integer): SortedSet<integer>;</code>
|
||||
<br> Âîçâðàùàåò ìíîæåñòâî íà áàçå áèíàðíîãî äåðåâà ïîèñêà, çàïîëíåííîå öåëûìè çíà÷åíèÿìè</td></tr>
|
||||
<tr><td><code><b>function</b> SSetStr(<b>params</b> a: <b>array</b> <b>of</b> string): SortedSet<string>;</code>
|
||||
<br> Âîçâðàùàåò ìíîæåñòâî íà áàçå áèíàðíîãî äåðåâà ïîèñêà, çàïîëíåííîå ñòðîêîâûìè çíà÷åíèÿìè</td></tr>
|
||||
</table>
|
||||
</body></HTML>
|
||||
|
|
@ -8,6 +8,7 @@
|
|||
<param name="Keyword" value="Comparer">
|
||||
<param name="Keyword" value="Complex">
|
||||
<param name="Keyword" value="Console">
|
||||
<param name="Keyword" value="Convert">
|
||||
<param name="Keyword" value="DateTime">
|
||||
<param name="Keyword" value="decimal">
|
||||
<param name="Keyword" value="Dictionary">
|
||||
|
|
@ -79,6 +80,8 @@
|
|||
<br> Ïðåäñòàâëÿåò êîìïëåêñíîå ÷èñëî</td></tr>
|
||||
<tr><td><code>Console = System.Console;</code>
|
||||
<br> Êëàññ, óïðàâëÿþùèé êîíñîëüíûì îêíîì è êîíñîëüíûì ââîäîì-âûâîäîì</td></tr>
|
||||
<tr><td><code>Convert = System.Convert;</code>
|
||||
<br> Ïðåîáðàçóåò çíà÷åíèå îäíîãî áàçîâîãî òèïà ê äðóãîìó áàçîâîìó òèïó</td></tr>
|
||||
<tr><td><code>DateTime = System.DateTime;</code>
|
||||
<br> Ïðåäñòàâëÿåò äàòó è âðåìÿ</td></tr>
|
||||
<tr><td><code>decimal = System.Decimal;</code>
|
||||
|
|
|
|||
|
|
@ -1,4 +1,5 @@
|
|||
<HTML><HEAD><object type="application/x-oleobject" classid="clsid:1e2a7bd0-dab9-11d0-b93a-00c04fc99f9e">
|
||||
<param name="Keyword" value="Iterate">
|
||||
<param name="Keyword" value="PartitionPoints">
|
||||
<param name="Keyword" value="Range">
|
||||
<param name="Keyword" value="ReadSeqInteger">
|
||||
|
|
@ -16,7 +17,9 @@
|
|||
<param name="Keyword" value="SeqWhile"></object>
|
||||
<meta http-equiv="Content-Type" content="text/html; charset=windows-1251"><link rel="StyleSheet" href="../../../default.css">
|
||||
</HEAD><body><H1>Ïîäïðîãðàììû äëÿ ãåíåðàöèè ïîñëåäîâàòåëüíîñòåé</H1>
|
||||
<table border=0 cellpadding=5><tr><td><code><b>function</b> PartitionPoints(a, b: real; n: integer): <b>sequence </b> <b>of</b> real;</code>
|
||||
<table border=0 cellpadding=5><tr><td><code><b>function</b> Iterate<T>(first: T; next: T->T): <b>sequence </b> <b>of</b> T;</code>
|
||||
<br> Âîçâðàùàåò áåñêîíå÷íóþ ðåêóððåíòíóþ ïîñëåäîâàòåëüíîñòü ýëåìåíòîâ, çàäàâàåìóþ íà÷àëüíûì ýëåìåíòîì first è ôóíêöèåé next</td></tr>
|
||||
<tr><td><code><b>function</b> PartitionPoints(a, b: real; n: integer): <b>sequence </b> <b>of</b> real;</code>
|
||||
<br> Âîçâðàùàåò ïîñëåäîâàòåëüíîñòü âåùåñòâåííûõ â òî÷êàõ ðàçáèåíèÿ îòðåçêà [a,b] íà n ðàâíûõ ÷àñòåé</td></tr>
|
||||
<tr><td><code><b>function</b> Range(a, b: integer): <b>sequence </b> <b>of</b> integer;</code>
|
||||
<br> Âîçâðàùàåò ïîñëåäîâàòåëüíîñòü öåëûõ îò a äî b</td></tr>
|
||||
|
|
|
|||
|
|
@ -1,10 +1,13 @@
|
|||
<HTML><HEAD><object type="application/x-oleobject" classid="clsid:1e2a7bd0-dab9-11d0-b93a-00c04fc99f9e">
|
||||
<param name="Keyword" value="Ïàðàìåòðû">
|
||||
<param name="Keyword" value="Òèï">
|
||||
<param name="Keyword" value="Öâåò"></object>
|
||||
<meta http-equiv="Content-Type" content="text/html; charset=windows-1251"><link rel="StyleSheet" href="../../../default.css">
|
||||
</HEAD><body><H1>Êëàññ BrushType</H1>
|
||||
<table border=0 cellpadding=5><tr><td><code>/// Òèï êèñòè;</code>
|
||||
<table border=0 cellpadding=5><tr><td><code>/// Ïàðàìåòðû ðèñîâàíèÿ;</code>
|
||||
<br> e</td></tr>
|
||||
<tr><td><code>/// Òèï êèñòè;</code>
|
||||
<br> ameters = static class</td></tr>
|
||||
<tr><td><code>/// Öâåò êèñòè;</code>
|
||||
<br> shType = class</td></tr>
|
||||
</table>
|
||||
|
|
|
|||
|
|
@ -1,5 +1,6 @@
|
|||
<HTML><HEAD><object type="application/x-oleobject" classid="clsid:1e2a7bd0-dab9-11d0-b93a-00c04fc99f9e">
|
||||
<param name="Keyword" value="Arc">
|
||||
<param name="Keyword" value="Arrow">
|
||||
<param name="Keyword" value="Circle">
|
||||
<param name="Keyword" value="DrawCircle">
|
||||
<param name="Keyword" value="DrawEllipse">
|
||||
|
|
@ -20,7 +21,6 @@
|
|||
<param name="Keyword" value="LineTo">
|
||||
<param name="Keyword" value="MoveBy">
|
||||
<param name="Keyword" value="MoveRel">
|
||||
<param name="Keyword" value="MoveTo">
|
||||
<param name="Keyword" value="Pie">
|
||||
<param name="Keyword" value="Polygon">
|
||||
<param name="Keyword" value="PolyLine">
|
||||
|
|
@ -34,6 +34,14 @@
|
|||
<br> Ðèñóåò äóãó îêðóæíîñòè ñ öåíòðîì â òî÷êå (x,y) è ðàäèóñîì r, çàêëþ÷åííóþ ìåæäó äâóìÿ ëó÷àìè, îáðàçóþùèìè óãëû angle1 è angle2 ñ îñüþ OX</td></tr>
|
||||
<tr><td><code><b>procedure</b> Arc(x, y, r, angle1, angle2: real; c: Color);</code>
|
||||
<br> Ðèñóåò äóãó îêðóæíîñòè ñ öåíòðîì â òî÷êå (x,y) è ðàäèóñîì r, çàêëþ÷åííóþ ìåæäó äâóìÿ ëó÷àìè, îáðàçóþùèìè óãëû angle1 è angle2 ñ îñüþ OX, öâåòîì c</td></tr>
|
||||
<tr><td><code><b>procedure</b> Arrow(x,y,x1,y1: real);</code>
|
||||
<br> Устанавливает текущую позицию рисования в точку (x,y)Рисует отрезок прямой от точки (x,y) до точки (x1,y1) со стрелкой на конце</td></tr>
|
||||
<tr><td><code><b>procedure</b> Arrow(x,y,x1,y1: real; c: Color);</code>
|
||||
<br> Рисует отрезок прямой от точки (x,y) до точки (x1,y1) цветом c со стрелкой на конце</td></tr>
|
||||
<tr><td><code><b>procedure</b> Arrow(p,p1: Point);</code>
|
||||
<br> Рисует отрезок прямой от точки p до точки p1 со стрелкой на конце</td></tr>
|
||||
<tr><td><code><b>procedure</b> Arrow(p,p1: Point; c: Color);</code>
|
||||
<br> Рисует отрезок прямой от точки p до точки p1 цветом c со стрелкой на конце</td></tr>
|
||||
<tr><td><code><b>procedure</b> Circle(x,y,r: real);</code>
|
||||
<br> Ðèñóåò îêðóæíîñòü ñ öåíòðîì â òî÷êå (x,y) è ðàäèóñîì r</td></tr>
|
||||
<tr><td><code><b>procedure</b> Circle(x,y,r: real; c: Color);</code>
|
||||
|
|
@ -132,8 +140,6 @@
|
|||
<br> Ïåðåìåùàåò òåêóùóþ ïîçèöèþ ðèñîâàíèÿ íà âåêòîð (dx,dy)</td></tr>
|
||||
<tr><td><code><b>procedure</b> MoveRel(dx,dy: real);</code>
|
||||
<br> Ïåðåìåùàåò òåêóùóþ ïîçèöèþ ðèñîâàíèÿ íà âåêòîð (dx,dy)</td></tr>
|
||||
<tr><td><code><b>procedure</b> MoveTo(x,y: real);</code>
|
||||
<br> Óñòàíàâëèâàåò òåêóùóþ ïîçèöèþ ðèñîâàíèÿ â òî÷êó (x,y)</td></tr>
|
||||
<tr><td><code><b>procedure</b> Pie(x, y, r, angle1, angle2: real);</code>
|
||||
<br> Ðèñóåò ñåêòîð îêðóæíîñòè ñ öåíòðîì â òî÷êå (x,y) è ðàäèóñîì r, çàêëþ÷åííûé ìåæäó äâóìÿ ëó÷àìè, îáðàçóþùèìè óãëû angle1 è angle2 ñ îñüþ OX</td></tr>
|
||||
<tr><td><code><b>procedure</b> Pie(x, y, r, angle1, angle2: real; c: Color);</code>
|
||||
|
|
|
|||
|
|
@ -6,50 +6,32 @@
|
|||
<param name="Keyword" value="TextWidth"></object>
|
||||
<meta http-equiv="Content-Type" content="text/html; charset=windows-1251"><link rel="StyleSheet" href="../../../default.css">
|
||||
</HEAD><body><H1>Ôóíêöèè äëÿ âûâîäà òåêñòà</H1>
|
||||
<table border=0 cellpadding=5><tr><td><code><b>procedure</b> DrawText(x, y, w, h: real; text: string; align: Alignment := Alignment.Center; angle: real := 0.0);</code>
|
||||
<br> Âûâîäèò ñòðîêó â ïðÿìîóãîëüíèê ê êîîðäèíàòàìè ëåâîãî âåðõíåãî óãëà (x,y)</td></tr>
|
||||
<tr><td><code><b>procedure</b> DrawText(x, y, w, h: real; text: string; c: GColor; align: Alignment := Alignment.Center; angle: real := 0.0);</code>
|
||||
<br> Âûâîäèò ñòðîêó â ïðÿìîóãîëüíèê ê êîîðäèíàòàìè ëåâîãî âåðõíåãî óãëà (x,y)</td></tr>
|
||||
<tr><td><code><b>procedure</b> DrawText(x, y, w, h: real; number: integer; align: Alignment := Alignment.Center; angle: real := 0.0);</code>
|
||||
<br> Âûâîäèò öåëîå â ïðÿìîóãîëüíèê ê êîîðäèíàòàìè ëåâîãî âåðõíåãî óãëà (x,y)</td></tr>
|
||||
<tr><td><code><b>procedure</b> DrawText(x, y, w, h: real; number: real; align: Alignment := Alignment.Center; angle: real := 0.0);</code>
|
||||
<br> Âûâîäèò âåùåñòâåííîå â ïðÿìîóãîëüíèê ê êîîðäèíàòàìè ëåâîãî âåðõíåãî óãëà (x,y)</td></tr>
|
||||
<tr><td><code><b>procedure</b> DrawText(r: GRect; text: string; align: Alignment := Alignment.Center; angle: real := 0.0);</code>
|
||||
<br> Âûâîäèò ñòðîêó â ïðÿìîóãîëüíèê</td></tr>
|
||||
<tr><td><code><b>procedure</b> DrawText(r: GRect; number: integer; align: Alignment := Alignment.Center; angle: real := 0.0);</code>
|
||||
<br> Âûâîäèò öåëîå â ïðÿìîóãîëüíèê</td></tr>
|
||||
<tr><td><code><b>procedure</b> DrawText(r: GRect; number: real; align: Alignment := Alignment.Center; angle: real := 0.0);</code>
|
||||
<br> Âûâîäèò âåùåñòâåííîå â ïðÿìîóãîëüíèê</td></tr>
|
||||
<tr><td><code><b>procedure</b> DrawText(x, y, w, h: real; number: integer; c: GColor; align: Alignment := Alignment.Center; angle: real := 0.0);</code>
|
||||
<br> Âûâîäèò öåëîå â ïðÿìîóãîëüíèê ê êîîðäèíàòàìè ëåâîãî âåðõíåãî óãëà (x,y)</td></tr>
|
||||
<tr><td><code><b>procedure</b> DrawText(x, y, w, h: real; number: real; c: GColor; align: Alignment := Alignment.Center; angle: real := 0.0);</code>
|
||||
<br> Âûâîäèò âåùåñòâåííîå â ïðÿìîóãîëüíèê ê êîîðäèíàòàìè ëåâîãî âåðõíåãî óãëà (x,y)</td></tr>
|
||||
<tr><td><code><b>procedure</b> DrawText(r: GRect; text: string; c: GColor; align: Alignment := Alignment.Center; angle: real := 0.0);</code>
|
||||
<br> Âûâîäèò ñòðîêó â ïðÿìîóãîëüíèê</td></tr>
|
||||
<tr><td><code><b>procedure</b> DrawText(r: GRect; number: integer; c: GColor; align: Alignment := Alignment.Center; angle: real := 0.0);</code>
|
||||
<br> Âûâîäèò öåëîå â ïðÿìîóãîëüíèê</td></tr>
|
||||
<tr><td><code><b>procedure</b> DrawText(r: GRect; number: real; c: GColor; align: Alignment := Alignment.Center; angle: real := 0.0);</code>
|
||||
<br> Âûâîäèò âåùåñòâåííîå â ïðÿìîóãîëüíèê</td></tr>
|
||||
<tr><td><code><b>procedure</b> DrawText(x, y, w, h: real; text: string; f: FontOptions; align: Alignment; angle: real);</code>
|
||||
<br> Âûâîäèò ñòðîêó â ïðÿìîóãîëüíèê ê êîîðäèíàòàìè ëåâîãî âåðõíåãî óãëà (x,y) óêàçàííûì øðèôòîì</td></tr>
|
||||
<table border=0 cellpadding=5><tr><td><code><b>procedure</b> DrawText(x, y, w, h: real; text: object; align: Alignment := Alignment.Center; angle: real := 0.0);</code>
|
||||
<br> Âûâîäèò òåêñòîâîå ïðåäñòàâëåíèå îáúåêòà â ïðÿìîóãîëüíèê ðàçìåðà (w,h) ñ êîîðäèíàòàìè ëåâîãî âåðõíåãî óãëà (x,y)</td></tr>
|
||||
<tr><td><code><b>procedure</b> DrawText(x, y, w, h: real; text: object; color: GColor; align: Alignment := Alignment.Center; angle: real := 0.0);</code>
|
||||
<br> Âûâîäèò òåêñòîâîå ïðåäñòàâëåíèå îáúåêòà óêàçàííûì öâåòîì â ïðÿìîóãîëüíèê (x,y,w,h)</td></tr>
|
||||
<tr><td><code><b>procedure</b> DrawText(rect: GRect; text: object; align: Alignment := Alignment.Center; angle: real := 0.0);</code>
|
||||
<br> Âûâîäèò òåêñòîâîå ïðåäñòàâëåíèå îáúåêòà â óêàçàííûé ïðÿìîóãîëüíèê</td></tr>
|
||||
<tr><td><code><b>procedure</b> DrawText(rect: GRect; text: object; color: GColor; align: Alignment := Alignment.Center; angle: real := 0.0);</code>
|
||||
<br> Âûâîäèò òåêñòîâîå ïðåäñòàâëåíèå îáúåêòà â óêàçàííûé ïðÿìîóãîëüíèê óêàçàííûì öâåòîì</td></tr>
|
||||
<tr><td><code><b>procedure</b> DrawText(x, y, w, h: real; text: object; f: FontOptions; align: Alignment; angle: real);</code>
|
||||
<br> Âûâîäèò ñòðîêó â ïðÿìîóãîëüíèê (x,y,w,h) óêàçàííûì øðèôòîì</td></tr>
|
||||
<tr><td><code><b>function</b> TextHeight(text: string): real;</code>
|
||||
<br> Âûñîòà òåêñòà ïðè âûâîäå</td></tr>
|
||||
<tr><td><code><b>function</b> TextHeight(text: string; f: FontOptions): real;</code>
|
||||
<br> Âûñîòà òåêñòà ïðè âûâîäå çàäàííûì øðèôòîì</td></tr>
|
||||
<tr><td><code><b>procedure</b> TextOut(x, y: real; text: string; align: Alignment := Alignment.LeftTop; angle: real := 0.0);</code>
|
||||
<br> Âûâîäèò ñòðîêó â ïîçèöèþ (x,y)</td></tr>
|
||||
<tr><td><code><b>procedure</b> TextOut(x, y: real; text: string; c: GColor; align: Alignment := Alignment.LeftTop; angle: real := 0.0);</code>
|
||||
<br> Âûâîäèò ñòðîêó â ïîçèöèþ (x,y) öâåòîì c</td></tr>
|
||||
<tr><td><code><b>procedure</b> TextOut(x, y: real; text: integer; align: Alignment := Alignment.LeftTop; angle: real := 0.0);</code>
|
||||
<br> Âûâîäèò öåëîå â ïîçèöèþ (x,y)</td></tr>
|
||||
<tr><td><code><b>procedure</b> TextOut(x, y: real; text: integer; c: GColor; align: Alignment := Alignment.LeftTop; angle: real := 0.0);</code>
|
||||
<br> Âûâîäèò öåëîå â ïîçèöèþ (x,y) öâåòîì c</td></tr>
|
||||
<tr><td><code><b>procedure</b> TextOut(x, y: real; text: real; align: Alignment := Alignment.LeftTop; angle: real := 0.0);</code>
|
||||
<br> Âûâîäèò âåùåñòâåííîå â ïîçèöèþ (x,y)</td></tr>
|
||||
<tr><td><code><b>procedure</b> TextOut(x, y: real; text: real; c: GColor; align: Alignment := Alignment.LeftTop; angle: real := 0.0);</code>
|
||||
<br> Âûâîäèò âåùåñòâåííîå â ïîçèöèþ (x,y) öâåòîì c</td></tr>
|
||||
<tr><td><code><b>procedure</b> TextOut(x, y: real; text: string; f: FontOptions; align: Alignment := Alignment.LeftTop; angle: real := 0.0);</code>
|
||||
<br> Âûâîäèò ñòðîêó â ïîçèöèþ (x,y) óêàçàííûì øðèôòîì</td></tr>
|
||||
<tr><td><code><b>procedure</b> TextOut(x, y: real; text: object; align: Alignment := Alignment.LeftTop; angle: real := 0.0);</code>
|
||||
<br> Âûâîäèò òåêñòîâîå ïðåäñòàâëåíèå îáúåêòà â ïîçèöèþ (x,y)</td></tr>
|
||||
<tr><td><code><b>procedure</b> TextOut(x, y: real; text: object; color: GColor; align: Alignment := Alignment.LeftTop; angle: real := 0.0);</code>
|
||||
<br> Âûâîäèò òåêñòîâîå ïðåäñòàâëåíèå îáúåêòà â ïîçèöèþ (x,y) óêàçàííûì öâåòîì</td></tr>
|
||||
<tr><td><code><b>procedure</b> TextOut(x, y: real; text: object; f: FontOptions; align: Alignment := Alignment.LeftTop; angle: real := 0.0);</code>
|
||||
<br> Âûâîäèò òåêñòîâîå ïðåäñòàâëåíèå îáúåêòà â ïîçèöèþ (x,y) óêàçàííûì øðèôòîì</td></tr>
|
||||
<tr><td><code><b>procedure</b> TextOut(pos: Point; text: object; align: Alignment := Alignment.LeftTop; angle: real := 0.0);</code>
|
||||
<br> Âûâîäèò òåêñòîâîå ïðåäñòàâëåíèå îáúåêòà â ïîçèöèþ pos</td></tr>
|
||||
<tr><td><code><b>procedure</b> TextOut(pos: Point; text: object; color: GColor; align: Alignment := Alignment.LeftTop; angle: real := 0.0);</code>
|
||||
<br> Âûâîäèò òåêñòîâîå ïðåäñòàâëåíèå îáúåêòà â ïîçèöèþ pos óêàçàííûì öâåòîì</td></tr>
|
||||
<tr><td><code><b>procedure</b> TextOut(pos: Point; text: object; f: FontOptions; align: Alignment := Alignment.LeftTop; angle: real := 0.0);</code>
|
||||
<br> Âûâîäèò òåêñòîâîå ïðåäñòàâëåíèå îáúåêòà â ïîçèöèþ pos óêàçàííûì øðèôòîì</td></tr>
|
||||
<tr><td><code><b>function</b> TextSize(text: string): Size;</code>
|
||||
<br> Ðàçìåð òåêñòà ïðè âûâîäå</td></tr>
|
||||
<tr><td><code><b>function</b> TextSize(text: string; f: FontOptions): Size;</code>
|
||||
|
|
|
|||
|
|
@ -1,23 +1,6 @@
|
|||
<HTML><HEAD><object type="application/x-oleobject" classid="clsid:1e2a7bd0-dab9-11d0-b93a-00c04fc99f9e">
|
||||
<param name="Keyword" value="Color">
|
||||
<param name="Keyword" value="PenType">
|
||||
<param name="Keyword" value="RoundCap">
|
||||
<param name="Keyword" value="Width">
|
||||
<param name="Keyword" value="X">
|
||||
<param name="Keyword" value="Y"></object>
|
||||
<param name="Keyword" value="PenType"></object>
|
||||
<meta http-equiv="Content-Type" content="text/html; charset=windows-1251"><link rel="StyleSheet" href="../../../default.css">
|
||||
</HEAD><body><H1>Êëàññ PenType</H1>Òèï ïåðà.
|
||||
<table border=0 cellpadding=5><tr><td></td></tr><tr><td class="secttitle"><font style="font-size: 11pt">Ñâîéñòâà êëàññà PenType</font></td></tr>
|
||||
|
||||
<tr><tr><td><code><b>property</b> Color: GColor;</code>
|
||||
<br> Öâåò ïåðà</td></tr>
|
||||
<tr><td><code><b>property</b> RoundCap: boolean;</code>
|
||||
<br> Ñêðóãëåíèå ïåðà íà êîíöàõ ëèíèé</td></tr>
|
||||
<tr><td><code><b>property</b> Width: real;</code>
|
||||
<br> Øèðèíà ïåðà</td></tr>
|
||||
<tr><td><code><b>property</b> X: real;</code>
|
||||
<br> Òåêóùàÿ êîîðäèíàòà X ïåðà</td></tr>
|
||||
<tr><td><code><b>property</b> Y: real;</code>
|
||||
<br> Òåêóùàÿ êîîðäèíàòà Y ïåðà</td></tr>
|
||||
</tr></table>
|
||||
<table border=0 cellpadding=5></table>
|
||||
</body></HTML>
|
||||
|
|
@ -1 +1 @@
|
|||
3.8.3.3257
|
||||
3.8.3.3259
|
||||
|
|
|
|||
|
|
@ -1 +1 @@
|
|||
!define VERSION '3.8.3.3257'
|
||||
!define VERSION '3.8.3.3259'
|
||||
|
|
|
|||
|
|
@ -260,7 +260,10 @@ type
|
|||
// -----------------------------------------------------
|
||||
//>> Класс Vector # Vector class
|
||||
// -----------------------------------------------------
|
||||
/// Класс Vector
|
||||
|
||||
//{{{--doc: Конец секции 2 }}}
|
||||
|
||||
// Класс Vector
|
||||
{Vector = class
|
||||
public
|
||||
x,y: real;
|
||||
|
|
@ -272,9 +275,7 @@ type
|
|||
static function operator+(v: Vector; p: Point): Point := new Point(p.x+v.x,p.y+v.y);
|
||||
static function operator+(p: Point; v: Vector): Point := new Point(p.x+v.x,p.y+v.y);
|
||||
end;}
|
||||
|
||||
//{{{--doc: Конец секции 2 }}}
|
||||
|
||||
|
||||
|
||||
//{{{doc: Начало секции 3 }}}
|
||||
|
||||
|
|
@ -436,7 +437,7 @@ procedure DrawPolygon(points: array of Point; c: GColor);
|
|||
procedure FillPolygon(points: array of Point; c: GColor);
|
||||
|
||||
// -----------------------------------------------------
|
||||
//>> Класс Bitmap
|
||||
//>> Класс Bitmap # Bitmap class
|
||||
// -----------------------------------------------------
|
||||
///!#
|
||||
/// Класс битового образа
|
||||
|
|
@ -536,48 +537,32 @@ procedure EndFrameBasedAnimation;
|
|||
// -----------------------------------------------------
|
||||
//>> Функции для вывода текста # GraphWPF text functions
|
||||
// -----------------------------------------------------
|
||||
/// Выводит строку в прямоугольник к координатами левого верхнего угла (x,y)
|
||||
procedure DrawText(x, y, w, h: real; text: string; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
/// Выводит строку в прямоугольник к координатами левого верхнего угла (x,y)
|
||||
procedure DrawText(x, y, w, h: real; text: string; c: GColor; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
/// Выводит целое в прямоугольник к координатами левого верхнего угла (x,y)
|
||||
procedure DrawText(x, y, w, h: real; number: integer; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
/// Выводит вещественное в прямоугольник к координатами левого верхнего угла (x,y)
|
||||
procedure DrawText(x, y, w, h: real; number: real; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
/// Выводит строку в прямоугольник
|
||||
procedure DrawText(r: GRect; text: string; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
/// Выводит целое в прямоугольник
|
||||
procedure DrawText(r: GRect; number: integer; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
/// Выводит вещественное в прямоугольник
|
||||
procedure DrawText(r: GRect; number: real; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
/// Выводит целое в прямоугольник к координатами левого верхнего угла (x,y)
|
||||
procedure DrawText(x, y, w, h: real; number: integer; c: GColor; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
/// Выводит вещественное в прямоугольник к координатами левого верхнего угла (x,y)
|
||||
procedure DrawText(x, y, w, h: real; number: real; c: GColor; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
/// Выводит строку в прямоугольник
|
||||
procedure DrawText(r: GRect; text: string; c: GColor; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
/// Выводит целое в прямоугольник
|
||||
procedure DrawText(r: GRect; number: integer; c: GColor; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
/// Выводит вещественное в прямоугольник
|
||||
procedure DrawText(r: GRect; number: real; c: GColor; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
/// Выводит строку в прямоугольник к координатами левого верхнего угла (x,y) указанным шрифтом
|
||||
procedure DrawText(x, y, w, h: real; text: string; f: FontOptions; align: Alignment; angle: real);
|
||||
|
||||
/// Выводит текстовое представление объекта в прямоугольник размера (w,h) с координатами левого верхнего угла (x,y)
|
||||
procedure DrawText(x, y, w, h: real; text: object; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
/// Выводит текстовое представление объекта указанным цветом в прямоугольник (x,y,w,h)
|
||||
procedure DrawText(x, y, w, h: real; text: object; color: GColor; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
/// Выводит текстовое представление объекта в указанный прямоугольник
|
||||
procedure DrawText(rect: GRect; text: object; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
/// Выводит текстовое представление объекта в указанный прямоугольник указанным цветом
|
||||
procedure DrawText(rect: GRect; text: object; color: GColor; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
/// Выводит строку в прямоугольник (x,y,w,h) указанным шрифтом
|
||||
procedure DrawText(x, y, w, h: real; text: object; f: FontOptions; align: Alignment; angle: real);
|
||||
|
||||
|
||||
/// Выводит строку в позицию (x,y)
|
||||
procedure TextOut(x, y: real; text: string; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
|
||||
/// Выводит строку в позицию (x,y) цветом c
|
||||
procedure TextOut(x, y: real; text: string; c: GColor; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
|
||||
/// Выводит целое в позицию (x,y)
|
||||
procedure TextOut(x, y: real; text: integer; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
|
||||
/// Выводит целое в позицию (x,y) цветом c
|
||||
procedure TextOut(x, y: real; text: integer; c: GColor; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
|
||||
/// Выводит вещественное в позицию (x,y)
|
||||
procedure TextOut(x, y: real; text: real; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
|
||||
/// Выводит вещественное в позицию (x,y) цветом c
|
||||
procedure TextOut(x, y: real; text: real; c: GColor; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
|
||||
/// Выводит строку в позицию (x,y) указанным шрифтом
|
||||
procedure TextOut(x, y: real; text: string; f: FontOptions; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
|
||||
/// Выводит текстовое представление объекта в позицию (x,y)
|
||||
procedure TextOut(x, y: real; text: object; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
|
||||
/// Выводит текстовое представление объекта в позицию (x,y) указанным цветом
|
||||
procedure TextOut(x, y: real; text: object; color: GColor; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
|
||||
/// Выводит текстовое представление объекта в позицию (x,y) указанным шрифтом
|
||||
procedure TextOut(x, y: real; text: object; f: FontOptions; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
|
||||
/// Выводит текстовое представление объекта в позицию pos
|
||||
procedure TextOut(pos: Point; text: object; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
|
||||
/// Выводит текстовое представление объекта в позицию pos указанным цветом
|
||||
procedure TextOut(pos: Point; text: object; color: GColor; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
|
||||
/// Выводит текстовое представление объекта в позицию pos указанным шрифтом
|
||||
procedure TextOut(pos: Point; text: object; f: FontOptions; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
|
||||
|
||||
|
||||
/// Ширина текста при выводе
|
||||
function TextWidth(text: string): real;
|
||||
|
|
@ -760,6 +745,50 @@ var AdditionalDrawOnDC: procedure(dc: DrawingContext);
|
|||
procedure __InitModule__;
|
||||
procedure __FinalizeModule__;
|
||||
|
||||
(*
|
||||
// Выводит строку в прямоугольник к координатами левого верхнего угла (x,y)
|
||||
procedure DrawText(x, y, w, h: real; text: string; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
// Выводит строку в прямоугольник к координатами левого верхнего угла (x,y)
|
||||
procedure DrawText(x, y, w, h: real; text: string; c: GColor; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
// Выводит целое в прямоугольник к координатами левого верхнего угла (x,y)
|
||||
procedure DrawText(x, y, w, h: real; number: integer; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
// Выводит вещественное в прямоугольник к координатами левого верхнего угла (x,y)
|
||||
procedure DrawText(x, y, w, h: real; number: real; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
// Выводит строку в прямоугольник
|
||||
procedure DrawText(r: GRect; text: string; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
// Выводит целое в прямоугольник
|
||||
procedure DrawText(r: GRect; number: integer; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
// Выводит вещественное в прямоугольник
|
||||
procedure DrawText(r: GRect; number: real; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
// Выводит целое в прямоугольник к координатами левого верхнего угла (x,y)
|
||||
procedure DrawText(x, y, w, h: real; number: integer; c: GColor; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
// Выводит вещественное в прямоугольник к координатами левого верхнего угла (x,y)
|
||||
procedure DrawText(x, y, w, h: real; number: real; c: GColor; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
// Выводит строку в прямоугольник
|
||||
procedure DrawText(r: GRect; text: string; c: GColor; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
// Выводит целое в прямоугольник
|
||||
procedure DrawText(r: GRect; number: integer; c: GColor; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
// Выводит вещественное в прямоугольник
|
||||
procedure DrawText(r: GRect; number: real; c: GColor; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
// Выводит строку в прямоугольник к координатами левого верхнего угла (x,y) указанным шрифтом
|
||||
procedure DrawText(x, y, w, h: real; text: string; f: FontOptions; align: Alignment; angle: real);
|
||||
|
||||
// Выводит строку в позицию (x,y)
|
||||
procedure TextOut(x, y: real; text: string; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
|
||||
// Выводит строку в позицию (x,y) цветом c
|
||||
procedure TextOut(x, y: real; text: string; c: GColor; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
|
||||
// Выводит целое в позицию (x,y)
|
||||
procedure TextOut(x, y: real; text: integer; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
|
||||
// Выводит целое в позицию (x,y) цветом c
|
||||
procedure TextOut(x, y: real; text: integer; c: GColor; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
|
||||
// Выводит вещественное в позицию (x,y)
|
||||
procedure TextOut(x, y: real; text: real; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
|
||||
// Выводит вещественное в позицию (x,y) цветом c
|
||||
procedure TextOut(x, y: real; text: real; c: GColor; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
|
||||
// Выводит строку в позицию (x,y) указанным шрифтом
|
||||
procedure TextOut(x, y: real; text: string; f: FontOptions; align: Alignment := Alignment.LeftTop; angle: real := 0.0);}
|
||||
*)
|
||||
|
||||
implementation
|
||||
|
||||
var FontFamiliesDict := new Dictionary<string,FontFamily>;
|
||||
|
|
@ -1616,41 +1645,52 @@ begin
|
|||
end;
|
||||
end;
|
||||
|
||||
/// Выводит строку в прямоугольник к координатами левого верхнего угла (x,y)
|
||||
procedure DrawText(x, y, w, h: real; text: string; align: Alignment; angle: real);
|
||||
begin
|
||||
var (x0,y0) := (x,y);
|
||||
|
||||
var ft := FormTextFont(text,Font);
|
||||
var sz := new Size(ft.Width,ft.Height);
|
||||
|
||||
DrawTextHelper(x, y, x0, y0, w, h, sz, align);
|
||||
TextOutHelper(x,y,text,angle,x0,y0)
|
||||
end;
|
||||
/// Выводит строку в прямоугольник к координатами левого верхнего угла (x,y)
|
||||
procedure DrawText(x, y, w, h: real; text: string; c: GColor; align: Alignment; angle: real);
|
||||
begin
|
||||
var (x0,y0) := (x,y);
|
||||
|
||||
var ft := FormTextFont(text,Font);
|
||||
var sz := new Size(ft.Width,ft.Height);
|
||||
|
||||
DrawTextHelper(x, y, x0, y0, w, h, sz, align);
|
||||
TextOutHelper(x,y,text,angle,c,x0,y0)
|
||||
end;
|
||||
|
||||
/// Выводит строку в прямоугольник к координатами левого верхнего угла (x,y) данным шрифтом
|
||||
procedure DrawText(x, y, w, h: real; text: string; f: FontOptions; align: Alignment; angle: real);
|
||||
procedure DrawText(x, y, w, h: real; text: object; align: Alignment; angle: real);
|
||||
begin
|
||||
var (x0,y0) := (x,y);
|
||||
|
||||
var ft := FormTextFont(text,Font);
|
||||
var textstr := text.ToString;
|
||||
|
||||
var ft := FormTextFont(textstr,Font);
|
||||
var sz := new Size(ft.Width,ft.Height);
|
||||
|
||||
DrawTextHelper(x, y, x0, y0, w, h, sz, align);
|
||||
TextOutHelper(x,y,textstr,angle,x0,y0)
|
||||
end;
|
||||
|
||||
procedure DrawText(x, y, w, h: real; text: object; color: GColor; align: Alignment; angle: real);
|
||||
begin
|
||||
var (x0,y0) := (x,y);
|
||||
|
||||
var textstr := text.ToString;
|
||||
|
||||
var ft := FormTextFont(textstr,Font);
|
||||
var sz := new Size(ft.Width,ft.Height);
|
||||
|
||||
DrawTextHelper(x, y, x0, y0, w, h, sz, align);
|
||||
TextOutHelper(x,y,textstr,angle,color,x0,y0)
|
||||
end;
|
||||
|
||||
procedure DrawText(rect: GRect; text: object; align: Alignment; angle: real)
|
||||
:= DrawText(rect.x,rect.y,rect.Width,rect.Height,text,align,angle);
|
||||
|
||||
procedure DrawText(rect: GRect; text: object; color: GColor; align: Alignment; angle: real)
|
||||
:= DrawText(rect.x,rect.y,rect.Width,rect.Height,text,align,angle);
|
||||
|
||||
procedure DrawText(x, y, w, h: real; text: object; f: FontOptions; align: Alignment; angle: real);
|
||||
begin
|
||||
var (x0,y0) := (x,y);
|
||||
|
||||
var textstr := text.ToString;
|
||||
|
||||
var ft := FormTextFont(textstr,Font);
|
||||
var sz := new Size(ft.Width,ft.Height);
|
||||
|
||||
DrawTextHelper(x, y, x0, y0, w, h, sz, align, f);
|
||||
TextOutHelper(x,y,text,angle,x0,y0,f)
|
||||
TextOutHelper(x,y,textstr,angle,x0,y0,f)
|
||||
end;
|
||||
|
||||
{
|
||||
/// Выводит целое в прямоугольник к координатами левого верхнего угла (x,y)
|
||||
procedure DrawText(x, y, w, h: real; number: integer; align: Alignment; angle: real) := DrawText(x, y, w, h, '' + number,align,angle);
|
||||
/// Выводит вещественное в прямоугольник к координатами левого верхнего угла (x,y)
|
||||
|
|
@ -1671,32 +1711,28 @@ procedure DrawText(r: GRect; text: string; c: GColor; align: Alignment; angle: r
|
|||
procedure DrawText(r: GRect; number: integer; c: GColor; align: Alignment; angle: real) := DrawText(r.x,r.y,r.Width,r.Height,number,c,align,angle);
|
||||
/// Выводит вещественное в прямоугольник
|
||||
procedure DrawText(r: GRect; number: real; c: GColor; align: Alignment; angle: real) := DrawText(r.x,r.y,r.Width,r.Height,number,c,align,angle);
|
||||
}
|
||||
|
||||
|
||||
{function ConvertAlign(align: Alignment): Alignment;
|
||||
begin
|
||||
Result := align;
|
||||
case align of
|
||||
Alignment.LeftTop: Result := Alignment.RightBottom;
|
||||
Alignment.LeftCenter: Result := Alignment.RightCenter;
|
||||
Alignment.LeftBottom: Result := Alignment.RightTop;
|
||||
Alignment.CenterTop: Result := Alignment.CenterBottom;
|
||||
Alignment.CenterBottom: Result := Alignment.CenterTop;
|
||||
Alignment.RightTop: Result := Alignment.LeftBottom;
|
||||
Alignment.RightCenter: Result := Alignment.LeftCenter;
|
||||
Alignment.RightBottom: Result := Alignment.LeftTop;
|
||||
end;
|
||||
end;}
|
||||
|
||||
(*
|
||||
procedure TextOut(x, y: real; text: string; align: Alignment; angle: real) := DrawText(x, y, 0, 0, text,{ConvertAlign(}align{)},angle);
|
||||
procedure TextOut(x, y: real; text: string; c: GColor; align: Alignment; angle: real) := DrawText(x, y, 0, 0, text, c,{ConvertAlign(}align{)},angle);
|
||||
procedure TextOut(x, y: real; text: integer; align: Alignment; angle: real) := TextOut(x, y, ''+text,align,angle);
|
||||
procedure TextOut(x, y: real; text: integer; c: GColor; align: Alignment; angle: real) := TextOut(x, y, ''+text, c,align,angle);
|
||||
procedure TextOut(x, y: real; text: real; align: Alignment; angle: real) := TextOut(x, y, ''+text,align,angle);
|
||||
procedure TextOut(x, y: real; text: real; c: GColor; align: Alignment; angle: real) := TextOut(x, y, ''+text, c,align,angle);
|
||||
|
||||
procedure TextOut(x, y: real; text: string; f: FontOptions; align: Alignment; angle: real) := DrawText(x, y, 0, 0, text, f, align, angle);
|
||||
|
||||
*)
|
||||
procedure TextOut(x, y: real; text: object; align: Alignment; angle: real)
|
||||
:= DrawText(x, y, 0, 0, text.ToString, align, angle);
|
||||
procedure TextOut(x, y: real; text: object; color: GColor; align: Alignment; angle: real)
|
||||
:= DrawText(x, y, 0, 0, text.ToString, color, align, angle);
|
||||
procedure TextOut(x, y: real; text: object; f: FontOptions; align: Alignment; angle: real)
|
||||
:= DrawText(x, y, 0, 0, text.ToString, f, align, angle);
|
||||
procedure TextOut(pos: Point; text: object; align: Alignment; angle: real)
|
||||
:= TextOut(pos.x, pos.y, text, align, angle);
|
||||
procedure TextOut(pos: Point; text: object; color: GColor; align: Alignment; angle: real)
|
||||
:= TextOut(pos.x, pos.y, text, color, align, angle);
|
||||
procedure TextOut(pos: Point; text: object; f: FontOptions; align: Alignment; angle: real)
|
||||
:= TextOut(pos.x, pos.y, text, f, align, angle);
|
||||
|
||||
type
|
||||
FS = auto class
|
||||
|
|
|
|||
|
|
@ -4259,7 +4259,7 @@ function BillboardText(p: Point3D; Text: string; Fontsize: real) := BillboardTex
|
|||
|
||||
function CoordinateSystem(ArrowsLength, Diameter: real): CoordinateSystemT := Inv(()->CoordinateSystemT.Create(0, 0, 0, arrowslength, diameter));
|
||||
|
||||
function CoordinateSystem(ArrowsLength: real) := CoordinateSystem(arrowslength, arrowslength / 10);
|
||||
function CoordinateSystem(ArrowsLength: real) := CoordinateSystem(arrowslength, (arrowslength / 10).ClampTop(0.2));
|
||||
|
||||
function Text3D(x, y, z: real; Text: string; Height: real; fontname: string; c: Color): TextT := Inv(()->TextT.Create(x, y, z, text, height, fontname, c));
|
||||
|
||||
|
|
|
|||
|
|
@ -260,7 +260,10 @@ type
|
|||
// -----------------------------------------------------
|
||||
//>> Класс Vector # Vector class
|
||||
// -----------------------------------------------------
|
||||
/// Класс Vector
|
||||
|
||||
//{{{--doc: Конец секции 2 }}}
|
||||
|
||||
// Класс Vector
|
||||
{Vector = class
|
||||
public
|
||||
x,y: real;
|
||||
|
|
@ -272,9 +275,7 @@ type
|
|||
static function operator+(v: Vector; p: Point): Point := new Point(p.x+v.x,p.y+v.y);
|
||||
static function operator+(p: Point; v: Vector): Point := new Point(p.x+v.x,p.y+v.y);
|
||||
end;}
|
||||
|
||||
//{{{--doc: Конец секции 2 }}}
|
||||
|
||||
|
||||
|
||||
//{{{doc: Начало секции 3 }}}
|
||||
|
||||
|
|
@ -436,7 +437,7 @@ procedure DrawPolygon(points: array of Point; c: GColor);
|
|||
procedure FillPolygon(points: array of Point; c: GColor);
|
||||
|
||||
// -----------------------------------------------------
|
||||
//>> Класс Bitmap
|
||||
//>> Класс Bitmap # Bitmap class
|
||||
// -----------------------------------------------------
|
||||
///!#
|
||||
/// Класс битового образа
|
||||
|
|
@ -536,34 +537,6 @@ procedure EndFrameBasedAnimation;
|
|||
// -----------------------------------------------------
|
||||
//>> Функции для вывода текста # GraphWPF text functions
|
||||
// -----------------------------------------------------
|
||||
{
|
||||
// Выводит строку в прямоугольник к координатами левого верхнего угла (x,y)
|
||||
procedure DrawText(x, y, w, h: real; text: string; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
// Выводит строку в прямоугольник к координатами левого верхнего угла (x,y)
|
||||
procedure DrawText(x, y, w, h: real; text: string; c: GColor; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
// Выводит целое в прямоугольник к координатами левого верхнего угла (x,y)
|
||||
procedure DrawText(x, y, w, h: real; number: integer; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
// Выводит вещественное в прямоугольник к координатами левого верхнего угла (x,y)
|
||||
procedure DrawText(x, y, w, h: real; number: real; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
// Выводит строку в прямоугольник
|
||||
procedure DrawText(r: GRect; text: string; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
// Выводит целое в прямоугольник
|
||||
procedure DrawText(r: GRect; number: integer; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
// Выводит вещественное в прямоугольник
|
||||
procedure DrawText(r: GRect; number: real; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
// Выводит целое в прямоугольник к координатами левого верхнего угла (x,y)
|
||||
procedure DrawText(x, y, w, h: real; number: integer; c: GColor; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
// Выводит вещественное в прямоугольник к координатами левого верхнего угла (x,y)
|
||||
procedure DrawText(x, y, w, h: real; number: real; c: GColor; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
// Выводит строку в прямоугольник
|
||||
procedure DrawText(r: GRect; text: string; c: GColor; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
// Выводит целое в прямоугольник
|
||||
procedure DrawText(r: GRect; number: integer; c: GColor; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
// Выводит вещественное в прямоугольник
|
||||
procedure DrawText(r: GRect; number: real; c: GColor; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
// Выводит строку в прямоугольник к координатами левого верхнего угла (x,y) указанным шрифтом
|
||||
procedure DrawText(x, y, w, h: real; text: string; f: FontOptions; align: Alignment; angle: real);
|
||||
}
|
||||
|
||||
/// Выводит текстовое представление объекта в прямоугольник размера (w,h) с координатами левого верхнего угла (x,y)
|
||||
procedure DrawText(x, y, w, h: real; text: object; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
|
|
@ -577,21 +550,6 @@ procedure DrawText(rect: GRect; text: object; color: GColor; align: Alignment :=
|
|||
procedure DrawText(x, y, w, h: real; text: object; f: FontOptions; align: Alignment; angle: real);
|
||||
|
||||
|
||||
{// Выводит строку в позицию (x,y)
|
||||
procedure TextOut(x, y: real; text: string; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
|
||||
// Выводит строку в позицию (x,y) цветом c
|
||||
procedure TextOut(x, y: real; text: string; c: GColor; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
|
||||
// Выводит целое в позицию (x,y)
|
||||
procedure TextOut(x, y: real; text: integer; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
|
||||
// Выводит целое в позицию (x,y) цветом c
|
||||
procedure TextOut(x, y: real; text: integer; c: GColor; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
|
||||
// Выводит вещественное в позицию (x,y)
|
||||
procedure TextOut(x, y: real; text: real; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
|
||||
// Выводит вещественное в позицию (x,y) цветом c
|
||||
procedure TextOut(x, y: real; text: real; c: GColor; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
|
||||
// Выводит строку в позицию (x,y) указанным шрифтом
|
||||
procedure TextOut(x, y: real; text: string; f: FontOptions; align: Alignment := Alignment.LeftTop; angle: real := 0.0);}
|
||||
|
||||
/// Выводит текстовое представление объекта в позицию (x,y)
|
||||
procedure TextOut(x, y: real; text: object; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
|
||||
/// Выводит текстовое представление объекта в позицию (x,y) указанным цветом
|
||||
|
|
@ -787,6 +745,50 @@ var AdditionalDrawOnDC: procedure(dc: DrawingContext);
|
|||
procedure __InitModule__;
|
||||
procedure __FinalizeModule__;
|
||||
|
||||
(*
|
||||
// Выводит строку в прямоугольник к координатами левого верхнего угла (x,y)
|
||||
procedure DrawText(x, y, w, h: real; text: string; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
// Выводит строку в прямоугольник к координатами левого верхнего угла (x,y)
|
||||
procedure DrawText(x, y, w, h: real; text: string; c: GColor; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
// Выводит целое в прямоугольник к координатами левого верхнего угла (x,y)
|
||||
procedure DrawText(x, y, w, h: real; number: integer; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
// Выводит вещественное в прямоугольник к координатами левого верхнего угла (x,y)
|
||||
procedure DrawText(x, y, w, h: real; number: real; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
// Выводит строку в прямоугольник
|
||||
procedure DrawText(r: GRect; text: string; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
// Выводит целое в прямоугольник
|
||||
procedure DrawText(r: GRect; number: integer; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
// Выводит вещественное в прямоугольник
|
||||
procedure DrawText(r: GRect; number: real; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
// Выводит целое в прямоугольник к координатами левого верхнего угла (x,y)
|
||||
procedure DrawText(x, y, w, h: real; number: integer; c: GColor; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
// Выводит вещественное в прямоугольник к координатами левого верхнего угла (x,y)
|
||||
procedure DrawText(x, y, w, h: real; number: real; c: GColor; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
// Выводит строку в прямоугольник
|
||||
procedure DrawText(r: GRect; text: string; c: GColor; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
// Выводит целое в прямоугольник
|
||||
procedure DrawText(r: GRect; number: integer; c: GColor; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
// Выводит вещественное в прямоугольник
|
||||
procedure DrawText(r: GRect; number: real; c: GColor; align: Alignment := Alignment.Center; angle: real := 0.0);
|
||||
// Выводит строку в прямоугольник к координатами левого верхнего угла (x,y) указанным шрифтом
|
||||
procedure DrawText(x, y, w, h: real; text: string; f: FontOptions; align: Alignment; angle: real);
|
||||
|
||||
// Выводит строку в позицию (x,y)
|
||||
procedure TextOut(x, y: real; text: string; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
|
||||
// Выводит строку в позицию (x,y) цветом c
|
||||
procedure TextOut(x, y: real; text: string; c: GColor; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
|
||||
// Выводит целое в позицию (x,y)
|
||||
procedure TextOut(x, y: real; text: integer; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
|
||||
// Выводит целое в позицию (x,y) цветом c
|
||||
procedure TextOut(x, y: real; text: integer; c: GColor; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
|
||||
// Выводит вещественное в позицию (x,y)
|
||||
procedure TextOut(x, y: real; text: real; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
|
||||
// Выводит вещественное в позицию (x,y) цветом c
|
||||
procedure TextOut(x, y: real; text: real; c: GColor; align: Alignment := Alignment.LeftTop; angle: real := 0.0);
|
||||
// Выводит строку в позицию (x,y) указанным шрифтом
|
||||
procedure TextOut(x, y: real; text: string; f: FontOptions; align: Alignment := Alignment.LeftTop; angle: real := 0.0);}
|
||||
*)
|
||||
|
||||
implementation
|
||||
|
||||
var FontFamiliesDict := new Dictionary<string,FontFamily>;
|
||||
|
|
|
|||
Binary file not shown.
Loading…
Reference in a new issue