[C大程] 图形程序设计_4 编写窗口输入程序

#include "graphics.h"
#include "extgraph.h"
#include "genlib.h"
#include "simpio.h"
#include "strlib.h"
#include "conio.h"
#include <stdio.h>
#include <stdlib.h>
#include <stddef.h>

#include <windows.h>
#include <olectl.h>
#include <stdio.h>
#include <mmsystem.h>
#include <wingdi.h>
#include <ole2.h>
#include <ocidl.h>
#include <winuser.h>

#define TIMER_BLINK 1

const int mseconds = 1000;

static char Text[100];
static int textlen = 0;
static int location=-1;

static bool isBlink = FALSE;
static bool isDisplay = FALSE;

void KeyboardEventProcess(int key,int event);
void CharEventProcess(char c);
void TimerEventProcess(int timerID);

void Main()
{
InitConsole();
InitGraphics();
MovePen(0.2,1);
registerKeyboardEvent(KeyboardEventProcess);
registerCharEvent(CharEventProcess);
registerTimerEvent(TimerEventProcess);
if (isBlink) startTimer(TIMER_BLINK, mseconds);
isBlink = !isBlink;
if (isBlink ) startTimer(TIMER_BLINK, mseconds);
else cancelTimer(TIMER_BLINK);
}

void CharEventProcess(char key)
{
//	printf("textlen=%d,text=%s\n",textlen,Text);
if(textlen>=99||GetCurrentX()>=GetWindowWidth()-0.2)return;
if(key==VK_BACK||key==VK_DELETE)return;
if(key=='\r'){
SetEraseMode(TRUE);
if(isBlink && isDisplay){
DrawTextString("_");
MovePen(GetCurrentX()-TextStringWidth("_"),GetCurrentY());
}
InitConsole();
printf("%s\n", Text);
system("pause");
FreeConsole();
MovePen(GetCurrentX()-TextStringWidth(Text), GetCurrentY());
DrawTextString(Text);
SetEraseMode(FALSE);
MovePen(GetCurrentX()-TextStringWidth(Text), GetCurrentY());
textlen=0;
location=-1;
Text[0]='\0';
}
else{
char str[2]={0,0};
str[0]=key;
if(location==textlen-1){
Text[textlen++]=key;
Text[textlen]='\0';
DrawTextString(str);
location++;
}
else{
int i;
string s1;
s1=SubString(Text,location+1,textlen);
SetEraseMode(TRUE);
DrawTextString(s1);
SetEraseMode(FALSE);
MovePen(GetCurrentX()-TextStringWidth(s1),GetCurrentY());
DrawTextString(str);
DrawTextString(s1);
MovePen(GetCurrentX()-TextStringWidth(s1),GetCurrentY());
textlen++;
location++;
for(i=textlen;i>=location+1;i--){
Text[i]=Text[i-1];
}
Text[location]=key;
}
if (isBlink && isDisplay) {
SetEraseMode(TRUE);
MovePen(GetCurrentX()-TextStringWidth(str), GetCurrentY());
DrawTextString("_");
MovePen(GetCurrentX()-TextStringWidth("_"),GetCurrentY());
SetEraseMode(FALSE);
DrawTextString(str);
}
else{
MovePen(GetCurrentX()-TextStringWidth(str),GetCurrentY());
DrawTextString(str);
}
}
}
void KeyboardEventProcess(int key,int event)
{
static char str[2]={0,0};
switch(event){
case KEY_DOWN:
if(key==VK_DELETE||key==VK_BACK){
if(location<0)return;
int i;
SetEraseMode(TRUE);
if (isBlink && isDisplay) {
MovePen(GetCurrentX(), GetCurrentY());
DrawTextString("_");
MovePen(GetCurrentX()-TextStringWidth("_"), GetCurrentY());
}
str[0]=Text[location];
MovePen(GetCurrentX()-TextStringWidth(str),GetCurrentY());
DrawTextString(str);
if(location==textlen)MovePen(GetCurrentX()-TextStringWidth(str),GetCurrentY());
else{
string s1,s2;
s1=SubString(Text,location+1,textlen);
s2=SubString(Text,location,textlen);
SetEraseMode(TRUE);
DrawTextString(s1);
SetEraseMode(FALSE);
MovePen(GetCurrentX()-TextStringWidth(s2),GetCurrentY());
DrawTextString(s1);
MovePen(GetCurrentX()-TextStringWidth(s1),GetCurrentY());
}
for(i=location;i<textlen;i++){
Text[i]=Text[i+1];
}
Text[--textlen]='\0';
location--;
SetEraseMode(FALSE);
}
else if(key==VK_LEFT){
if(location<0)return;
if (isBlink && isDisplay) {
SetEraseMode(TRUE);
MovePen(GetCurrentX(), GetCurrentY());
DrawTextString("_");
SetEraseMode(FALSE);
MovePen(GetCurrentX()-TextStringWidth("_"), GetCurrentY());
}
str[0]=Text[location];
MovePen(GetCurrentX()-TextStringWidth(str),GetCurrentY());
location--;
}
else if(key==VK_RIGHT){
if(location>=textlen)return;
if (isBlink && isDisplay) {
SetEraseMode(TRUE);
MovePen(GetCurrentX(), GetCurrentY());
DrawTextString("_");
SetEraseMode(FALSE);
MovePen(GetCurrentX()-TextStringWidth("_"), GetCurrentY());
}
str[0]=Text[location+1];
MovePen(GetCurrentX()+TextStringWidth(str),GetCurrentY());
location++;
}
}
}

void TimerEventProcess(int timerID)
{
double x, y;
bool erasemode;
switch (timerID) {
case TIMER_BLINK:
if (!isBlink) return;
erasemode = GetEraseMode();
x = GetCurrentX();
y = GetCurrentY();
SetEraseMode(isDisplay);
DrawTextString("_");
MovePen(x, y);
if(textlen-1!=location){
char str[2]={0,0};
str[0]=Text[location+1];
SetEraseMode(FALSE);
DrawTextString(str);
MovePen(x,y);
}
SetEraseMode(erasemode);
isDisplay = !isDisplay;
break;
default:
break;
}
}