keycount.rc

这一系列是我平时收集的pascal深入核心编程

// Define
 #define IDI_KEYCOUNT 101
 #define IDC_START 1000
 #define IDC_STOP 1001
 #define IDC_KEYCOUNT 1002
 #define IDC_LASTKEY 1003
 #define IDD_KEYCOUNT 1004
 #define IDC_EDIT 1005
 #define IDC_STATIC -1

// Icon
 IDI_KEYCOUNT ICON DISCARDABLE "KEYCOUNT.ICO"

// Dialog
 IDD_KEYCOUNT DIALOG DISCARDABLE -32768, 5, 214, 79
   STYLE WS_MINIMIZEBOX | WS_VISIBLE | WS_CAPTION | WS_SYSMENU
   CAPTION "Key Count"
   FONT 8, "MS Sans Serif"
 BEGIN
   PUSHBUTTON "&Start", IDC_START, 7, 4, 50, 14
   PUSHBUTTON "S&top", IDC_STOP, 63, 4, 50, 14
   LTEXT "", IDC_LASTKEY, 68, 28, 138, 9
   LTEXT "0", IDC_KEYCOUNT, 68, 44, 37, 9
   RTEXT "Last key:", IDC_STATIC, 4, 28, 58, 9
   RTEXT "Total keystrokes:", IDC_STATIC, 4, 44, 58, 9
   RTEXT "Keys to Reject:", IDC_STATIC, 6, 61, 56, 9
   EDITTEXT IDC_EDIT, 68, 59, 136, 12, ES_AUTOHSCROLL
 END