WndProc (Part 8)

if (credraw)

                           {

                                  int pvalue=0;

                                  pvalue=((column-1)*100)+row;

                                  type=stype+pvalue;

                                  cvalx=5+((curxpos-1)*9);

                                  cvaly=cyChar*(4+curypos);

                                  SetTextColor(hdc, RGB(255,255,255));

                                  SetBkColor(hdc, RGB(0,0,200));

                           evaluate_cell(column,row,(char)*type,szBuffer,'D',genetic);

                                  TextOut(hdc, 0.25+cxChar*cvalx, cvaly, szBuffer,9);

                                  SetTextColor(hdc, RGB(0,0,0));

                                  SetBkColor(hdc, RGB(255,255,255));

                                  credraw=0;

                           }

                           finished:

                           EndPaint(hWnd, &ps);

// 

                     break;