TextDelStart - Zrušení začátku textu


; -----------------------------------------------------------------------------
;                         Delete start of text
; -----------------------------------------------------------------------------
; INPUT:	EBX = pointer to TEXT variable
;		ECX = length of text to delete (in bytes, may be out of range)
; OUTPUT:	CY = memory error (text not changed)
; NOTES:	It limits length to a valid range.
; -----------------------------------------------------------------------------

TextDelStart:	push	edx		; push EDX
		xor	edx,edx		; EDX <- 0, start position
		call	TextDelete	; delete characters from text
		pop	edx		; pop EDX
		ret

Na vstupu funkce obsahuje registr EBX ukazatel na textovou proměnnou. V registru ECX je délka rušené části textu (v bajtech). V případě chyby paměti funkce navrátí příznak chyby CY a text zůstane nezměněn. Funkce omezuje délku textu do platných rozsahů.

Funkce volá funkci TextDelete s nastaveným ukazatelem pozice rušené části na 0 (v registru EDX).