ABOUT3.RC: Translation to Stony Brook Modula-2

Last updated: 17.10.1997, 21:56

/*---------------------------
   ABOUT3.RC resource script
  ---------------------------*/

#include 
#include "about3.h"

about3 ICON ABOUT3.ICO

About3 MENU
     BEGIN
     POPUP "&Help"
          BEGIN
          MENUITEM "&About About3...",       IDM_ABOUT
          END
     END

#define TABGRP (WS_TABSTOP | WS_GROUP)

AboutBox DIALOG  20, 20, 180, 135
     STYLE WS_POPUP | WS_DLGFRAME
     BEGIN
     CTEXT   "About3"                         -1,  0, 12, 180,  8
     ICON    "About3"                         -1,  8,  8,   0,  0
     CTEXT   "About Box Demo Program"         -1,  0, 36, 180,  8
     CTEXT   "(c) Charles Petzold, 1996"      -1,  0, 48, 180,  8
     CTEXT   "translated to SBM2       "      -1,   0, 60, 180,  8
     CTEXT   "(c) Peter Stadler,   1997"      -1,   0, 72, 180,  8
     CONTROL "OK" IDOK, "EllipPush",   TABGRP,     64, 84,  32, 14
     END