Exemple #1
0
int d_agtk_edit_proc(int msg, DIALOG *d, int c)
{
    if (msg == MSG_DRAW) {
        BITMAP *bmp = gui_get_screen();
        int l, x, b, f, p, w;
        int fg = (d->flags & D_DISABLED) ? hshadow : black;
        char *s = (char *)d->dp;
        char buf[16];
        int fonth;

        agup_edit_adjust_position (d);

        fonth = text_height(font);

        l = ustrlen(s);
        /* set cursor pos */
        if (d->d2 >= l) {
            d->d2 = l;
            usetc(buf+usetc(buf, ' '), 0);
            x = text_length(font, buf) + 2;
        }
        else
            x = 2;

        b = 0;	  /* num of chars to be blitted */
        /* get the part of the string to be blitted */
        for (p = d->d2; p >= 0; p--) {
            usetc(buf+usetc(buf, ugetat(s, p)), 0);
            x += text_length(font, buf);
            b++;
            if (x > d->w-4)
                break;
        }

        /* see if length of text is too wide */
        if (x <= d->w-2) {
            b = l;
            p = 0;
        }
        else {
            b--;
            p = d->d2-b+1;
            b = d->d2;
        }

        if (d->flags & D_GOTFOCUS)
            gtk_bevel(bmp, d->x, d->y, d->w, fonth+6, 3);
        else
            gtk_bevel(bmp, d->x, d->y, d->w, fonth+6, 2);

        rectfill(bmp, d->x+2, d->y+2, d->x+d->w-3, d->y+fonth+3, white);
        for (x = 4; p<=b; p++) {
            f = ugetat(s, p);
            usetc(buf+usetc(buf, (f) ? f : ' '), 0);
            w = text_length(font, buf);
            f = ((p == d->d2) && (d->flags & D_GOTFOCUS));
            textout_ex(bmp, font, buf, d->x+x, d->y+4, fg, white);
            if (f)
                vline(bmp, d->x+x-1, d->y+3, d->y+fonth+3, black);
            if ((x += w) + w > d->w - 4)
                break;
        }

        agup_edit_restore_position (d);

        return D_O_K;
    }

    return d_agup_adjusted_edit_proc(msg, d, c);
}
Exemple #2
0
int d_aase_edit_proc(int msg, DIALOG *d, int c)
{
  int ret;

  if (msg == MSG_START) {
    /* this is mainly for `file_select', because the size that
       it put to the `gui_edit_proc' is very small */
    d->h = MAX(d->h, 3 + text_height(font) + 3);
  }
  else if (msg == MSG_DRAW) {
    int f, l, p, w, x, fg, b, scroll;
    char buf[16];
    char *s;
    int rtm;

    agup_edit_adjust_position (d);

    if (!(d->flags & D_INTERNAL))
      d->w -= 6;

    s = (char *)d->dp;
    l = ustrlen(s);
    if (d->d2 > l) 
       d->d2 = l;

    /* calculate maximal number of displayable characters */
    if (d->d2 == l)  {
       usetc(buf+usetc(buf, ' '), 0);
       x = text_length(font, buf);
    }
    else
       x = 0;

    b = 0;

    for (p=d->d2; p>=0; p--) {
       usetc(buf+usetc(buf, ugetat(s, p)), 0);
       x += text_length(font, buf);
       b++;
       if (x > d->w) 
         break;
    }

    if (x <= d->w) {
       b = l; 
       scroll = FALSE;
    }
    else {
       b--; 
       scroll = TRUE;
    }

    d->w += 6;

    ase_rectedge(screen, d->x,   d->y,   d->x+d->w-1, d->y+d->h-1,
      makecol(0, 0, 0),
      makecol(255, 255, 255));

    ase_rectedge(screen, d->x+1, d->y+1, d->x+d->w-2, d->y+d->h-2,
      makecol(128, 128, 128),
      makecol(192, 192, 192));

    ase_rectgouraud(screen, d->x+2, d->y+2, d->x+d->w-3, d->y+d->h-3,
      (d->flags & D_DISABLED)? 128: 224, 255);

    fg = (d->flags & D_DISABLED) ? aase_mg_color : d->fg;
    x = 3;

    if (scroll) {
       p = d->d2-b+1; 
       b = d->d2; 
    }
    else 
       p = 0; 

    for (; p<=b; p++) {
       f = ugetat(s, p);
       usetc(buf+usetc(buf, (f) ? f : ' '), 0);
       w = text_length(font, buf);
       if (x+w > d->w-2)
          break;
       f = ((p == d->d2) && (d->flags & D_GOTFOCUS));
       rtm = text_mode((f) ? fg : -1);
       textout(screen, font, buf, d->x+x, d->y+d->h/2-text_height(font)/2, (f) ? d->bg : fg);
       text_mode(rtm);
       x += w;
    }

    if (d->flags & D_INTERNAL)
      d->w -= 6;

    agup_edit_restore_position (d);

    return D_O_K;
  }

  d->w -= 6;
  d->flags |= D_INTERNAL;

  ret = d_agup_adjusted_edit_proc(msg, d, c);

  d->flags &= ~D_INTERNAL;
  d->w += 6;

  return ret;
}
Exemple #3
0
int d_aphoton_edit_proc(int msg, DIALOG *d, int c)
{
    if (msg == MSG_DRAW) {
	int l, x, b, f, p, w, rtm;
	int fg = (d->flags & D_DISABLED) ? shadow : black;
	char *s = (char *)d->dp;
	char buf[16];
	int fonth;

        agup_edit_adjust_position (d);
	
	fonth = text_height(font);
	
	l = ustrlen(s);
	/* set cursor pos */
	if (d->d2 >= l) {
	    d->d2 = l;
	    usetc(buf+usetc(buf, ' '), 0);
	    x = text_length(font, buf) + 2;
	}
	else
	    x = 2;
	
	b = 0;	  /* num of chars to be blitted */
	/* get the part of the string to be blitted */
	for (p = d->d2; p >= 0; p--) {
	    usetc(buf+usetc(buf, ugetat(s, p)), 0);
	    x += text_length(font, buf);
	    b++;
	    if (x > d->w-4)
		break;
	}

	/* see if length of text is too wide */
	if (x <= d->w-2) {
	    b = l; 
	    p = 0;
	}
	else {
	    b--;
	    p = d->d2-b+1; 
	    b = d->d2; 
	}

	photon_box(screen, d->x, d->y, d->w, fonth+8, edit_white);
	hline(screen, d->x+2, d->y+2, d->x+d->w-3, edit_gray);
	vline(screen, d->x+2, d->y+2, d->y+fonth+5, edit_gray);

	for (x = 4; p<=b; p++) {
	    f = ugetat(s, p);
	    usetc(buf+usetc(buf, (f) ? f : ' '), 0);
	    w = text_length(font, buf);
	    f = ((p == d->d2) && (d->flags & D_GOTFOCUS));
	    rtm = text_mode(edit_white);
	    textout(screen, font, buf, d->x+x, d->y+4, fg);
	    text_mode(rtm);
	    if (f)
		vline(screen, d->x+x-1, d->y+3, d->y+fonth+5, black);
	    if ((x += w) + w > d->w - 4)
		break;
	}

        if (d->flags & D_GOTFOCUS)
            hline(screen, d->x+4, d->y+fonth+4, d->x+d->w-5, highlight);

        agup_edit_restore_position (d);

	return D_O_K;
    }

    return d_agup_adjusted_edit_proc(msg, d, c);
}
Exemple #4
0
int
d_abitmap_edit_proc (int msg, DIALOG *d, int c)
{
	if (msg == MSG_DRAW) {
		BITMAP *bmp = gui_get_screen();
		int l, x, b, f, p, w;
		char *s = (char *) d->dp;
		char buf[16];			 /* Buffer to hold one char at a time. */
		int c = 0;
		int fg;

		agup_edit_adjust_position (d);

		if (d->flags & D_GOTFOCUS)
			c = 1;
		if (d->flags & D_DISABLED)
			c = 2;

		abitmap_draw_area (d, B_EDIT, 0, 0, d->w, text_height (font) + 8, 0, 0);

		l = ustrlen (s);
		/* set cursor pos */
		if (d->d2 >= l) {
			d->d2 = l;
			usetc (buf + usetc (buf, ' '), 0);
			x = text_length (font, buf) + 2;
		}
		else
			x = 2;

		b = 0;					 /* num of chars to be blitted */
		/* get the part of the string to be blitted */
		for (p = d->d2; p >= 0; p--) {
			usetc (buf + usetc (buf, ugetat (s, p)), 0);
			x += text_length (font, buf);
			b++;
			if (x > d->w - 4)
				break;
		}

		/* see if length of text is too wide */
		if (x <= d->w - 2) {
			b = l;
			p = 0;
		} else {
			b--;
			p = d->d2 - b + 1;
			b = d->d2;
		}

		for (x = 4; p <= b; p++) {
			f = ugetat (s, p);
			usetc (buf + usetc (buf, (f) ? f : ' '), 0);
			w = text_length (font, buf);

			if (((p == d->d2) && (d->flags & D_GOTFOCUS))) {
				abitmap_draw_bmp (bmp, &theme->bitmaps[B_CURSOR][c],
					d->x + x, d->y, w, text_height (font) + 4);
				fg =  theme->bitmaps[B_CURSOR][c].color;
			}
			else
				fg =  theme->bitmaps[B_EDIT][c].color;

			textout_ex (bmp, font, buf, d->x + x, d->y + 4, fg, -1);

			if ((x += w) + w > d->w - 4)
				break;
		}

		agup_edit_restore_position (d);

		return D_O_K;
	}

	if (msg == MSG_LOSTFOCUS || msg == MSG_LOSTMOUSE)
		return D_WANTFOCUS;

	return d_agup_adjusted_edit_proc (msg, d, c);
}