diff options
| author | Erich Eckner <git@eckner.net> | 2015-11-20 11:19:50 +0100 |
|---|---|---|
| committer | Erich Eckner <git@eckner.net> | 2015-11-20 11:19:50 +0100 |
| commit | 34b0a791cc26dd1a6b36fda32b806aeb4d203147 (patch) | |
| tree | d3ca23d64091089d5f1763e86c4a38dc13d4a830 | |
| parent | 10cd7b5a91af74320c8df3538940bf816e0bea21 (diff) | |
| download | Plasmapropagation-34b0a791cc26dd1a6b36fda32b806aeb4d203147.tar.xz | |
Schleifenvariablen haben jetzt feste Anzahl an Stellen
| -rw-r--r-- | Physikunit.pas | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Physikunit.pas b/Physikunit.pas index e72c48a..680419b 100644 --- a/Physikunit.pas +++ b/Physikunit.pas @@ -559,7 +559,7 @@ begin if sT>=nNum then naechsterZykel; - assignFile(datei,pre+'-'+inttostr(nNum-1)+'-'+inttostr(tCnt)+suf); + assignFile(datei,pre+'-'+inttostr(nNum-1)+'-'+myinttostr(tCnt,ceil(ln(zeitAnz)/ln(10)),'0')+suf); rewrite(datei,1); inc(tCnt); |