]> git.tdb.fi Git - r2c2.git/blob - source/engineer/trainproperties.cpp
1aebea029eb2506e070e87c650f5d0f345422f27
[r2c2.git] / source / engineer / trainproperties.cpp
1 #include <msp/gltk/button.h>
2 #include "trainproperties.h"
3
4 using namespace Msp;
5 using namespace Marklin;
6
7 TrainProperties::TrainProperties(GLtk::Resources &r, Train &t):
8         Panel(r),
9         train(t)
10 {
11         set_size(200, 75);
12
13         add(*(ent_name=new GLtk::Entry(res, train.get_name())));
14         ent_name->set_geometry(GLtk::Geometry(5, geom.h-25, geom.w-10, 20));
15
16         add(*(ent_name=new GLtk::Entry(res, train.get_name())));
17         ent_name->set_geometry(GLtk::Geometry(5, geom.h-50, geom.w-10, 20));
18
19         GLtk::Button *btn;
20
21         add(*(btn=new GLtk::Button(res, "OK")));
22         btn->set_geometry(GLtk::Geometry(geom.w-45, 5, 40, 25));
23
24         add(*(btn=new GLtk::Button(res, "Cncl")));
25         btn->set_geometry(GLtk::Geometry(geom.w-90, 5, 40, 25));
26 }