mirror of
https://github.com/reactos/reactos.git
synced 2024-11-18 21:13:52 +00:00
1113 lines
34 KiB
C
1113 lines
34 KiB
C
/* ------------- editbox.c ------------ */
|
|
#include "dflat.h"
|
|
|
|
#define EditBufLen(wnd) (DfIsMultiLine(wnd) ? DF_EDITLEN : DF_ENTRYLEN)
|
|
#define SetLinePointer(wnd, ln) (wnd->CurrLine = ln)
|
|
#define isWhite(c) ((c)==' '||(c)=='\n')
|
|
/* ---------- local prototypes ----------- */
|
|
static void SaveDeletedText(DFWINDOW, char *, int);
|
|
static void Forward(DFWINDOW);
|
|
static void Backward(DFWINDOW);
|
|
static void End(DFWINDOW);
|
|
static void Home(DFWINDOW);
|
|
static void Downward(DFWINDOW);
|
|
static void Upward(DFWINDOW);
|
|
static void StickEnd(DFWINDOW);
|
|
static void NextWord(DFWINDOW);
|
|
static void PrevWord(DFWINDOW);
|
|
static void ModTextPointers(DFWINDOW, int, int);
|
|
static void SetAnchor(DFWINDOW, int, int);
|
|
/* -------- local variables -------- */
|
|
static BOOL KeyBoardMarking, ButtonDown;
|
|
static BOOL TextMarking;
|
|
static int ButtonX, ButtonY;
|
|
static int PrevY = -1;
|
|
|
|
/* ----------- DFM_CREATE_WINDOW Message ---------- */
|
|
static int CreateWindowMsg(DFWINDOW wnd)
|
|
{
|
|
int rtn = DfBaseWndProc(DF_EDITBOX, wnd, DFM_CREATE_WINDOW, 0, 0);
|
|
wnd->MaxTextLength = DF_MAXTEXTLEN+1;
|
|
wnd->textlen = EditBufLen(wnd);
|
|
wnd->InsertMode = TRUE;
|
|
DfSendMessage(wnd, DFM_CLEARTEXT, 0, 0);
|
|
return rtn;
|
|
}
|
|
/* ----------- DFM_SETTEXT Message ---------- */
|
|
static int SetTextMsg(DFWINDOW wnd, DF_PARAM p1)
|
|
{
|
|
int rtn = FALSE;
|
|
if (strlen((char *)p1) <= wnd->MaxTextLength)
|
|
rtn = DfBaseWndProc(DF_EDITBOX, wnd, DFM_SETTEXT, p1, 0);
|
|
return rtn;
|
|
}
|
|
/* ----------- DFM_CLEARTEXT Message ------------ */
|
|
static int ClearTextMsg(DFWINDOW wnd)
|
|
{
|
|
int rtn = DfBaseWndProc(DF_EDITBOX, wnd, DFM_CLEARTEXT, 0, 0);
|
|
unsigned blen = EditBufLen(wnd)+2;
|
|
wnd->text = DfRealloc(wnd->text, blen);
|
|
memset(wnd->text, 0, blen);
|
|
wnd->wlines = 0;
|
|
wnd->CurrLine = 0;
|
|
wnd->CurrCol = 0;
|
|
wnd->WndRow = 0;
|
|
wnd->wleft = 0;
|
|
wnd->wtop = 0;
|
|
wnd->textwidth = 0;
|
|
wnd->TextChanged = FALSE;
|
|
return rtn;
|
|
}
|
|
/* ----------- DFM_ADDTEXT Message ---------- */
|
|
static int AddTextMsg(DFWINDOW wnd, DF_PARAM p1, DF_PARAM p2)
|
|
{
|
|
int rtn = FALSE;
|
|
if (strlen((char *)p1)+wnd->textlen <= wnd->MaxTextLength) {
|
|
rtn = DfBaseWndProc(DF_EDITBOX, wnd, DFM_ADDTEXT, p1, p2);
|
|
if (rtn != FALSE) {
|
|
if (!DfIsMultiLine(wnd)) {
|
|
wnd->CurrLine = 0;
|
|
wnd->CurrCol = strlen((char *)p1);
|
|
if (wnd->CurrCol >= DfClientWidth(wnd)) {
|
|
wnd->wleft = wnd->CurrCol-DfClientWidth(wnd);
|
|
wnd->CurrCol -= wnd->wleft;
|
|
}
|
|
wnd->BlkEndCol = wnd->CurrCol;
|
|
DfSendMessage(wnd, DFM_KEYBOARD_CURSOR,
|
|
DfWndCol, wnd->WndRow);
|
|
}
|
|
}
|
|
}
|
|
return rtn;
|
|
}
|
|
/* ----------- DFM_GETTEXT Message ---------- */
|
|
static int GetTextMsg(DFWINDOW wnd, DF_PARAM p1, DF_PARAM p2)
|
|
{
|
|
char *cp1 = (char *)p1;
|
|
char *cp2 = wnd->text;
|
|
if (cp2 != NULL) {
|
|
while (p2-- && *cp2 && *cp2 != '\n')
|
|
*cp1++ = *cp2++;
|
|
*cp1 = '\0';
|
|
return TRUE;
|
|
}
|
|
return FALSE;
|
|
}
|
|
/* ----------- DFM_SETTEXTLENGTH Message ---------- */
|
|
static int SetTextLengthMsg(DFWINDOW wnd, unsigned int len)
|
|
{
|
|
if (++len < DF_MAXTEXTLEN) {
|
|
wnd->MaxTextLength = len;
|
|
if (len < wnd->textlen) {
|
|
wnd->text=DfRealloc(wnd->text, len+2);
|
|
wnd->textlen = len;
|
|
*((wnd->text)+len) = '\0';
|
|
*((wnd->text)+len+1) = '\0';
|
|
DfBuildTextPointers(wnd);
|
|
}
|
|
return TRUE;
|
|
}
|
|
return FALSE;
|
|
}
|
|
/* ----------- DFM_KEYBOARD_CURSOR Message ---------- */
|
|
static void KeyboardCursorMsg(DFWINDOW wnd, DF_PARAM p1, DF_PARAM p2)
|
|
{
|
|
wnd->CurrCol = (int)p1 + wnd->wleft;
|
|
wnd->WndRow = (int)p2;
|
|
wnd->CurrLine = (int)p2 + wnd->wtop;
|
|
if (wnd == DfInFocus) {
|
|
if (DfCharInView(wnd, (int)p1, (int)p2))
|
|
DfSendMessage(NULL, DFM_SHOW_CURSOR,
|
|
(wnd->InsertMode && !TextMarking), 0);
|
|
else
|
|
DfSendMessage(NULL, DFM_HIDE_CURSOR, 0, 0);
|
|
}
|
|
}
|
|
/* ----------- SIZE Message ---------- */
|
|
int SizeMsg(DFWINDOW wnd, DF_PARAM p1, DF_PARAM p2)
|
|
{
|
|
int rtn = DfBaseWndProc(DF_EDITBOX, wnd, DFM_DFM_SIZE, p1, p2);
|
|
if (DfWndCol > DfClientWidth(wnd)-1)
|
|
wnd->CurrCol = DfClientWidth(wnd)-1 + wnd->wleft;
|
|
if (wnd->WndRow > DfClientHeight(wnd)-1) {
|
|
wnd->WndRow = DfClientHeight(wnd)-1;
|
|
SetLinePointer(wnd, wnd->WndRow+wnd->wtop);
|
|
}
|
|
DfSendMessage(wnd, DFM_KEYBOARD_CURSOR, DfWndCol, wnd->WndRow);
|
|
return rtn;
|
|
}
|
|
/* ----------- DFM_SCROLL Message ---------- */
|
|
static int ScrollMsg(DFWINDOW wnd, DF_PARAM p1)
|
|
{
|
|
int rtn = FALSE;
|
|
if (DfIsMultiLine(wnd)) {
|
|
rtn = DfBaseWndProc(DF_EDITBOX,wnd,DFM_SCROLL,p1,0);
|
|
if (rtn != FALSE) {
|
|
if (p1) {
|
|
/* -------- scrolling up --------- */
|
|
if (wnd->WndRow == 0) {
|
|
wnd->CurrLine++;
|
|
StickEnd(wnd);
|
|
}
|
|
else
|
|
--wnd->WndRow;
|
|
}
|
|
else {
|
|
/* -------- scrolling down --------- */
|
|
if (wnd->WndRow == DfClientHeight(wnd)-1) {
|
|
if (wnd->CurrLine > 0)
|
|
--wnd->CurrLine;
|
|
StickEnd(wnd);
|
|
}
|
|
else
|
|
wnd->WndRow++;
|
|
}
|
|
DfSendMessage(wnd,DFM_KEYBOARD_CURSOR,DfWndCol,wnd->WndRow);
|
|
}
|
|
}
|
|
return rtn;
|
|
}
|
|
/* ----------- DFM_HORIZSCROLL Message ---------- */
|
|
static int HorizScrollMsg(DFWINDOW wnd, DF_PARAM p1)
|
|
{
|
|
int rtn = FALSE;
|
|
char *currchar = DfCurrChar;
|
|
if (!(p1 &&
|
|
wnd->CurrCol == wnd->wleft && *currchar == '\n')) {
|
|
rtn = DfBaseWndProc(DF_EDITBOX, wnd, DFM_HORIZSCROLL, p1, 0);
|
|
if (rtn != FALSE) {
|
|
if (wnd->CurrCol < wnd->wleft)
|
|
wnd->CurrCol++;
|
|
else if (DfWndCol == DfClientWidth(wnd))
|
|
--wnd->CurrCol;
|
|
DfSendMessage(wnd,DFM_KEYBOARD_CURSOR,DfWndCol,wnd->WndRow);
|
|
}
|
|
}
|
|
return rtn;
|
|
}
|
|
/* ----------- DFM_SCROLLPAGE Message ---------- */
|
|
static int ScrollPageMsg(DFWINDOW wnd, DF_PARAM p1)
|
|
{
|
|
int rtn = FALSE;
|
|
if (DfIsMultiLine(wnd)) {
|
|
rtn = DfBaseWndProc(DF_EDITBOX, wnd, DFM_SCROLLPAGE, p1, 0);
|
|
SetLinePointer(wnd, wnd->wtop+wnd->WndRow);
|
|
StickEnd(wnd);
|
|
DfSendMessage(wnd, DFM_KEYBOARD_CURSOR,DfWndCol, wnd->WndRow);
|
|
}
|
|
return rtn;
|
|
}
|
|
/* ----------- HORIZSCROLLPAGE Message ---------- */
|
|
static int HorizPageMsg(DFWINDOW wnd, DF_PARAM p1)
|
|
{
|
|
int rtn = DfBaseWndProc(DF_EDITBOX, wnd, DFM_HORIZPAGE, p1, 0);
|
|
if ((int) p1 == FALSE) {
|
|
if (wnd->CurrCol > wnd->wleft+DfClientWidth(wnd)-1)
|
|
wnd->CurrCol = wnd->wleft+DfClientWidth(wnd)-1;
|
|
}
|
|
else if (wnd->CurrCol < wnd->wleft)
|
|
wnd->CurrCol = wnd->wleft;
|
|
DfSendMessage(wnd, DFM_KEYBOARD_CURSOR, DfWndCol, wnd->WndRow);
|
|
return rtn;
|
|
}
|
|
/* ----- Extend the marked block to the new x,y position ---- */
|
|
static void ExtendBlock(DFWINDOW wnd, int x, int y)
|
|
{
|
|
int bbl, bel;
|
|
int ptop = min(wnd->BlkBegLine, wnd->BlkEndLine);
|
|
int pbot = max(wnd->BlkBegLine, wnd->BlkEndLine);
|
|
char *lp = DfTextLine(wnd, wnd->wtop+y);
|
|
int len = (int) (strchr(lp, '\n') - lp);
|
|
x = max(0, min(x, len));
|
|
y = max(0, y);
|
|
wnd->BlkEndCol = min(len, x+wnd->wleft);
|
|
wnd->BlkEndLine = y+wnd->wtop;
|
|
DfSendMessage(wnd, DFM_KEYBOARD_CURSOR, wnd->BlkEndCol, wnd->BlkEndLine);
|
|
bbl = min(wnd->BlkBegLine, wnd->BlkEndLine);
|
|
bel = max(wnd->BlkBegLine, wnd->BlkEndLine);
|
|
while (ptop < bbl) {
|
|
DfWriteTextLine(wnd, NULL, ptop, FALSE);
|
|
ptop++;
|
|
}
|
|
for (y = bbl; y <= bel; y++)
|
|
DfWriteTextLine(wnd, NULL, y, FALSE);
|
|
while (pbot > bel) {
|
|
DfWriteTextLine(wnd, NULL, pbot, FALSE);
|
|
--pbot;
|
|
}
|
|
}
|
|
/* ----------- DFM_LEFT_BUTTON Message ---------- */
|
|
static int LeftButtonMsg(DFWINDOW wnd, DF_PARAM p1, DF_PARAM p2)
|
|
{
|
|
int MouseX = (int) p1 - DfGetClientLeft(wnd);
|
|
int MouseY = (int) p2 - DfGetClientTop(wnd);
|
|
DFRECT rc = DfClientRect(wnd);
|
|
char *lp;
|
|
int len;
|
|
if (KeyBoardMarking)
|
|
return TRUE;
|
|
if (DfWindowMoving || DfWindowSizing)
|
|
return FALSE;
|
|
if (DfIsMultiLine(wnd)) {
|
|
if (TextMarking) {
|
|
if (!DfInsideRect(p1, p2, rc)) {
|
|
int x = MouseX, y = MouseY;
|
|
int dir;
|
|
DFMESSAGE msg = 0;
|
|
if ((int)p2 == DfGetTop(wnd))
|
|
y++, dir = FALSE, msg = DFM_SCROLL;
|
|
else if ((int)p2 == DfGetBottom(wnd))
|
|
--y, dir = TRUE, msg = DFM_SCROLL;
|
|
else if ((int)p1 == DfGetLeft(wnd))
|
|
--x, dir = FALSE, msg = DFM_HORIZSCROLL;
|
|
else if ((int)p1 == DfGetRight(wnd))
|
|
x++, dir = TRUE, msg = DFM_HORIZSCROLL;
|
|
if (msg != 0) {
|
|
if (DfSendMessage(wnd, msg, dir, 0))
|
|
ExtendBlock(wnd, x, y);
|
|
DfSendMessage(wnd, DFM_PAINT, 0, 0);
|
|
}
|
|
}
|
|
return TRUE;
|
|
}
|
|
if (!DfInsideRect(p1, p2, rc))
|
|
return FALSE;
|
|
if (DfTextBlockMarked(wnd)) {
|
|
DfClearTextBlock(wnd);
|
|
DfSendMessage(wnd, DFM_PAINT, 0, 0);
|
|
}
|
|
if (wnd->wlines) {
|
|
if (MouseY > wnd->wlines-1)
|
|
return TRUE;
|
|
lp = DfTextLine(wnd, MouseY+wnd->wtop);
|
|
len = (int) (strchr(lp, '\n') - lp);
|
|
MouseX = min(MouseX, len);
|
|
if (MouseX < wnd->wleft) {
|
|
MouseX = 0;
|
|
DfSendMessage(wnd, DFM_KEYBOARD, DF_HOME, 0);
|
|
}
|
|
ButtonDown = TRUE;
|
|
ButtonX = MouseX;
|
|
ButtonY = MouseY;
|
|
}
|
|
else
|
|
MouseX = MouseY = 0;
|
|
wnd->WndRow = MouseY;
|
|
SetLinePointer(wnd, MouseY+wnd->wtop);
|
|
}
|
|
if (DfIsMultiLine(wnd) ||
|
|
(!DfTextBlockMarked(wnd)
|
|
&& (int)(MouseX+wnd->wleft) < (int)strlen(wnd->text)))
|
|
wnd->CurrCol = MouseX+wnd->wleft;
|
|
DfSendMessage(wnd, DFM_KEYBOARD_CURSOR, DfWndCol, wnd->WndRow);
|
|
return TRUE;
|
|
}
|
|
/* ----------- MOUSE_MOVED Message ---------- */
|
|
static int MouseMovedMsg(DFWINDOW wnd, DF_PARAM p1, DF_PARAM p2)
|
|
{
|
|
int MouseX = (int) p1 - DfGetClientLeft(wnd);
|
|
int MouseY = (int) p2 - DfGetClientTop(wnd);
|
|
DFRECT rc = DfClientRect(wnd);
|
|
if (!DfInsideRect(p1, p2, rc))
|
|
return FALSE;
|
|
if (MouseY > wnd->wlines-1)
|
|
return FALSE;
|
|
if (ButtonDown) {
|
|
SetAnchor(wnd, ButtonX+wnd->wleft, ButtonY+wnd->wtop);
|
|
TextMarking = TRUE;
|
|
rc = DfWindowRect(wnd);
|
|
DfSendMessage(NULL,DFM_MOUSE_TRAVEL,(DF_PARAM) &rc, 0);
|
|
ButtonDown = FALSE;
|
|
}
|
|
if (TextMarking && !(DfWindowMoving || DfWindowSizing)) {
|
|
ExtendBlock(wnd, MouseX, MouseY);
|
|
return TRUE;
|
|
}
|
|
return FALSE;
|
|
}
|
|
static void StopMarking(DFWINDOW wnd)
|
|
{
|
|
TextMarking = FALSE;
|
|
if (wnd->BlkBegLine > wnd->BlkEndLine) {
|
|
swap(wnd->BlkBegLine, wnd->BlkEndLine);
|
|
swap(wnd->BlkBegCol, wnd->BlkEndCol);
|
|
}
|
|
if (wnd->BlkBegLine == wnd->BlkEndLine &&
|
|
wnd->BlkBegCol > wnd->BlkEndCol)
|
|
swap(wnd->BlkBegCol, wnd->BlkEndCol);
|
|
}
|
|
/* ----------- BUTTON_RELEASED Message ---------- */
|
|
static int ButtonReleasedMsg(DFWINDOW wnd)
|
|
{
|
|
if (DfIsMultiLine(wnd)) {
|
|
ButtonDown = FALSE;
|
|
if (TextMarking && !(DfWindowMoving || DfWindowSizing)) {
|
|
/* release the mouse ouside the edit box */
|
|
DfSendMessage(NULL, DFM_MOUSE_TRAVEL, 0, 0);
|
|
StopMarking(wnd);
|
|
return TRUE;
|
|
}
|
|
else
|
|
PrevY = -1;
|
|
}
|
|
return FALSE;
|
|
}
|
|
/* ---- Process text block keys for multiline text box ---- */
|
|
static void DoMultiLines(DFWINDOW wnd, int c, DF_PARAM p2)
|
|
{
|
|
if (DfIsMultiLine(wnd) && !KeyBoardMarking) {
|
|
if ((int)p2 & (DF_LEFTSHIFT | DF_RIGHTSHIFT)) {
|
|
switch (c) {
|
|
case DF_HOME:
|
|
case DF_CTRL_HOME:
|
|
case DF_CTRL_BS:
|
|
case DF_PGUP:
|
|
case DF_CTRL_PGUP:
|
|
case DF_UP:
|
|
case DF_BS:
|
|
case DF_END:
|
|
case DF_CTRL_END:
|
|
case DF_PGDN:
|
|
case DF_CTRL_PGDN:
|
|
case DF_DN:
|
|
case DF_FWD:
|
|
case DF_CTRL_FWD:
|
|
KeyBoardMarking = TextMarking = TRUE;
|
|
SetAnchor(wnd, wnd->CurrCol, wnd->CurrLine);
|
|
break;
|
|
default:
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
/* ---------- page/scroll keys ----------- */
|
|
static int DoScrolling(DFWINDOW wnd, int c, DF_PARAM p2)
|
|
{
|
|
switch (c) {
|
|
case DF_PGUP:
|
|
case DF_PGDN:
|
|
if (DfIsMultiLine(wnd))
|
|
DfBaseWndProc(DF_EDITBOX, wnd, DFM_KEYBOARD, c, p2);
|
|
break;
|
|
case DF_CTRL_PGUP:
|
|
case DF_CTRL_PGDN:
|
|
DfBaseWndProc(DF_EDITBOX, wnd, DFM_KEYBOARD, c, p2);
|
|
break;
|
|
case DF_HOME:
|
|
Home(wnd);
|
|
break;
|
|
case DF_END:
|
|
End(wnd);
|
|
break;
|
|
case DF_CTRL_FWD:
|
|
NextWord(wnd);
|
|
break;
|
|
case DF_CTRL_BS:
|
|
PrevWord(wnd);
|
|
break;
|
|
case DF_CTRL_HOME:
|
|
if (DfIsMultiLine(wnd)) {
|
|
DfSendMessage(wnd, DFM_SCROLLDOC, TRUE, 0);
|
|
wnd->CurrLine = 0;
|
|
wnd->WndRow = 0;
|
|
}
|
|
Home(wnd);
|
|
break;
|
|
case DF_CTRL_END:
|
|
if (DfIsMultiLine(wnd) &&
|
|
wnd->WndRow+wnd->wtop+1 < wnd->wlines
|
|
&& wnd->wlines > 0) {
|
|
DfSendMessage(wnd, DFM_SCROLLDOC, FALSE, 0);
|
|
SetLinePointer(wnd, wnd->wlines-1);
|
|
wnd->WndRow =
|
|
min(DfClientHeight(wnd)-1, wnd->wlines-1);
|
|
Home(wnd);
|
|
}
|
|
End(wnd);
|
|
break;
|
|
case DF_UP:
|
|
if (DfIsMultiLine(wnd))
|
|
Upward(wnd);
|
|
break;
|
|
case DF_DN:
|
|
if (DfIsMultiLine(wnd))
|
|
Downward(wnd);
|
|
break;
|
|
case DF_FWD:
|
|
Forward(wnd);
|
|
break;
|
|
case DF_BS:
|
|
Backward(wnd);
|
|
break;
|
|
default:
|
|
return FALSE;
|
|
}
|
|
if (!KeyBoardMarking && DfTextBlockMarked(wnd)) {
|
|
DfClearTextBlock(wnd);
|
|
DfSendMessage(wnd, DFM_PAINT, 0, 0);
|
|
}
|
|
DfSendMessage(wnd, DFM_KEYBOARD_CURSOR, DfWndCol, wnd->WndRow);
|
|
return TRUE;
|
|
}
|
|
/* -------------- Del key ---------------- */
|
|
static void DelKey(DFWINDOW wnd)
|
|
{
|
|
char *currchar = DfCurrChar;
|
|
int repaint = *currchar == '\n';
|
|
if (DfTextBlockMarked(wnd)) {
|
|
DfSendMessage(wnd, DFM_COMMAND, DF_ID_DELETETEXT, 0);
|
|
DfSendMessage(wnd, DFM_PAINT, 0, 0);
|
|
return;
|
|
}
|
|
if (DfIsMultiLine(wnd) && *currchar == '\n' && *(currchar+1) == '\0')
|
|
return;
|
|
strcpy(currchar, currchar+1);
|
|
if (repaint) {
|
|
DfBuildTextPointers(wnd);
|
|
DfSendMessage(wnd, DFM_PAINT, 0, 0);
|
|
}
|
|
else {
|
|
ModTextPointers(wnd, wnd->CurrLine+1, -1);
|
|
DfWriteTextLine(wnd, NULL, wnd->WndRow+wnd->wtop, FALSE);
|
|
}
|
|
wnd->TextChanged = TRUE;
|
|
}
|
|
/* ------------ Tab key ------------ */
|
|
static void TabKey(DFWINDOW wnd, DF_PARAM p2)
|
|
{
|
|
if (DfIsMultiLine(wnd)) {
|
|
int insmd = wnd->InsertMode;
|
|
do {
|
|
char *cc = DfCurrChar+1;
|
|
if (!insmd && *cc == '\0')
|
|
break;
|
|
if (wnd->textlen == wnd->MaxTextLength)
|
|
break;
|
|
DfSendMessage(wnd,DFM_KEYBOARD,insmd ? ' ' : DF_FWD,0);
|
|
} while (wnd->CurrCol % DfCfg.Tabs);
|
|
}
|
|
else
|
|
DfPostMessage(DfGetParent(wnd), DFM_KEYBOARD, '\t', p2);
|
|
}
|
|
/* ------------ Shift+Tab key ------------ */
|
|
static void ShiftTabKey(DFWINDOW wnd, DF_PARAM p2)
|
|
{
|
|
if (DfIsMultiLine(wnd)) {
|
|
do {
|
|
if (DfCurrChar == DfGetText(wnd))
|
|
break;
|
|
DfSendMessage(wnd,DFM_KEYBOARD,DF_BS,0);
|
|
} while (wnd->CurrCol % DfCfg.Tabs);
|
|
}
|
|
else
|
|
DfPostMessage(DfGetParent(wnd), DFM_KEYBOARD, DF_SHIFT_HT, p2);
|
|
}
|
|
/* --------- All displayable typed keys ------------- */
|
|
static void KeyTyped(DFWINDOW wnd, int c)
|
|
{
|
|
char *currchar = DfCurrChar;
|
|
if ((c != '\n' && c < ' ') || (c & 0x1000))
|
|
/* ---- not recognized by editor --- */
|
|
return;
|
|
if (!DfIsMultiLine(wnd) && DfTextBlockMarked(wnd)) {
|
|
DfSendMessage(wnd, DFM_CLEARTEXT, 0, 0);
|
|
currchar = DfCurrChar;
|
|
}
|
|
/* ---- test typing at end of text ---- */
|
|
if (currchar == (char*)(wnd->text+wnd->MaxTextLength)) {
|
|
/* ---- typing at the end of maximum buffer ---- */
|
|
DfBeep();
|
|
return;
|
|
}
|
|
if (*currchar == '\0') {
|
|
/* --- insert a newline at end of text --- */
|
|
*currchar = '\n';
|
|
*(currchar+1) = '\0';
|
|
DfBuildTextPointers(wnd);
|
|
}
|
|
/* --- displayable char or newline --- */
|
|
if (c == '\n' || wnd->InsertMode || *currchar == '\n') {
|
|
/* ------ inserting the keyed character ------ */
|
|
if (wnd->text[wnd->textlen-1] != '\0') {
|
|
/* --- the current text buffer is full --- */
|
|
if (wnd->textlen == wnd->MaxTextLength) {
|
|
/* --- text buffer is at maximum size --- */
|
|
DfBeep();
|
|
return;
|
|
}
|
|
/* ---- increase the text buffer size ---- */
|
|
wnd->textlen += DF_GROWLENGTH;
|
|
/* --- but not above maximum size --- */
|
|
if (wnd->textlen > wnd->MaxTextLength)
|
|
wnd->textlen = wnd->MaxTextLength;
|
|
wnd->text = DfRealloc(wnd->text, wnd->textlen+2);
|
|
wnd->text[wnd->textlen-1] = '\0';
|
|
currchar = DfCurrChar;
|
|
}
|
|
memmove(currchar+1, currchar, strlen(currchar)+1);
|
|
ModTextPointers(wnd, wnd->CurrLine+1, 1);
|
|
if (DfIsMultiLine(wnd) && wnd->wlines > 1)
|
|
wnd->textwidth = max(wnd->textwidth,
|
|
(int) (DfTextLine(wnd, wnd->CurrLine+1)-
|
|
DfTextLine(wnd, wnd->CurrLine)));
|
|
else
|
|
wnd->textwidth = max((int)wnd->textwidth,
|
|
(int)strlen(wnd->text));
|
|
DfWriteTextLine(wnd, NULL,
|
|
wnd->wtop+wnd->WndRow, FALSE);
|
|
}
|
|
/* ----- put the char in the buffer ----- */
|
|
*currchar = c;
|
|
wnd->TextChanged = TRUE;
|
|
if (c == '\n') {
|
|
wnd->wleft = 0;
|
|
DfBuildTextPointers(wnd);
|
|
End(wnd);
|
|
Forward(wnd);
|
|
DfSendMessage(wnd, DFM_PAINT, 0, 0);
|
|
return;
|
|
}
|
|
/* ---------- test end of window --------- */
|
|
if (DfWndCol == DfClientWidth(wnd)-1) {
|
|
if (!DfIsMultiLine(wnd)) {
|
|
if (!(currchar == (char*)(wnd->text+wnd->MaxTextLength-2)))
|
|
DfSendMessage(wnd, DFM_HORIZSCROLL, TRUE, 0);
|
|
}
|
|
else {
|
|
char *cp = currchar;
|
|
while (*cp != ' ' && cp != (char*)DfTextLine(wnd, wnd->CurrLine))
|
|
--cp;
|
|
if (cp == (char*)DfTextLine(wnd, wnd->CurrLine) ||
|
|
!wnd->WordWrapMode)
|
|
DfSendMessage(wnd, DFM_HORIZSCROLL, TRUE, 0);
|
|
else {
|
|
int dif = 0;
|
|
if (c != ' ') {
|
|
dif = (int) (currchar - cp);
|
|
wnd->CurrCol -= dif;
|
|
DfSendMessage(wnd, DFM_KEYBOARD, DF_DEL, 0);
|
|
--dif;
|
|
}
|
|
DfSendMessage(wnd, DFM_KEYBOARD, '\n', 0);
|
|
currchar = DfCurrChar;
|
|
wnd->CurrCol = dif;
|
|
if (c == ' ')
|
|
return;
|
|
}
|
|
}
|
|
}
|
|
/* ------ display the character ------ */
|
|
DfSetStandardColor(wnd);
|
|
DfPutWindowChar(wnd, c, DfWndCol, wnd->WndRow);
|
|
/* ----- advance the pointers ------ */
|
|
wnd->CurrCol++;
|
|
}
|
|
/* ------------ screen changing key strokes ------------- */
|
|
static void DoKeyStroke(DFWINDOW wnd, int c, DF_PARAM p2)
|
|
{
|
|
switch (c) {
|
|
case DF_RUBOUT:
|
|
if (wnd->CurrCol == 0 && wnd->CurrLine == 0)
|
|
break;
|
|
Backward(wnd);
|
|
case DF_DEL:
|
|
DelKey(wnd);
|
|
break;
|
|
case DF_SHIFT_HT:
|
|
ShiftTabKey(wnd, p2);
|
|
break;
|
|
case '\t':
|
|
TabKey(wnd, p2);
|
|
break;
|
|
case '\r':
|
|
if (!DfIsMultiLine(wnd)) {
|
|
DfPostMessage(DfGetParent(wnd), DFM_KEYBOARD, c, p2);
|
|
break;
|
|
}
|
|
c = '\n';
|
|
default:
|
|
if (DfTextBlockMarked(wnd)) {
|
|
DfSendMessage(wnd, DFM_COMMAND, DF_ID_DELETETEXT, 0);
|
|
DfSendMessage(wnd, DFM_PAINT, 0, 0);
|
|
}
|
|
KeyTyped(wnd, c);
|
|
break;
|
|
}
|
|
}
|
|
/* ----------- DFM_KEYBOARD Message ---------- */
|
|
static int KeyboardMsg(DFWINDOW wnd, DF_PARAM p1, DF_PARAM p2)
|
|
{
|
|
int c = (int) p1;
|
|
|
|
if (DfWindowMoving || DfWindowSizing || ((int)p2 & DF_ALTKEY))
|
|
return FALSE;
|
|
|
|
switch (c)
|
|
{
|
|
/* these keys get processed by lower classes */
|
|
case DF_ESC:
|
|
case DF_F1:
|
|
case DF_F2:
|
|
case DF_F3:
|
|
case DF_F4:
|
|
case DF_F5:
|
|
case DF_F6:
|
|
case DF_F7:
|
|
case DF_F8:
|
|
case DF_F9:
|
|
case DF_F10:
|
|
case DF_INS:
|
|
case DF_SHIFT_INS:
|
|
case DF_SHIFT_DEL:
|
|
return FALSE;
|
|
|
|
/* these keys get processed here */
|
|
case DF_CTRL_FWD:
|
|
case DF_CTRL_BS:
|
|
case DF_CTRL_HOME:
|
|
case DF_CTRL_END:
|
|
case DF_CTRL_PGUP:
|
|
case DF_CTRL_PGDN:
|
|
break;
|
|
|
|
default:
|
|
/* other ctrl keys get processed by lower classes */
|
|
if ((int)p2 & DF_CTRLKEY)
|
|
return FALSE;
|
|
/* all other keys get processed here */
|
|
break;
|
|
}
|
|
|
|
DoMultiLines(wnd, c, p2);
|
|
if (DoScrolling(wnd, c, p2))
|
|
{
|
|
if (KeyBoardMarking)
|
|
ExtendBlock(wnd, DfWndCol, wnd->WndRow);
|
|
}
|
|
else if (!DfTestAttribute(wnd, DF_READONLY))
|
|
{
|
|
DoKeyStroke(wnd, c, p2);
|
|
DfSendMessage(wnd, DFM_KEYBOARD_CURSOR, DfWndCol, wnd->WndRow);
|
|
}
|
|
else
|
|
DfBeep();
|
|
|
|
return TRUE;
|
|
}
|
|
|
|
/* ----------- DFM_SHIFT_CHANGED Message ---------- */
|
|
static void ShiftChangedMsg(DFWINDOW wnd, DF_PARAM p1)
|
|
{
|
|
if (!((int)p1 & (DF_LEFTSHIFT | DF_RIGHTSHIFT)) &&
|
|
KeyBoardMarking) {
|
|
StopMarking(wnd);
|
|
KeyBoardMarking = FALSE;
|
|
}
|
|
}
|
|
/* ----------- DF_ID_DELETETEXT Command ---------- */
|
|
static void DeleteTextCmd(DFWINDOW wnd)
|
|
{
|
|
if (DfTextBlockMarked(wnd)) {
|
|
char *bbl=DfTextLine(wnd,wnd->BlkBegLine)+wnd->BlkBegCol;
|
|
char *bel=DfTextLine(wnd,wnd->BlkEndLine)+wnd->BlkEndCol;
|
|
int len = (int) (bel - bbl);
|
|
SaveDeletedText(wnd, bbl, len);
|
|
wnd->TextChanged = TRUE;
|
|
strcpy(bbl, bel);
|
|
wnd->CurrLine = DfTextLineNumber(wnd, bbl-wnd->BlkBegCol);
|
|
wnd->CurrCol = wnd->BlkBegCol;
|
|
wnd->WndRow = wnd->BlkBegLine - wnd->wtop;
|
|
if (wnd->WndRow < 0) {
|
|
wnd->wtop = wnd->BlkBegLine;
|
|
wnd->WndRow = 0;
|
|
}
|
|
DfSendMessage(wnd, DFM_KEYBOARD_CURSOR, DfWndCol, wnd->WndRow);
|
|
DfClearTextBlock(wnd);
|
|
DfBuildTextPointers(wnd);
|
|
}
|
|
}
|
|
/* ----------- DF_ID_CLEAR Command ---------- */
|
|
static void ClearCmd(DFWINDOW wnd)
|
|
{
|
|
if (DfTextBlockMarked(wnd)) {
|
|
char *bbl=DfTextLine(wnd,wnd->BlkBegLine)+wnd->BlkBegCol;
|
|
char *bel=DfTextLine(wnd,wnd->BlkEndLine)+wnd->BlkEndCol;
|
|
int len = (int) (bel - bbl);
|
|
SaveDeletedText(wnd, bbl, len);
|
|
wnd->CurrLine = DfTextLineNumber(wnd, bbl);
|
|
wnd->CurrCol = wnd->BlkBegCol;
|
|
wnd->WndRow = wnd->BlkBegLine - wnd->wtop;
|
|
if (wnd->WndRow < 0) {
|
|
wnd->WndRow = 0;
|
|
wnd->wtop = wnd->BlkBegLine;
|
|
}
|
|
/* ------ change all text lines in block to \n ----- */
|
|
while (bbl < bel) {
|
|
char *cp = strchr(bbl, '\n');
|
|
if (cp > bel)
|
|
cp = bel;
|
|
strcpy(bbl, cp);
|
|
bel -= (int) (cp - bbl);
|
|
bbl++;
|
|
}
|
|
DfClearTextBlock(wnd);
|
|
DfBuildTextPointers(wnd);
|
|
DfSendMessage(wnd, DFM_KEYBOARD_CURSOR, DfWndCol, wnd->WndRow);
|
|
wnd->TextChanged = TRUE;
|
|
}
|
|
}
|
|
/* ----------- DF_ID_UNDO Command ---------- */
|
|
static void UndoCmd(DFWINDOW wnd)
|
|
{
|
|
if (wnd->DeletedText != NULL) {
|
|
DfPasteText(wnd, wnd->DeletedText, wnd->DeletedLength);
|
|
free(wnd->DeletedText);
|
|
wnd->DeletedText = NULL;
|
|
wnd->DeletedLength = 0;
|
|
DfSendMessage(wnd, DFM_PAINT, 0, 0);
|
|
}
|
|
}
|
|
/* ----------- DF_ID_PARAGRAPH Command ---------- */
|
|
static void ParagraphCmd(DFWINDOW wnd)
|
|
{
|
|
int bc, fl;
|
|
char *bl, *bbl, *bel, *bb;
|
|
|
|
DfClearTextBlock(wnd);
|
|
/* ---- forming paragraph from DfCursor position --- */
|
|
fl = wnd->wtop + wnd->WndRow;
|
|
bbl = bel = bl = DfTextLine(wnd, wnd->CurrLine);
|
|
if ((bc = wnd->CurrCol) >= DfClientWidth(wnd))
|
|
bc = 0;
|
|
Home(wnd);
|
|
/* ---- locate the end of the paragraph ---- */
|
|
while (*bel) {
|
|
int blank = TRUE;
|
|
char *bll = bel;
|
|
/* --- blank line marks end of paragraph --- */
|
|
while (*bel && *bel != '\n') {
|
|
if (*bel != ' ')
|
|
blank = FALSE;
|
|
bel++;
|
|
}
|
|
if (blank) {
|
|
bel = bll;
|
|
break;
|
|
}
|
|
if (*bel)
|
|
bel++;
|
|
}
|
|
if (bel == bbl) {
|
|
DfSendMessage(wnd, DFM_KEYBOARD, DF_DN, 0);
|
|
return;
|
|
}
|
|
if (*bel == '\0')
|
|
--bel;
|
|
if (*bel == '\n')
|
|
--bel;
|
|
/* --- change all newlines in block to spaces --- */
|
|
while ((char*)DfCurrChar < bel) {
|
|
if (*DfCurrChar == '\n') {
|
|
*DfCurrChar = ' ';
|
|
wnd->CurrLine++;
|
|
wnd->CurrCol = 0;
|
|
}
|
|
else
|
|
wnd->CurrCol++;
|
|
}
|
|
/* ---- insert newlines at new margin boundaries ---- */
|
|
bb = bbl;
|
|
while ((char*)bbl < (char*)bel) {
|
|
bbl++;
|
|
if ((int)(bbl - bb) == DfClientWidth(wnd)-1) {
|
|
while (*bbl != ' ' && bbl > bb)
|
|
--bbl;
|
|
if (*bbl != ' ') {
|
|
bbl = strchr(bbl, ' ');
|
|
if (bbl == NULL || bbl >= bel)
|
|
break;
|
|
}
|
|
*bbl = '\n';
|
|
bb = bbl+1;
|
|
}
|
|
}
|
|
DfBuildTextPointers(wnd);
|
|
/* --- put DfCursor back at beginning --- */
|
|
wnd->CurrLine = DfTextLineNumber(wnd, bl);
|
|
wnd->CurrCol = bc;
|
|
if (fl < wnd->wtop)
|
|
wnd->wtop = fl;
|
|
wnd->WndRow = fl - wnd->wtop;
|
|
DfSendMessage(wnd, DFM_PAINT, 0, 0);
|
|
DfSendMessage(wnd, DFM_KEYBOARD_CURSOR, DfWndCol, wnd->WndRow);
|
|
wnd->TextChanged = TRUE;
|
|
DfBuildTextPointers(wnd);
|
|
}
|
|
/* ----------- COMMAND Message ---------- */
|
|
static int CommandMsg(DFWINDOW wnd, DF_PARAM p1)
|
|
{
|
|
switch ((int)p1) {
|
|
case DF_ID_DELETETEXT:
|
|
DeleteTextCmd(wnd);
|
|
return TRUE;
|
|
case DF_ID_CLEAR:
|
|
ClearCmd(wnd);
|
|
return TRUE;
|
|
case DF_ID_UNDO:
|
|
UndoCmd(wnd);
|
|
return TRUE;
|
|
case DF_ID_PARAGRAPH:
|
|
ParagraphCmd(wnd);
|
|
return TRUE;
|
|
default:
|
|
break;
|
|
}
|
|
return FALSE;
|
|
}
|
|
/* ---------- DFM_CLOSE_WINDOW Message ----------- */
|
|
static int CloseWindowMsg(DFWINDOW wnd, DF_PARAM p1, DF_PARAM p2)
|
|
{
|
|
int rtn;
|
|
DfSendMessage(NULL, DFM_HIDE_CURSOR, 0, 0);
|
|
if (wnd->DeletedText != NULL)
|
|
free(wnd->DeletedText);
|
|
if (wnd->text != NULL)
|
|
{
|
|
free(wnd->text);
|
|
wnd->text = NULL;
|
|
}
|
|
rtn = DfBaseWndProc(DF_EDITBOX, wnd, DFM_CLOSE_WINDOW, p1, p2);
|
|
return rtn;
|
|
}
|
|
|
|
/* ------- Window processing module for DF_EDITBOX class ------ */
|
|
int DfEditBoxProc(DFWINDOW wnd, DFMESSAGE msg, DF_PARAM p1, DF_PARAM p2)
|
|
{
|
|
int rtn;
|
|
switch (msg) {
|
|
case DFM_CREATE_WINDOW:
|
|
return CreateWindowMsg(wnd);
|
|
case DFM_ADDTEXT:
|
|
return AddTextMsg(wnd, p1, p2);
|
|
case DFM_SETTEXT:
|
|
return SetTextMsg(wnd, p1);
|
|
case DFM_CLEARTEXT:
|
|
return ClearTextMsg(wnd);
|
|
case DFM_GETTEXT:
|
|
return GetTextMsg(wnd, p1, p2);
|
|
case DFM_SETTEXTLENGTH:
|
|
return SetTextLengthMsg(wnd, (unsigned) p1);
|
|
case DFM_KEYBOARD_CURSOR:
|
|
KeyboardCursorMsg(wnd, p1, p2);
|
|
return TRUE;
|
|
case DFM_SETFOCUS:
|
|
if (!(int)p1)
|
|
DfSendMessage(NULL, DFM_HIDE_CURSOR, 0, 0);
|
|
case DFM_PAINT:
|
|
case DFM_MOVE:
|
|
rtn = DfBaseWndProc(DF_EDITBOX, wnd, msg, p1, p2);
|
|
DfSendMessage(wnd,DFM_KEYBOARD_CURSOR,DfWndCol,wnd->WndRow);
|
|
return rtn;
|
|
case DFM_DFM_SIZE:
|
|
return SizeMsg(wnd, p1, p2);
|
|
case DFM_SCROLL:
|
|
return ScrollMsg(wnd, p1);
|
|
case DFM_HORIZSCROLL:
|
|
return HorizScrollMsg(wnd, p1);
|
|
case DFM_SCROLLPAGE:
|
|
return ScrollPageMsg(wnd, p1);
|
|
case DFM_HORIZPAGE:
|
|
return HorizPageMsg(wnd, p1);
|
|
case DFM_LEFT_BUTTON:
|
|
if (LeftButtonMsg(wnd, p1, p2))
|
|
return TRUE;
|
|
break;
|
|
case MOUSE_MOVED:
|
|
if (MouseMovedMsg(wnd, p1, p2))
|
|
return TRUE;
|
|
break;
|
|
case DFM_BUTTON_RELEASED:
|
|
if (ButtonReleasedMsg(wnd))
|
|
return TRUE;
|
|
break;
|
|
case DFM_KEYBOARD:
|
|
if (KeyboardMsg(wnd, p1, p2))
|
|
return TRUE;
|
|
break;
|
|
case DFM_SHIFT_CHANGED:
|
|
ShiftChangedMsg(wnd, p1);
|
|
break;
|
|
case DFM_COMMAND:
|
|
if (CommandMsg(wnd, p1))
|
|
return TRUE;
|
|
break;
|
|
case DFM_CLOSE_WINDOW:
|
|
return CloseWindowMsg(wnd, p1, p2);
|
|
default:
|
|
break;
|
|
}
|
|
return DfBaseWndProc(DF_EDITBOX, wnd, msg, p1, p2);
|
|
}
|
|
/* ------ save deleted text for the Undo command ------ */
|
|
static void SaveDeletedText(DFWINDOW wnd, char *bbl, int len)
|
|
{
|
|
wnd->DeletedLength = len;
|
|
wnd->DeletedText=DfRealloc(wnd->DeletedText,len);
|
|
memmove(wnd->DeletedText, bbl, len);
|
|
}
|
|
/* ---- DfCursor right key: right one character position ---- */
|
|
static void Forward(DFWINDOW wnd)
|
|
{
|
|
char *cc = DfCurrChar+1;
|
|
if (*cc == '\0')
|
|
return;
|
|
if (*DfCurrChar == '\n') {
|
|
Home(wnd);
|
|
Downward(wnd);
|
|
}
|
|
else {
|
|
wnd->CurrCol++;
|
|
if (DfWndCol == DfClientWidth(wnd))
|
|
DfSendMessage(wnd, DFM_HORIZSCROLL, TRUE, 0);
|
|
}
|
|
}
|
|
/* ----- stick the moving DfCursor to the end of the line ---- */
|
|
static void StickEnd(DFWINDOW wnd)
|
|
{
|
|
char *cp = DfTextLine(wnd, wnd->CurrLine);
|
|
char *cp1 = strchr(cp, '\n');
|
|
int len = cp1 ? (int) (cp1 - cp) : 0;
|
|
wnd->CurrCol = min(len, wnd->CurrCol);
|
|
if (wnd->wleft > wnd->CurrCol) {
|
|
wnd->wleft = max(0, wnd->CurrCol - 4);
|
|
DfSendMessage(wnd, DFM_PAINT, 0, 0);
|
|
}
|
|
else if (wnd->CurrCol-wnd->wleft >= DfClientWidth(wnd)) {
|
|
wnd->wleft = wnd->CurrCol - (DfClientWidth(wnd)-1);
|
|
DfSendMessage(wnd, DFM_PAINT, 0, 0);
|
|
}
|
|
}
|
|
/* --------- DfCursor down key: down one line --------- */
|
|
static void Downward(DFWINDOW wnd)
|
|
{
|
|
if (DfIsMultiLine(wnd) &&
|
|
wnd->WndRow+wnd->wtop+1 < wnd->wlines) {
|
|
wnd->CurrLine++;
|
|
if (wnd->WndRow == DfClientHeight(wnd)-1)
|
|
DfBaseWndProc(DF_EDITBOX, wnd, DFM_SCROLL, TRUE, 0);
|
|
else
|
|
wnd->WndRow++;
|
|
StickEnd(wnd);
|
|
}
|
|
}
|
|
/* -------- DfCursor up key: up one line ------------ */
|
|
static void Upward(DFWINDOW wnd)
|
|
{
|
|
if (DfIsMultiLine(wnd) && wnd->CurrLine != 0) {
|
|
--wnd->CurrLine;
|
|
if (wnd->WndRow == 0)
|
|
DfBaseWndProc(DF_EDITBOX, wnd, DFM_SCROLL, FALSE, 0);
|
|
else
|
|
--wnd->WndRow;
|
|
StickEnd(wnd);
|
|
}
|
|
}
|
|
/* ---- DfCursor left key: left one character position ---- */
|
|
static void Backward(DFWINDOW wnd)
|
|
{
|
|
if (wnd->CurrCol) {
|
|
--wnd->CurrCol;
|
|
if (wnd->CurrCol < wnd->wleft)
|
|
DfSendMessage(wnd, DFM_HORIZSCROLL, FALSE, 0);
|
|
}
|
|
else if (DfIsMultiLine(wnd) && wnd->CurrLine != 0) {
|
|
Upward(wnd);
|
|
End(wnd);
|
|
}
|
|
}
|
|
/* -------- End key: to end of line ------- */
|
|
static void End(DFWINDOW wnd)
|
|
{
|
|
while (*DfCurrChar && *DfCurrChar != '\n')
|
|
++wnd->CurrCol;
|
|
if (DfWndCol >= DfClientWidth(wnd)) {
|
|
wnd->wleft = wnd->CurrCol - (DfClientWidth(wnd)-1);
|
|
DfSendMessage(wnd, DFM_PAINT, 0, 0);
|
|
}
|
|
}
|
|
/* -------- Home key: to beginning of line ------- */
|
|
static void Home(DFWINDOW wnd)
|
|
{
|
|
wnd->CurrCol = 0;
|
|
if (wnd->wleft != 0) {
|
|
wnd->wleft = 0;
|
|
DfSendMessage(wnd, DFM_PAINT, 0, 0);
|
|
}
|
|
}
|
|
/* -- Ctrl+DfCursor right key: to beginning of next word -- */
|
|
static void NextWord(DFWINDOW wnd)
|
|
{
|
|
int savetop = wnd->wtop;
|
|
int saveleft = wnd->wleft;
|
|
DfClearVisible(wnd);
|
|
while (!isWhite(*DfCurrChar)) {
|
|
char *cc = DfCurrChar+1;
|
|
if (*cc == '\0')
|
|
break;
|
|
Forward(wnd);
|
|
}
|
|
while (isWhite(*DfCurrChar)) {
|
|
char *cc = DfCurrChar+1;
|
|
if (*cc == '\0')
|
|
break;
|
|
Forward(wnd);
|
|
}
|
|
DfSetVisible(wnd);
|
|
DfSendMessage(wnd, DFM_KEYBOARD_CURSOR, DfWndCol, wnd->WndRow);
|
|
if (wnd->wtop != savetop || wnd->wleft != saveleft)
|
|
DfSendMessage(wnd, DFM_PAINT, 0, 0);
|
|
}
|
|
/* -- Ctrl+DfCursor left key: to beginning of previous word -- */
|
|
static void PrevWord(DFWINDOW wnd)
|
|
{
|
|
int savetop = wnd->wtop;
|
|
int saveleft = wnd->wleft;
|
|
DfClearVisible(wnd);
|
|
Backward(wnd);
|
|
while (isWhite(*DfCurrChar)) {
|
|
if (wnd->CurrLine == 0 && wnd->CurrCol == 0)
|
|
break;
|
|
Backward(wnd);
|
|
}
|
|
while (wnd->CurrCol != 0 && !isWhite(*DfCurrChar))
|
|
Backward(wnd);
|
|
if (isWhite(*DfCurrChar))
|
|
Forward(wnd);
|
|
DfSetVisible(wnd);
|
|
if (wnd->wleft != saveleft)
|
|
if (wnd->CurrCol >= saveleft)
|
|
if (wnd->CurrCol - saveleft < DfClientWidth(wnd))
|
|
wnd->wleft = saveleft;
|
|
DfSendMessage(wnd, DFM_KEYBOARD_CURSOR, DfWndCol, wnd->WndRow);
|
|
if (wnd->wtop != savetop || wnd->wleft != saveleft)
|
|
DfSendMessage(wnd, DFM_PAINT, 0, 0);
|
|
}
|
|
/* ----- modify text pointers from a specified position
|
|
by a specified plus or minus amount ----- */
|
|
static void ModTextPointers(DFWINDOW wnd, int lineno, int var)
|
|
{
|
|
while (lineno < wnd->wlines)
|
|
*((wnd->TextPointers) + lineno++) += var;
|
|
}
|
|
/* ----- set anchor point for marking text block ----- */
|
|
static void SetAnchor(DFWINDOW wnd, int mx, int my)
|
|
{
|
|
DfClearTextBlock(wnd);
|
|
/* ------ set the anchor ------ */
|
|
wnd->BlkBegLine = wnd->BlkEndLine = my;
|
|
wnd->BlkBegCol = wnd->BlkEndCol = mx;
|
|
DfSendMessage(wnd, DFM_PAINT, 0, 0);
|
|
}
|
|
|
|
/* EOF */
|