Templot Club forums powered for Martin Wynne by XenForo :

TEMPLOT 3D PLUG TRACK - To get up to speed with this experimental project click here.   To watch an introductory video click here.   See the User Guide at Bexhill West.

     Templot5 - To join this open-source project on GitHub click here.  For news of the latest on-going developments click here.  Templot5 is now included with Templot2 - download.

  • The Plug Track functions are experimental and still being developed. Some of the earlier pages of this topic are now out-of-date.

    For an updated overview of this project see this topic.   For some practical modelling aspects of using Plug Track see Building 3D Track.

    The assumption is that you have your own machines on which to experiment, or helpful friends with machines. Please do not send Templot files to commercial laser cutting or 3D printing firms while this project is still experimental, because the results are unpredictable and possibly wasteful.

    Some pages of this and other topics include contributions from members who are creating and posting their own CAD designs for 3D printing and laser-cutting. Do not confuse them with Templot's own exported CAD files. All files derived from Templot are © Martin Wynne.
  • The Plug Track functions are experimental and still being developed.

    For an updated overview of this project see this topic.   For some practical modelling aspects of using Plug Track see Building 3D Track.

    The assumption is that you have your own machines on which to experiment, or helpful friends with machines. Please do not send Templot files to commercial laser cutting or 3D printing firms while this project is still experimental, because the results are unpredictable and possibly wasteful.

    Some pages of this and other topics include contributions from members who are creating and posting their own CAD designs for 3D printing and laser-cutting. Do not confuse them with Templot's own exported CAD files. All files derived from Templot are © Martin Wynne.

T1 files

Quick reply >

Martin Wynne

Admin
Location
West of the Severn UK
Info
.
Enjoy using Templot?
Thanks.

Please do not send requests for help direct to me via email.

Post your questions on the forum where everyone can see them and make
helpful replies.
This topic will contain my latest open-source code files derived from Templot2.

I'm calling these Templot1 (T1) files to avoid confusion with the previously released T3 Lazarus files.

These files are from Delphi5. They will need conversion for use in Lazarus.

First a couple of small units.

Martin.
 

Attachments

  • alert_unit.pas
    41.5 KB · Views: 272
  • action_unit.pas
    6 KB · Views: 258
  • alert_unit.dfm
    21.2 KB · Views: 265
  • action_unit.dfm
    13.4 KB · Views: 270
_______________
message ref: 1595
@graeme @Alistair Ward

3 more current T2 units.

bitmap_viewer_unit is new since T3 (printed page previewer).

Martin.
 

Attachments

  • bgnd_unit.dfm
    89.9 KB · Views: 272
  • bgkeeps_unit.dfm
    12.2 KB · Views: 221
  • bitmap_viewer_unit.dfm
    5.1 KB · Views: 253
  • bitmap_viewer_unit.pas
    6.2 KB · Views: 248
  • bgnd_unit.pas
    368.8 KB · Views: 275
  • bgkeeps_unit.pas
    8.5 KB · Views: 266
_______________
message ref: 1608

Attachments

  • pdf_unit_redacted.pas
    287.4 KB · Views: 226
  • pdf_unit_redacted.dfm
    14.6 KB · Views: 249
_______________
message ref: 1643
3 more current T2 units.

Martin.
 

Attachments

  • calibration_unit.dfm
    204.4 KB · Views: 251
  • calibration_unit.pas
    59.4 KB · Views: 245
  • chat_unit.dfm
    5.9 KB · Views: 215
  • chat_unit.pas
    19.7 KB · Views: 221
  • check_diffs_unit.dfm
    14.5 KB · Views: 251
  • check_diffs_unit.pas
    31.3 KB · Views: 234
_______________
message ref: 1712
@Alistair Ward @graeme

This is what Delphi calls the "Main Form". Closing it closes the application.

I have redacted all the version-check on startup internet stuff.

Presumably T3 will have its own update functions.

Martin.
 

Attachments

  • control_room_redacted.pas
    229.1 KB · Views: 253
  • control_room_redacted.dfm
    502.7 KB · Views: 252
_______________
message ref: 1725

Attachments

  • create_tandem.dfm
    5.4 KB · Views: 232
  • create_tandem.pas
    71 KB · Views: 238
  • create_y_turnout.dfm
    4.3 KB · Views: 246
  • create_y_turnout.pas
    5.4 KB · Views: 236
_______________
message ref: 1727
@Alistair Ward @graeme

More units.

dtp_settings_unit is the sketchboard control panel, and contains remnants of Nils's code.

Martin.
 

Attachments

  • data_memo_unit.dfm
    1.2 KB · Views: 228
  • data_memo_unit.pas
    3.1 KB · Views: 234
  • detail_mode_unit.dfm
    4.1 KB · Views: 229
  • detail_mode_unit.pas
    6 KB · Views: 228
  • dtp_settings_unit.dfm
    790.3 KB · Views: 252
  • dtp_settings_unit.pas
    228.3 KB · Views: 247
_______________
message ref: 1729
@Alistair Ward @graeme

This is the sketchboard screen unit.

It contains a few remnants of Nils's code.

Obviously it won't work without Nils's dtp units, but I'm posting it because it contains the sb_draw function which is also used for image and metafile exports.

cheers,

Martin.
 

Attachments

  • dtp_unit.dfm
    43.5 KB · Views: 256
_______________
message ref: 1730
@Alistair Ward @graeme

The problem with posting my current files is that they change so often. :(

dtp_unit.pas has a couple of fixes since I posted it earlier.

Martin.
 

Attachments

  • dtp_unit.pas
    365.2 KB · Views: 242
_______________
message ref: 1733
The problem with posting my current files is that they change so often. :(
Hi Martin,

I am not sure what Alistair was expecting, but I thought you would only post a new copy of the files with each new release.

If it is easier for you to post each time you update, though, that's fine too. I can accommodate either.

Whatever is easiest for you, really.

Cheers,

Graeme
 
_______________
message ref: 1736
am not sure what Alistair was expecting, but I thought you would only post a new copy of the files with each new release.
@graeme @Alistair Ward

Hi Graeme, Alistair,

I'm not sure how best to proceed either.

I made a big mistake with 227 in leaving too long a gap from the previous update, almost 12 months. There was a reason for that -- the urgent need to swap to a new server and a new Templot Club forum software. But I allowed that to distract me too much from the unfinished 227 work. By the time I got back to it I had completely forgotten where I had got to, which bits were finished, which still had loose ends, and which I had barely started. I scribble notes in my notebook, but nowadays they become meaningless within hours. As a result of all that it has taken me 4 updates to fix the bugs in 227a and I still haven't finished.

I should have known better, because I made the same mistake 10 years ago with a long gap going from TemplotZero to Templot2. And at that time I could still remember what I had for breakfast. :)

I originally added the auto-updating function so that I could make future updates little and often. Small incremental changes which don't leave unfinished loose ends for months, by which time I have forgotten all about them. And which allow easy back-tracking if I mess up. I intend to stick to that plan from now on, making frequent update releases even if they don't contain very much.

How that fits in with posting the updated files here isn't too clear, but the first task is to get every file posted in its current state. I'm working through them alphabetically and so far I have got only as far as D, so even that is going to take a while. After that we can decide how best to feed future changes from Templot2 into T3.

cheers,

Martin.
 
_______________
message ref: 1738
@Alistair Ward @graeme

Next up is the dxf_unit.

This is the export function for DXF files for CAD. Also STL files when exporting in 3D.

This file includes a lot of my unfinished experimental stuff for 3D chairing. I'm not sure how you want to deal with that for T3? A lot of it may never see the light of day. On the other hand, going through it to create a fully functional redacted version would take me several hours.

p.s. large chunks of this file haven't changed for 25 years. Probably I would do things differently now. :)

edit: updated files now at: https://85a.uk/templot/club/index.php?threads/t1-files.192/post-3377

cheers,

Martin.
 
_______________
message ref: 1739

Attachments

  • enter_timber.pas
    8.2 KB · Views: 224
  • edit_outline_unit.pas
    7.7 KB · Views: 226
  • edit_outline_unit.dfm
    3.8 KB · Views: 192
  • edit_memo_unit.pas
    5.3 KB · Views: 231
  • edit_memo_unit.dfm
    3.2 KB · Views: 234
  • enter_timber.dfm
    2.4 KB · Views: 192
_______________
message ref: 1740

Attachments

  • entry_sheet.pas
    67.5 KB · Views: 205
  • entry_sheet.dfm
    30.9 KB · Views: 239
  • export_unit.pas
    45.5 KB · Views: 240
  • export_unit.dfm
    30.2 KB · Views: 242
_______________
message ref: 1741

Attachments

  • file_viewer.dfm
    11.4 KB · Views: 182
  • file_viewer.pas
    66.5 KB · Views: 233
_______________
message ref: 1742

Attachments

  • gaps_unit.pas
    20.8 KB · Views: 174
  • gaps_unit.dfm
    20.1 KB · Views: 204
_______________
message ref: 1743

Attachments

  • getfile_unit.dfm
    3 KB · Views: 201
  • getfile_unit.pas
    2.9 KB · Views: 161
  • gauge_unit.dfm
    16.7 KB · Views: 170
  • gauge_unit.pas
    104.9 KB · Views: 212
_______________
message ref: 1746
I made a big mistake with 227 in leaving too long a gap .....
You have my sympathy there. My memory has never been the best (I have NEVER been able to remember what I had for breakfast!) and leaving any kind of gap in development work never ends well for me. :confused:

... future updates little and often.... I intend to stick to that plan from now on, making frequent update releases even if they don't contain very much.... the first task is to get every file posted in its current state.....
That sounds like a plan to me. This seems to be going quicker than I expected, so barring whoopsies, it seems we will be there quite soon. :)

Cheers,

g
 
_______________
message ref: 1749
That sounds like a plan to me. This seems to be going quicker than I expected, so barring whoopsies, it seems we will be there quite soon.
@graeme @Alistair Ward

How is it going in getting any of this merged into T3?

2 more.

Martin.
 

Attachments

  • help_sheet.pas
    65.9 KB · Views: 208
  • help_sheet.dfm
    18.3 KB · Views: 187
  • grid_unit.pas
    221.3 KB · Views: 169
  • grid_unit.dfm
    20.8 KB · Views: 209
_______________
message ref: 1753

Attachments

  • intersect_unit.pas
    17.3 KB · Views: 255
  • intersect_unit.dfm
    11.6 KB · Views: 264
  • info_unit.pas
    28.5 KB · Views: 274
  • info_unit.dfm
    25.6 KB · Views: 281
  • image_viewer_unit.pas
    7.7 KB · Views: 251
  • image_viewer_unit.dfm
    3 KB · Views: 271
_______________
message ref: 1754
Thanks Martin,

Actually, we have not yet started to bring them together. Obviously it is going to be a fairly major job, and it may well be that the best strategy is a merge of the two. Whether we can automate any of it will only be clearer once we have pretty much a full set of files in T1.

I think I have been guided by cowardice so far. In the worst case, it will be a manual effort, probably based on functions, rather than files, which is another reason to leave it until we have them at least mostly in place.

Given the amount of work done on T2 in the interim, it may turn out that it is easier to layer our changes on top of these T1 sources rather than the other way round.

@Alistair Ward - have you had any brainwaves in this area?

Cheers,

g
 
_______________
message ref: 1760
Given the amount of work done on T2 in the interim, it may turn out that it is easier to layer our changes on top of these T1 sources rather than the other way round.
@graeme @Alistair Ward

Bear in mind that I did a lot of work to make the first T3 compile in Lazarus, so if you use T1 as the basis you would need to do all that again.

For example, writing Parent:=pad_form; doesn't work, Lazarus has a different approach to child forms. Also EMF metafiles are not supported, so I replaced the Delphi code with direct calls to Windows API. Which remains non-portable to other platforms of course.

3 more.

keep_select.pas is a large file, contains the storage box and .box file handling.

lib_unit.pas is the new library viewer in 227.

Martin.
 

Attachments

  • jotter_unit.dfm
    6.7 KB · Views: 242
  • lib_unit.dfm
    3.8 KB · Views: 277
  • lib_unit.pas
    9.1 KB · Views: 275
  • keep_select.pas
    500.9 KB · Views: 281
  • keep_select.dfm
    75 KB · Views: 283
  • jotter_unit.pas
    21.8 KB · Views: 265
_______________
message ref: 1762

Attachments

  • map_clarity_unit.pas
    52.7 KB · Views: 260
  • map_clarity_unit.dfm
    18.6 KB · Views: 264
  • make_slip_unit.pas
    36.3 KB · Views: 245
  • make_slip_unit.dfm
    1.5 KB · Views: 272
_______________
message ref: 1765
Bear in mind that I did a lot of work to make the first T3 compile in Lazarus, so if you use T1 as the basis you would need to do all that again.
Yes, indeed.

That thought was the reasoning behind my earlier question about basing T1 on the earlier version that T3 was based on. That would have given us a common base from which both branches were derived, but that turned out to be impractical, so I think it will be a case of comparing T1 with the original (2019) T3 to ferret out those Lazarussian changes.

Hopefully they will be easily distinguished from the changes you have made for T2. :)

After that .... hmmmm .... well it will depend to some extent on what comes out of that process, I suppose.

At least it is a one-off exercise. Things should be easier after that.

Cheers,

Graeme
 
_______________
message ref: 1767
@graeme @Alistair Ward

This is the background maps unit, which is in a constant state of flux as I try to keep up with the web sites.

Martin.
 

Attachments

  • map_loader_unit.dfm
    39.3 KB · Views: 219
  • map_loader_unit.pas
    96.2 KB · Views: 265
_______________
message ref: 1768
@graeme @Alistair Ward

Sorry about the delay in posting these files. Alphabetically I have reached the math_unit. It contains a lot of changes in 228, so there didn't seem much point in posting it until I have 228a released. Which will hopefully be in the next few days.

cheers,

Martin.
 
_______________
message ref: 1924
Sorry about the delay in posting these files.
No problem - I guessed that you were busy with the latest release.

... there didn't seem much point in posting it until I have 228a released. Which will hopefully be in the next few days.
Indeed! It will certainly be better if we are working from a complete set of files which represent one release as our base.

Cheers,

Graeme
 
_______________
message ref: 1932
@graeme @Alistair Ward

Hi Graeme, Alistair,

Here after a long gap (sorry) is math_unit.pas as at T2 version 233a released yesterday.

It changes almost daily while I'm working on the experimental chairing, but if I wait until it's finished it never will get posted. If anything is unclear, just ask. :)

Also the form math_unit.dfm, although there are no significant (or any) changes to that from previous versions. It's just a general utility form.

cheers,

Martin.
 

Attachments

  • math_unit.dfm
    7.2 KB · Views: 241
  • math_unit.pas
    1.5 MB · Views: 250
_______________
message ref: 3375
@Alistair Ward @graeme

Hi Alistair, Graeme,

Here now is the dxf_unit as at T2 version 233a.

This is the export function for 2-D and 3-D DXF files for CAD. Also STL files when exporting in 3D.

This file includes most of my unfinished experimental stuff for 3D chairing. The form is massively changed from previous versions.

cheers,

Martin.
 

Attachments

  • dxf_unit.dfm
    88 KB · Views: 250
  • dxf_unit.pas
    332 KB · Views: 193
_______________
message ref: 3377
Back
Top