EditControl

Objekt EditControl představuje editačnφ prvek.

• property Lines: object Lines - editovan² text.

• property SelText: string - označen² text v bloku. Pokud nenφ nic označeno, je vrßcen prßzdn² řetězec. Hodnotu lze měnit, doporučuje se před změnou zavolat BeginUpdate a po změně EndUpdate. Jedině tak budou sprßvně fungovat přφkazy Undo a Redo.

• property ReadOnly: Boolean - Řφkß, zda text je označen pouze pro čtenφ. Hodnotu nelze měnit.

• property Modified: Boolean - Řφkß, zda byl text od poslednφho ulo₧enφ změněn. Hodnotu nelze měnit.

• property FileName: string - Určuje jmΘno editovanΘho souboru. Pokud jde o dosud neulo₧en² text, je vrßcen prßzdn² řetězec. Hodnotu nelze měnit.

• property WordAtCursorPos: string - vracφ slovo, na kterΘm je umφstěn kursor. Pokud ten je mimo text, je vrßcen prßzdn² řetězec. Hodnotu nelze měnit.

• property CaretX: Integer - Určuje x-ovou pozici kurzoru, hodnotu lze měnit. Pozice je počφtßna od 1.

• property CaretY: Integer - Určuje y-ovou pozici kurzoru, hodnotu lze měnit. Pozice je počφtßna od 1.

• property BlockBeginX: Integer - Určuje x-ovou pozici začßtku bloku, hodnotu lze měnit. Před čtenφm hodnoty se přesvědčte, ₧e SelText je neprßzdn² (jinak čtenß hodnota nemß v²znam). Pozice je počφtßna od 1.

• property BlockBeginY: Integer - Určuje y-ovou pozici začßtku bloku, hodnotu lze měnit. Před čtenφm hodnoty se přesvědčte, ₧e SelText je neprßzdn² (jinak čtenß hodnota nemß v²znam). Pozice je počφtßna od 1.

• property BlockEndX: Integer - Určuje x-ovou pozici konce bloku, hodnotu lze měnit. Před čtenφm hodnoty se přesvědčte, ₧e SelText je neprßzdn² (jinak čtenß hodnota nemß v²znam). Pozice je počφtßna od 1.

• property BlockEndY: Integer - Určuje y-ovou pozici konce bloku, hodnotu lze měnit. Před čtenφm hodnoty se přesvědčte, ₧e SelText je neprßzdn² (jinak čtenß hodnota nemß v²znam). Pozice je počφtßna od 1.

• property SelTextAsLines: object Lines - Zpřφstupňuje označen² text po řßdcφch. Mß v²znam pouze v přφpadě, ₧e je označen nějak² blok (SelText je neprßzdn²).

• property RightEdge: Integer - Vracφ u₧ivatelem nastaven² počet znaků na řßdek (mφsto, kde se kreslφ svislß čßra označujφcφ konec řßdky).

• procedure SelectAll - Označφ cel² text jako blok.

• procedure BeginUpdate - Indikuje začßtek operace s textem (text bude měněn). Bez zavolßnφ tΘto metody nebudou sprßvně fungovat operace Undo a Redo.

• procedure EndUpdate - Indikuje konec operace s textem (text byl měněn). Bez zavolßnφ tΘto metody nebudou sprßvně fungovat operace Undo a Redo.

• procedure SetSelWord - Slovo, na kterΘm je kurzor, označφ jako blok.

• procedure SetCaretXY (CaretX: Integer; CaretY: Integer) - Nastavφ pozici kurzoru. Pozice jsou počφtßny od 1.

• procedure SetBlockBegin (X: Integer; Y: Integer) - Nastavφ začßtek bloku. Pozice jsou počφtßny od 1.

• procedure SetBlockEnd (X: Integer; Y: Integer) - Nastavφ konec bloku. Pozice jsou počφtßny od 1.

• function GetHighlighter: string - vracφ jednoznačn² řetězec identifikujφcφ nastaven² zv²razňovač.

• procedure Undo - Provede operaci Zpět.

• procedure Redo - Opačnß operace k Undo.

• procedure CopyToClipboard - Vlo₧φ označen² text do bloku.

Přφklad:

Nßsledujφcφ funkce si nejprve uchovß pozici kurzoru a v přφpadě, ₧e nenφ označen blok textu označφ jako blok cel² text. Nßsledně v bloku nahradφ některΘ znaky za jinΘ (metoda replace). Po operaci vrßtφ pozici kurzoru zpět. VÜimněte si i volßnφ metody BeginUpdate a EndUpdate. Dφky tomu budou operace vratnΘ pomocφ operace Undo.

function XMLSafeFormToText()

{

  var x = Editor.ActiveEdit.CaretX;

  var y = Editor.ActiveEdit.CaretY;

  Editor.ActiveEdit.BeginUpdate();

  if (Editor.ActiveEdit.SelText == '')

    Editor.ActiveEdit.SelectAll();

  var s = Editor.ActiveEdit.SelText;

  s = s.replace (/&/g, '&');

  s = s.replace (/&lt;/g, '<');

  s = s.replace (/&gt;/g, '>');

  s = s.replace (/&apos;/g, "'");

  s = s.replace (/&quot;/g, '"');

  Editor.ActiveEdit.SelText = s;

  Editor.ActiveEdit.SetCaretXY (x, y);

}