-=> Ÿ p ค ฏpจขฅโแโขฎข โ์ โฅก๏ _Arkady_ ญ  แขฎฅฌ ํชp ญฅ <=-
ฎญ €ฏp 13 1998 12:02, ฏจแ ซ โใโ ช ช-โฎ Arkady Unov ช All:
 AU>  Q1: How I can write word variable on screen in graphic mode? (OutText 
use
 AU> only string type). Maybe i can convert word to string?
     Try so:
ฤฤฤฤอออออออออออออออออออออออออ[ H ็ ซฎ word.pas ]อออออออออออออออออออออออออฤฤฤฤ
Uses Graph,Crt;
Var
 D,M : Integer;
 St  : String;
Const
 Number : Word = 123;
Begin
 D := Detect;
 InitGraph(D,M,'\TP\BGI');
 SetColor(15);
 Str(Number,St); {converts Number to St}
 OutTextXY(300,200,St);
 Repeat Until KeyPressed;
 CloseGraph;
End.
ฤฤฤฤอออออออออออออออออออออออออ[ Šฎญฅๆ word.pas ]ออออออออออออออออออออออออออฤฤฤฤ
                          „ฎ แชฎpฎฉ ขแโpฅ็จ _Arkady_.
                      …แซจ ่ฎ _จญโฅpฅแญฎฅ_ กใคฅโ, ง ๅฎคจ.
                              -=> /ˆฃฎp์/ <=-
--- ƒฎซ๋ฉ„ฅค ขฎงp แโฎฌ 3.00.Alpha2+
---------------