#TOP

Using Delphi XE7 with the EPA SMMM 5.1.011 GUI


Note – these are the steps I took to add the GUI code for SWMM 5.1.011 to my newer Delphi XE7.   SWMM 5 GUI uses Delphi XE2

CONTENTS OF SWMM51011_GUI.ZIP
=============================

This archive contains source code for the Windows graphical user
interface portion of Version 5.1.011 of the Storm Water Management
Model (SWMM). The interface was written using Embarcadero’s Delphi
XE2 (www.embarcadero.com). The name of the Delphi project containing
the code is Epaswmm5. All of the files for the project can be found
in the GUI5_1_011.ZIP file within this archive.

Before the Epaswmm5 project can be loaded into Delphi’s Integrated
Development Environment (IDE), several special components must be
installed into the IDE’s component pallette. The source code for
these components is contained in the COMPONENTS.ZIP file in this
archive. Consult the Delphi Users Guide for instructions on how to
install these components.

Step 1. Load Delphi XE7

Step 2. Load the SWMM5 dproj file

Step 3. Turn off Skins in Delphi Project Options

Step 4. Remove missing printers

Step 5. Add Xprinter.dcu to the GUI

Step 6. Set the Output Directory in Project Options

Step 7. Get rid of references to Print and Menu Items for Print

unit Umap;

{——————————————————————-}
{ Unit: Umap.pas }
{ Project: EPA SWMM }
{ Version: 5.1 }
{ Date: 11/12/13 (5.1.000) }
{ Author: L. Rossman }
{ }
{ Delphi Pascal unit that defines the TMap object. This object }
{ contains drawing methods for rendering the Study Area Map on a }
{ memory bitmap. It also draws a backdrop image, draws the map }
{ legends, identifies the bounding rectangle for an object, and }
{ handles map re-scaling. }
{——————————————————————-}

interface

uses
Windows, Graphics, SysUtils, Dialogs, Forms, Classes,
Controls, Math, Jpeg, Uglobals, Uproject, Uutils, Uvertex, System.UITypes, System.Types;

Step 8. Change the label4 in DABOUT – to show this is a modified version

procedure TAboutBoxForm.FormCreate(Sender: TObject);

begin

Label4.Caption := ‘Storm Water Management Model’#10’Version 5.1 – QA’;

Step 9. Run to see if it works

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s