dlgsize.rc

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

// Define
 #define  IDD_LAYOUT   101
 #define  IDI_LAYOUT   102
 #define  IDC_B1       1001
 #define  IDC_B2       1002
 #define  IDC_B3       1003
 #define  IDC_E1       2001
 #define  IDC_E2       2002
 #define  IDC_G1       3001
 #define  IDC_STATIC   -1

// Dialog
 IDD_LAYOUT DIALOG DISCARDABLE -32768, 5, 198, 154
   STYLE WS_MINIMIZEBOX | WS_MAXIMIZEBOX | WS_VISIBLE | WS_CAPTION | WS_SYSMENU | WS_THICKFRAME
   CAPTION "Dialog Size"
   FONT 8, "MS Sans Serif"
 BEGIN
   LTEXT "E1:", IDC_STATIC, 7, 10, 29, 8
   EDITTEXT IDC_E1, 7, 21, 64, 12, ES_AUTOHSCROLL
   GROUPBOX "G1", IDC_G1, 83, 8, 105, 32
   PUSHBUTTON "B3", IDC_B3, 112, 19, 49, 14
   CONTROL "E2:", IDC_STATIC, "Static", SS_LEFTNOWORDWRAP | WS_GROUP, 7, 42, 45, 8
   EDITTEXT IDC_E2, 7, 53, 128, 73, ES_AUTOHSCROLL
   PUSHBUTTON "B1", IDC_B1, 32, 129, 49, 14
   PUSHBUTTON "B2", IDC_B2, 74, 133, 49, 14
 END


// Icon
 IDI_LAYOUT ICON DISCARDABLE "DlgSize.ico"