| 524 | // Clear and erase the entire graphics screen on Windows. |
| 525 | |
| 526 | void WinClearScreen(KI ki) |
| 527 | { |
| 528 | KV kv = KvFromKi(ki); |
| 529 | |
| 530 | wi.hbrush = CreateSolidBrush((COLORREF)kv); |
| 531 | SelectObject(wi.hdc, wi.hbrush); |
| 532 | PatBlt(wi.hdc, -gi.xOffset, -gi.yOffset, |
| 533 | wi.xClient*wi.nScaleWin, wi.yClient*wi.nScaleWin, PATCOPY); |
| 534 | SelectObject(wi.hdc, GetStockObject(NULL_BRUSH)); |
| 535 | DeleteObject(wi.hbrush); |
| 536 | } |
| 537 | #endif |
| 538 | |
| 539 |