home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 2001 July
/
Chip_2001-07_cd1.bin
/
ctenari
/
Cerny
/
INSTALLF.EXE
/
rar
/
FREETFB
/
DOC
/
INDEX.INV
< prev
next >
Wrap
Text File
|
2001-05-06
|
13KB
|
295 lines
Index procedur a funkcí jednotek TFBPro256^]
^][
√INVICO\INVUVD√ AppFB -^[DOC\APPFB.DOC]$
>Pouºití jednotky<^[DOC\APPFB.DOC]$
IcoApp(X1,Y1,PorIco,'NameObr','TxtIco',BT);^[DOC\APPFB.DOC]$1.1
LoadAppIni('NameIni');^[DOC\APPFB.DOC]$1.4
MoveIcoApp(Kt);^[DOC\APPFB.DOC]$1.3
NullArrApp;^[DOC\APPFB.DOC]$1.0
PosIcoApp(Ktera):Boolean;^[DOC\APPFB.DOC]$1.2
SaveAppIni('NameIni');^[DOC\APPFB.DOC]$1.5
^][
√INVICO\INVUVD√ BgiFont -^[DOC\BGIFONT.DOC]$
BgiFontXY(FX,FY,'FnName',Vel,HoVe,'BRet',BF);^[DOC\BGIFONT.DOC]$
^][
√INVICO\INVUVD√ ButtIco -^[DOC\BUTTICO.DOC]$
IcoNoActive(X1,Y1);^[DOC\BUTTICO.DOC]$1.3
IcoChoice(X1,Y1,StIco,'NIco.lmg');^[DOC\BUTTICO.DOC]$1.1
IcoActive(X1,Y1);^[DOC\BUTTICO.DOC]$1.2
InfoIcoChoice(InX,InY,'InfoIco');^[DOC\BUTTICO.DOC]$1.4
PosIcoChoice(X,Y):Boolean;^[DOC\BUTTICO.DOC]$1.5
^][
√INVICO\INVUVD√ CalcFB -^[DOC\CALCFB.DOC]$
>Pouºití jednotky<^[DOC\CALCFB.DOC]$
CalculatXY(LKK,HKK);^[DOC\CALCFB.DOC]$1.7
HexToWord('Hexa'):word;^[DOC\CALCFB.DOC]$1.5
LongToHexa(L,mist):string;^[DOC\CALCFB.DOC]$1.6
NumTotal('st1','st2'):string;^[DOC\CALCFB.DOC]$1.1
NumDeduct('st1','st2'):string;^[DOC\CALCFB.DOC]$1.2
NumDivision('st1','st2'):string;^[DOC\CALCFB.DOC]$1.3
NumMultiply('st1','st2'):string;^[DOC\CALCFB.DOC]$1.4
^][
√INVICO\INVUVD√ ColIco -^[DOC\COLICO.DOC]$
BlankColumIco;^[DOC\COLICO.DOC]$B.1
ColumIco('Navesti','Inf',Aktivita);^[DOC\COLICO.DOC]$I.2
InfoColumIco;^[DOC\COLICO.DOC]$I.2
LockColumIco(OFFIco);^[DOC\COLICO.DOC]$L.1
NewColumIcoXY(PX,PY);^[DOC\COLICO.DOC]$N.1
OpenColumIco(Area);^[DOC\COLICO.DOC]$O.1
OrigColumIco(Ktr);^[DOC\COLICO.DOC]$O.2
PosColumIco(Ktera):Boolean;^[DOC\COLICO.DOC]$P.1
PosAreaColumIco:Boolean;^[DOC\COLICO.DOC]$P.2
UnLockColumIco(ONIco);^[DOC\COLICO.DOC]$U.1
^][
√INVICO\INVUVD√ CompFB -^[DOC\COMPFB.DOC]$
AssignComp(P,X,Y,X2,Y2,SS,TS,BP);^[DOC\COMPFB.DOC]$A.1
CompItem(P,'Hlav');^[DOC\COMPFB.DOC]$I.1
CompButt(P,'Hlav');^[DOC\COMPFB.DOC]$B.1
NewComponent;^[DOC\COMPFB.DOC]$N.1
OpenComponent('CIco.lmg','Nav');^[DOC\COMPFB.DOC]$O.1
OrigCompButt(P);^[DOC\COMPFB.DOC]$O.2
PosComp(P):Boolean;^[DOC\COMPFB.DOC]$P.1
PosCompButt(P):Boolean;^[DOC\COMPFB.DOC]$P.2
^][
√INVICO\INVUVD√ CursorFB -^[DOC\CURSORFB.DOC]$
LinCurs(LC,HC,MPZ,'RetC');^[DOC\CURSORFB.DOC]$
^][
√INVICO\INVUVD√ DosFB -^[DOC\DOSFB.DOC]$
FileNotFound('NameSoub'):Boolean;^[DOC\DOSFB.DOC]$F.1
FileExist('NameSoub'):Boolean;^[DOC\DOSFB.DOC]$F.2
GetExactTime:string;^[DOC\DOSFB.DOC]$G.1
ChannelOpen(Devices:Boolean):Byte;^[DOC\DOSFB.DOC]$CH.1
SetExactTime(NH,NM,NS);^[DOC\DOSFB.DOC]$S.1
SetExactDate(RD,MD,DD);^[DOC\DOSFB.DOC]$S.2
ThisDay:string;^[DOC\DOSFB.DOC]$T.1
^][
√INVICO\INVUVD√ DialogFB -^[DOC\DIALOGFB.DOC]$
AssignDialog('AIco.lmg','StrD',BD,TD,'ObrDial');^[DOC\DIALOGFB.DOC]$A.1
CloseDialog;^[DOC\DIALOGFB.DOC]$C.1
DialogItem('Pol','Data',MData,NabAno,PRNab,'JMSouNab');^[DOC\DIALOGFB.DOC]$D.3
DialogButt(PorTl,'Hlsk');^[DOC\DIALOGFB.DOC]$D.2
DialogLineXY(DX,DY,CisR,'StrPol','StrData',^[DOC\DIALOGFB.DOC]$D.4
MaxDt,NabAno,PRNab,'JMSouNab');^[DOC\DIALOGFB.DOC]$D.4
DialogEntry(NoCis);^[DOC\DIALOGFB.DOC]$D.1
OpenDialog;^[DOC\DIALOGFB.DOC]$O.1
PosDialogLine(CisD):Boolean;^[DOC\DIALOGFB.DOC]$P.1
SelectDialog:integer;^[DOC\DIALOGFB.DOC]$S.1
WinDialogXY(LD,HD);^[DOC\DIALOGFB.DOC]$W.1
^][
√INVICO\INVUVD√ DirectFB -^[DOC\DIRECTFB.DOC]$
AssignDirectShow('Cesta','Maska');^[DOC\DIRECTFB.DOC]$1.1
DirectShow(LKA,HKA);^[DOC\DIRECTFB.DOC]$1.2
^][
√INVICO\INVUVD√ FPalette -^[DOC\FPALETTE.DOC]$
>Pouºití jednotky<^[DOC\FPALETTE.DOC]$
GetPalette(pal);^[DOC\FPALETTE.DOC]$G.1
PaletteFB;^[DOC\FPALETTE.DOC]$P.1
SetPalRGB(N,R,G,B);^[DOC\FPALETTE.DOC]$S.2
^][
√INVICO\INVUVD√ FrameFB -^[DOC\FRAMEFB.DOC]$
TextFrame(St,FX,FY,FX2,FY2,'IcoF.lmg','Hlav',SS,TS,BT);^[DOC\FRAMEFB.DOC]$
^][
√INVICO\INVUVD√ GraphFBP -^[DOC\GRAPHFBP.DOC]$
BmgToArea(X1,Y1,X2,Y2,RMaxX,RMaxY,'FName.bmg',Typ,BP);^[DOC\GRAPHFBP.DOC]$B.2
DrawRectangle(LK,HK,PK,SK,BarvaR);^[DOC\GRAPHFBP.DOC]$D.2
DisposeFB;^[DOC\GRAPHFBP.DOC]$D.1
EndLoop:Boolean;^[DOC\GRAPHFBP.DOC]$E.1
ErrInfoLine('TTl','FTl','Chyba');^[DOC\GRAPHFBP.DOC]$E.2
ErrFileInfoLine('FileTest'):Boolean;^[DOC\GRAPHFBP.DOC]$E.3
FillArea(LP,HP,PP,SP,BP);^[DOC\GRAPHFBP.DOC]$F.4
FillPattern(LKV,HKV,PKV,SKV,BV);^[DOC\GRAPHFBP.DOC]$F.6
FillInfoLine;^[DOC\GRAPHFBP.DOC]$F.5
GetPicture(L,H,P,S,Pam);^[DOC\GRAPHFBP.DOC]$G.4
GraphDriveName:string;^[DOC\GRAPHFBP.DOC]$G.6
GetPointXY(CBL,CBH):byte;^[DOC\GRAPHFBP.DOC]$G.5
GetLmgSize('IconName.LMG');^[DOC\GRAPHFBP.DOC]$G.1
GetBmgSize('BmgName.BMG');^[DOC\GRAPHFBP.DOC]$G.2
InitFB;^[DOC\GRAPHFBP.DOC]$I.1
InstallUserPalette(pal,'NamePal.pal');^[DOC\GRAPHFBP.DOC]$I.2
LenSysF('StDe'):word;^[DOC\GRAPHFBP.DOC]$L.1
LoadBmg(PX1,PY1,FMaxY,'NazUnd.bmg',TypZ,CP);^[DOC\GRAPHFBP.DOC]$L.9
LoadLmg(Col,Lin,'INam.lmg',TypPut,CP);^[DOC\GRAPHFBP.DOC]$L.8
LmgToArea(X1,Y1,X2,Y2,RMaxX,RMaxY,'FName.lmg',Typ,BP);^[DOC\GRAPHFBP.DOC]$L.3
LoadArea(PX1,PY1,'NazUnd.und',TypV);^[DOC\GRAPHFBP.DOC]$L.4
LoadSubF('FontName.fnp');^[DOC\GRAPHFBP.DOC]$L.6
LoadSysF('CharName.fnd');^[DOC\GRAPHFBP.DOC]$L.5
LoadConF('CharName.fnd');^[DOC\GRAPHFBP.DOC]$L.7
LenSubF('StDe'):word;^[DOC\GRAPHFBP.DOC]$L.1
OptionalArea(Stav,OX1,OY1,OX2,OY2,SA,TA,BA);^[DOC\GRAPHFBP.DOC]$O.2
OpeningOptional('OIco.lmg','Title',TFn,'NFn.fnp/fnd');^[DOC\GRAPHFBP.DOC]$O.1
PictureSize(L,H,P,S):word;^[DOC\GRAPHFBP.DOC]$P.2
PutPicture(L,H,Pam,Typ);^[DOC\GRAPHFBP.DOC]$P.4
PosCursor(KMinX,KMaxX,KMinY,KMaxY):Boolean;^[DOC\GRAPHFBP.DOC]$P.3
SetMargin(MaxX);^[DOC\GRAPHFBP.DOC]$S.6
SetPointXY(Col,Lin,Barva);^[DOC\GRAPHFBP.DOC]$S.8
SetLineType(Ln,N,Dw);^[DOC\GRAPHFBP.DOC]$S.9
SetFixTfb(MlSec);^[DOC\GRAPHFBP.DOC]$S.10
SaveArea(PX1,PY1,PX2,PY2,'NazUnd.und');^[DOC\GRAPHFBP.DOC]$S.1
SaveBmg(PX1,PY1,PX2,PY2,'NazUnd.bmg');^[DOC\GRAPHFBP.DOC]$S.2
SaveUserPalette(pal,'NamePal.pal');^[DOC\GRAPHFBP.DOC]$S.3
TextGraphXY(XT,YT,TypV,TypF,'RetT',BT);^[DOC\GRAPHFBP.DOC]$T.2
WinOptional(PlYes,TlEsc,X1,Y1,X2,Y2,'WIco.lmg','Title',PB:byte);^[DOC\GRAPHFBP.DOC]$W.1
WriteInfoLine('InfoTxt');^[DOC\GRAPHFBP.DOC]$W.3
WinChoiceXY(X,Y,'CIco.lmg','Tl_1','Tl_2','Hlaseni');^[DOC\GRAPHFBP.DOC]$W.2
^][
√INVICO\INVUVD√ GrMouse -^[DOC\GRMOUSE.DOC]$
>Pouºití jednotky<^[DOC\GRMOUSE.DOC]$
CursorBeyond(LME,PME,HME,SME):Boolean;^[DOC\GRMOUSE.DOC]$1.13
CursorReset;^[DOC\GRMOUSE.DOC]$1.11
CursorType(TypC);^[DOC\GRMOUSE.DOC]$1.17
CursorOn;^[DOC\GRMOUSE.DOC]$1.18
CursorOff;^[DOC\GRMOUSE.DOC]$1.20
DriveMouse:Boolean;^[DOC\GRMOUSE.DOC]$1.4
GetCursorXY(button,horiz,vert);^[DOC\GRMOUSE.DOC]$1.1
InitCursor;^[DOC\GRMOUSE.DOC]$1.16
LeftMousButton:Boolean;^[DOC\GRMOUSE.DOC]$1.14
MousWait;^[DOC\GRMOUSE.DOC]$1.9
MouseSet(hor,ver);^[DOC\GRMOUSE.DOC]$1.10
MouseOutSide(LME,PME,HME,SME):Boolean;^[DOC\GRMOUSE.DOC]$1.12
RightMousButton:Boolean;^[DOC\GRMOUSE.DOC]$1.15
SetCursorXY(horiz,vert);^[DOC\GRMOUSE.DOC]$1.2
SetGrCursorXY(horiz,vert);^[DOC\GRMOUSE.DOC]$1.3
SetHor(minimum,maximum);^[DOC\GRMOUSE.DOC]$1.5
SetVert(minimum,maximum);^[DOC\GRMOUSE.DOC]$1.6
SetGrHor(minimum,maximum);^[DOC\GRMOUSE.DOC]$1.7
SetGrVert(minimum,maximum);^[DOC\GRMOUSE.DOC]$1.8
WatchCursor;^[DOC\GRMOUSE.DOC]$1.19
^][
√INVICO\INVUVD√ IcoUnit -^[DOC\ICOUNIT.DOC]$
LoadIco(X,Y,'ikona.ico');^[DOC\ICOUNIT.DOC]$
^][
√INVICO\INVUVD√ InfLabel -^[DOC\INFLABEL.DOC]$
>Pouºití jednotky<^[DOC\INFLABEL.DOC]$
InfoLabel(X,Y,X2,Y2,'InfIco');^[DOC\INFLABEL.DOC]$1.1
^][
√INVICO\INVUVD√ InfoFB -^[DOC\INFOFB.DOC]$
LineInfo('Text');^[DOC\INFOFB.DOC]$1.2
NewInfo;^[DOC\INFOFB.DOC]$1.1
WinInfoXY(LKI,HKI,'Tl1','Tl2','Iko.lmg');^[DOC\INFOFB.DOC]$1.3
^][
√INVICO\INVUVD√ InputFB -^[DOC\INPUTFB.DOC]$
InputLine(X,Y,'Ico.lmg','Hlav','StrInp','StrCur',MaxZ);^[DOC\INPUTFB.DOC]$1.1
^][
√INVICO\INVUVD√ IoErrFB -^[DOC\IOERRFB.DOC]$
IOError:Boolean;^[DOC\IOERRFB.DOC]$
^][
√INVICO\INVUVD√ KeybFB -^[DOC\KEYBFB.DOC]$
Beep(Ton,Delka);^[DOC\KEYBFB.DOC]$B.1
CapsLockOn;^[DOC\KEYBFB.DOC]$C.1
CapsLockOff;^[DOC\KEYBFB.DOC]$C.2
KeyWait;^[DOC\KEYBFB.DOC]$K.2
KeyCode:Char;^[DOC\KEYBFB.DOC]$K.1
NumToStr(M_L):string;^[DOC\KEYBFB.DOC]$N.3
NumLockOn;^[DOC\KEYBFB.DOC]$N.2
NumLockOff;^[DOC\KEYBFB.DOC]$N.1
Pause(Delka);^[DOC\KEYBFB.DOC]$P.1
StrToNum('RN'):integer;^[DOC\KEYBFB.DOC]$S.1
^][
√INVICO\INVUVD√ LinIco -^[DOC\LINICO.DOC]$
BlankLineIco;^[DOC\LINICO.DOC]$B.1
InfoLineIco;^[DOC\LINICO.DOC]$I.2
LineIco('Navesti.lmg','Info',Aktivita);^[DOC\LINICO.DOC]$I.2
LockLineIco(OFFIco);^[DOC\LINICO.DOC]$L.1
NewLineIcoXY(PX,PY);^[DOC\LINICO.DOC]$N.1
OpenLineIco(Area);^[DOC\LINICO.DOC]$O.1
OrigLineIco(Ktr);^[DOC\LINICO.DOC]$O.2
PosLineIco(Ktera):Boolean;^[DOC\LINICO.DOC]$P.1
PosAreaLineIco:Boolean;^[DOC\LINICO.DOC]$P.2
UnLockLineIco(ONIco);^[DOC\LINICO.DOC]$U.1
^][
√INVICO\INVUVD√ LittEdit -^[DOC\LITTEDIT.DOC]$
WinTextXY(X,Y,PocZn,PocRa,'SOUBOR.TXT');^[DOC\LITTEDIT.DOC]$
^][
√INVICO\INVUVD√ MenuFB -^[DOC\MENUFB.DOC]$
AssignMenu(SS,TS,BP);^[DOC\MENUFB.DOC]$A.1
CloseMenu(X,Y);^[DOC\MENUFB.DOC]$C.1
MenuLine;^[DOC\MENUFB.DOC]$M.3
MenuItem('TextPol',VLB,'INFO');^[DOC\MENUFB.DOC]$M.2
NewMenu;^[DOC\MENUFB.DOC]$M.1
OpenMenu(X,Y);^[DOC\MENUFB.DOC]$O.1
RepMenu(X,Y);^[DOC\MENUFB.DOC]$R.1
SelectItem:integer;^[DOC\MENUFB.DOC]$S.1
^][
√INVICO\INVUVD√ OButtFB -^[DOC\OBUTTFB.DOC]$
AutoButt(Por,Stav,X,Y,'Text',SS,TS,BP);^[DOC\OBUTTFB.DOC]$A.5
InfoAutoButt(Kt,'InfAB');^[DOC\OBUTTFB.DOC]$I.1
MainButt(Stav,X1,Y1,X2,Y2,'Text',SS,TS,BP);^[DOC\OBUTTFB.DOC]$M.1
OrigAutoButt(Kt);^[DOC\OBUTTFB.DOC]$O.1
PosAutoButt(Kt):Boolean;^[DOC\OBUTTFB.DOC]$P.1
^][
√INVICO\INVUVD√ OfferFB -^[DOC\OFFERFB.DOC]$
SetWinUserOffer;^[DOC\OFFERFB.DOC]$1.3
WinUserOfferXY(X,Y,MPZ,'OIco.lmg','Hlav','Sou.inv');^[DOC\OFFERFB.DOC]$1.1
WinOfferXY(X,Y,MPZ,'Sou.inv');^[DOC\OFFERFB.DOC]$1.2
^][
√INVICO\INVUVD√ OneSetFB -^[DOC\ONESETFB.DOC]$
AssignButtSet('Poc','Hod');^[DOC\ONESETFB.DOC]$A.1
AssignNumSet('Poc','Hod');^[DOC\ONESETFB.DOC]$A.2
ButtonSet(Stav,SX,SY,Por,'TxtSet',BT);^[DOC\ONESETFB.DOC]$B.1
GetNumberEntry(PS):integer;^[DOC\ONESETFB.DOC]$G.1
ChoiceButtSet(CisSet):Boolean;^[DOC\ONESETFB.DOC]$CH.1
PosButtSet(CisSet):Boolean;^[DOC\ONESETFB.DOC]$P.1
PosSetNumber(PS):Boolean;^[DOC\ONESETFB.DOC]$P.2
SetNumber(SX,SY,KM,Por,'TxtSet',C1,C2);^[DOC\ONESETFB.DOC]$S.1
^][
√INVICO\INVUVD√ OneSrvX -^[DOC\ONESRVFB.DOC]$
AssignOneSurvey('Hod');^[DOC\ONESRVFB.DOC]$A.1
OneSurveyXY(MaxZn,'CisSou');^[DOC\ONESRVFB.DOC]$1.3
PosSurvey:Boolean;^[DOC\ONESRVFB.DOC]$P.1
SetOneSurvey(SX,SY,SX2,PR,PZ,'SOffr');^[DOC\ONESRVFB.DOC]$1.2
^][
√INVICO\INVUVD√ PgfUnit -^[DOC\PGFUNIT.DOC]$
GetPgfSize('PgfName.pgf');^[DOC\PGFUNIT.DOC]$1.1
LoadPgf(X1,Y1,FMaxY,'NamePgf.pgf',TypZ,CP);^[DOC\PGFUNIT.DOC]$1.3
PgfToArea(X1,Y1,MaxX,MaxY,'NamePgf.pgf');^[DOC\PGFUNIT.DOC]$1.4
SavePgf(X1,Y1,X2,Y2,'NamePgf.pgf');^[DOC\PGFUNIT.DOC]$1.2
^][
√INVICO\INVUVD√ PrintFB -^[DOC\PRINTFB.DOC]$
InitPrinter(LK,TG);^[DOC\PRINTFB.DOC]$1.1
PrinterNotFound:Boolean;^[DOC\PRINTFB.DOC]$1.3
PrinterNotCom:Boolean;^[DOC\PRINTFB.DOC]$1.4
PrintScreen(X1,Y1,X2,Y2,QLT);^[DOC\PRINTFB.DOC]$1.2
^][
√INVICO\INVUVD√ SectorFB -^[DOC\SECTORFB.DOC]$
LoadPattern('SouP.pat');^[DOC\SECTORFB.DOC]$1.9
PattSlice(X,Y,Zac,Kon,X2,Y2,BV,TypPatt);^[DOC\SECTORFB.DOC]$1.5
PattRectangle(X,Y,X2,Y2,BV,TypPatt);^[DOC\SECTORFB.DOC]$1.6
PattEllipse(X,Y,X2,Y2,BV,TypPatt);^[DOC\SECTORFB.DOC]$1.7
PattArea(X,Y,X2,Y2,BV,TypPatt);^[DOC\SECTORFB.DOC]$1.8
SPattSlice(X,Y,Zac,Kon,X2,Y2,BV,TypPatt);^[DOC\SECTORFB.DOC]$1.1
SPattRectangle(X,Y,X2,Y2,BV,TypPatt);^[DOC\SECTORFB.DOC]$1.2
SPattEllipse(X,Y,X2,Y2,BV,TypPatt);^[DOC\SECTORFB.DOC]$1.3
SPattArea(X,Y,X2,Y2,BV,TypPatt);^[DOC\SECTORFB.DOC]$1.4
^][
√INVICO\INVUVD√ SetMous -^[DOC\MOUSE.DOC]$
SetToMous;^[DOC\MOUSE.DOC]$
^][
√INVICO\INVUVD√ StringFB -^[DOC\STRINGFB.DOC]$
CopyPos('VRet','OdRet','DoRet'):string;^[DOC\STRINGFB.DOC]$1.1
DelPos('VRet','PRet');^[DOC\STRINGFB.DOC]$1.2
FixStr('String',Delka):string;^[DOC\STRINGFB.DOC]$1.3
FixPosStr('VRet','PosR'):string;^[DOC\STRINGFB.DOC]$1.4
FirstChar('LRet','char'):integer;^[DOC\STRINGFB.DOC]$1.10
ChrTrans('LRet','PuvZn','NovZn'):string;^[DOC\STRINGFB.DOC]$1.13
InsPos('VRet','PosR','NRet');^[DOC\STRINGFB.DOC]$1.5
LastChar('LRet','char'):integer;^[DOC\STRINGFB.DOC]$1.11
MoreSpace('LRet'):integer;^[DOC\STRINGFB.DOC]$1.14
PosStr('LRet','HRet'):integer;^[DOC\STRINGFB.DOC]$1.12
Proper('VRet'):string;^[DOC\STRINGFB.DOC]$1.15
PosDigit('VRet'):integer;^[DOC\STRINGFB.DOC]$1.16
PutLfSpace('VRet',Poc);^[DOC\STRINGFB.DOC]$1.17
PutRgSpace('VRet',Poc);^[DOC\STRINGFB.DOC]$1.18
SwapWord('VRet','PRet','NRet');^[DOC\STRINGFB.DOC]$1.6
StrLow('string'):string;^[DOC\STRINGFB.DOC]$1.9
StrUp('string'):string;^[DOC\STRINGFB.DOC]$1.7
StrUpCz('string'):string;^[DOC\STRINGFB.DOC]$1.8
^][
√INVICO\INVUVD√ TextFB -^[DOC\TEXTFB.DOC]$
WinTextXY(X,Y,MX,MY,'JmSou','MKlic');^[DOC\TEXTFB.DOC]$1.1
^][
√INVICO\INVUVD√ TimeDat -^[DOC\TIMEDAT.DOC]$
SetDateTime;^[DOC\TIMEDAT.DOC]$
ShowTime;^[DOC\TIMEDAT.DOC]$
^][
^]