home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 2001 July
/
Chip_2001-07_cd1.bin
/
ctenari
/
Cerny
/
INSTALLF.EXE
/
rar
/
FREETFB
/
DOC
/
CURSORFB.DOC
< prev
next >
Wrap
Text File
|
2001-03-01
|
1KB
|
33 lines
~16|0|05 CursorFB.fbl
|1|05 LinCurs(X,Y,PZn,'²et╪zec');
Parametr X uƒuje minimální levou pozici ke které
se kurzor smí pohybovat sm╪rem vlevo.
Parametr Y urƒuje horní pozici umíst╪ní kurzoru.
Parametr PZn urƒuje maximální poƒet vloºen∞ch znakà
v ²ádku pro kurzor a souƒasn╪ konec psací plochy
(za pravou mez lze dál╪ vkládat text, kter∞ se bude
odrolovávat vlevo).
Vloºen∞ ²et╪zec vrací v prom╪nné SetSys.SetKeyb.
P²ed voláním této funkce je t²eba p²ipravit pro
kurzor plochu bílé barvy, nebo£ kurzor pro vkládání
²et╪zce píτe ƒern∞m písmem na bílé ploτe.
P²íklad:
|1|12 OptionalArea(Active,10,80,500,100,MLGray,DGray,LGray);
|1|12 LinCurs(14,82,490,'');
Funkce je ukonƒena pouºitím klávesy ESC, ENTER a kláves
pro pohyb kurzoru nahoru a dolu (toho se dá vyuºít pro
p²echod na dalτí ²ádek).
Klávesa BackSpace maºe znaky sm╪rem vlevo, klávesa
Delete maºe znaky na pozici kurzoru z prava. Klávesy
pro pohyb kurzoru vlevo a vpravo p²esouvají kurzor
v t╪chto sm╪rech v ²ádku. Spoleƒn╪ s klávesou Ctrl
p²esouvají kurzor p²es jednotlivá slova. Klávesa Tabulátor
odsune text od pozice kurzoru o p╪t mezer vpravo.