camelCase

1 files changed, 74 insertions, 74 deletions

diff --git a/typenunit.pas b/typenunit.pas
index a5fe65b..b48ef8e 100644
--- a/typenunit.pas
+++ b/typenunit.pas
@@ -22,7 +22,7 @@ type
     genauigkeit:                  tGenauigkeit;
     xSteps,tSiz,t0Abs:            longint;
     params:                       tExtraInfos;
-    constructor create(Vorlage: tGenerischeInputDateiInfo); overload;
+    constructor create(vorlage: tGenerischeInputDateiInfo); overload;
     constructor create; overload;
     destructor destroy; override;
     function xMin: longint;
@@ -31,24 +31,24 @@ type
     function tMax: longint;
   end;
   tPhaseSpaceInputDateiInfo = class (tGenerischeInputDateiInfo)
-    constructor create(Vorlage: tGenerischeInputDateiInfo); overload;
+    constructor create(vorlage: tGenerischeInputDateiInfo); overload;
     constructor create; overload;
     destructor destroy; override;
   end;
   tSpaceTimeInputDateiInfo = class (tGenerischeInputDateiInfo)
-    constructor create(Vorlage: tGenerischeInputDateiInfo); overload;
+    constructor create(vorlage: tGenerischeInputDateiInfo); overload;
     constructor create; overload;
     destructor destroy; override;
   end;
   tTraceInputDateiInfo = class (tGenerischeInputDateiInfo)
     spurNummer,feldNummer: longint;
-    constructor create(Vorlage: tGenerischeInputDateiInfo); overload;
+    constructor create(vorlage: tGenerischeInputDateiInfo); overload;
     constructor create; overload;
     destructor destroy; override;
   end;
   tSergeyInputDateiInfo = class (tGenerischeInputDateiInfo)
     feldNummer:       longint;
-    constructor create(Vorlage: tGenerischeInputDateiInfo); overload;
+    constructor create(vorlage: tGenerischeInputDateiInfo); overload;
     constructor create; overload;
     destructor destroy; override;
   end;
@@ -56,7 +56,7 @@ type
     analysator:     string;
     bytesPerSample: longint;
     Kodierung:      tKodierung;
-    constructor create(Vorlage: tGenerischeInputDateiInfo); overload;
+    constructor create(vorlage: tGenerischeInputDateiInfo); overload;
     constructor create; overload;
     destructor destroy; override;
     function executable: string;
@@ -76,7 +76,7 @@ type
       rahmenToepfe:                       tIntPoint;
     bildBereich,rahmenBereich:            t2x2Longint;
     shutterZeit:                          tExtPoint;
-    constructor create(Vorlage: tGenerischeInputDateiInfo); overload;
+    constructor create(vorlage: tGenerischeInputDateiInfo); overload;
     constructor create; overload;
     destructor destroy; override;
     function detectorSkipLines: int64;
@@ -514,32 +514,32 @@ implementation
 
 // tGenerischeInputDateiInfo ***************************************************
 
-constructor tGenerischeInputDateiInfo.create(Vorlage: tGenerischeInputDateiInfo);
+constructor tGenerischeInputDateiInfo.create(vorlage: tGenerischeInputDateiInfo);
 begin
   inherited create;
-  fillchar(name,sizeOf(name),#0);
-  name:=Vorlage.name;
-  fillchar(fehlerBehebungsKommando,sizeOf(fehlerBehebungsKommando),#0);
-  fehlerBehebungsKommando:=Vorlage.fehlerBehebungsKommando;
-  gamma:=Vorlage.gamma;
-  groeszenFaktor:=Vorlage.groeszenFaktor;
-  genauigkeit:=Vorlage.genauigkeit;
-  tSiz:=Vorlage.tSiz;
-  xSteps:=Vorlage.xSteps;
-  tStart:=Vorlage.tStart;
-  tStop:=Vorlage.tStop;
-  xStart:=Vorlage.xStart;
-  xStop:=Vorlage.xStop;
-  params:=Vorlage.params;
-  t0Abs:=Vorlage.t0Abs;
+  fillChar(name,sizeOf(name),#0);
+  name:=vorlage.name;
+  fillChar(fehlerBehebungsKommando,sizeOf(fehlerBehebungsKommando),#0);
+  fehlerBehebungsKommando:=vorlage.fehlerBehebungsKommando;
+  gamma:=vorlage.gamma;
+  groeszenFaktor:=vorlage.groeszenFaktor;
+  genauigkeit:=vorlage.genauigkeit;
+  tSiz:=vorlage.tSiz;
+  xSteps:=vorlage.xSteps;
+  tStart:=vorlage.tStart;
+  tStop:=vorlage.tStop;
+  xStart:=vorlage.xStart;
+  xStop:=vorlage.xStop;
+  params:=vorlage.params;
+  t0Abs:=vorlage.t0Abs;
 end;
 
 constructor tGenerischeInputDateiInfo.create;
 begin
   inherited create;
-  fillchar(name,sizeOf(name),#0);
+  fillChar(name,sizeOf(name),#0);
   name:='';
-  fillchar(fehlerBehebungsKommando,sizeOf(fehlerBehebungsKommando),#0);
+  fillChar(fehlerBehebungsKommando,sizeOf(fehlerBehebungsKommando),#0);
   fehlerBehebungsKommando:='';
   gamma:=1;
   groeszenFaktor:=1;
@@ -593,9 +593,9 @@ end;
 
 // tPhaseSpaceInputDateiInfo ****************************************************
 
-constructor tPhaseSpaceInputDateiInfo.create(Vorlage: tGenerischeInputDateiInfo);
+constructor tPhaseSpaceInputDateiInfo.create(vorlage: tGenerischeInputDateiInfo);
 begin
-  inherited create(Vorlage);
+  inherited create(vorlage);
 end;
 
 constructor tPhaseSpaceInputDateiInfo.create;
@@ -610,9 +610,9 @@ end;
 
 // tSpaceTimeInputDateiInfo ****************************************************
 
-constructor tSpaceTimeInputDateiInfo.create(Vorlage: tGenerischeInputDateiInfo);
+constructor tSpaceTimeInputDateiInfo.create(vorlage: tGenerischeInputDateiInfo);
 begin
-  inherited create(Vorlage);
+  inherited create(vorlage);
 end;
 
 constructor tSpaceTimeInputDateiInfo.create;
@@ -627,12 +627,12 @@ end;
 
 // tTraceInputDateiInfo ********************************************************
 
-constructor tTraceInputDateiInfo.create(Vorlage: tGenerischeInputDateiInfo);
+constructor tTraceInputDateiInfo.create(vorlage: tGenerischeInputDateiInfo);
 begin
-  inherited create(Vorlage);
-  if Vorlage is tTraceInputDateiInfo then begin
-    spurNummer:=(Vorlage as tTraceInputDateiInfo).spurNummer;
-    feldNummer:=(Vorlage as tTraceInputDateiInfo).feldNummer;
+  inherited create(vorlage);
+  if vorlage is tTraceInputDateiInfo then begin
+    spurNummer:=(vorlage as tTraceInputDateiInfo).spurNummer;
+    feldNummer:=(vorlage as tTraceInputDateiInfo).feldNummer;
   end
   else begin
     spurNummer:=0;
@@ -654,11 +654,11 @@ end;
 
 // tSergeyInputDateiInfo *******************************************************
 
-constructor tSergeyInputDateiInfo.create(Vorlage: tGenerischeInputDateiInfo);
+constructor tSergeyInputDateiInfo.create(vorlage: tGenerischeInputDateiInfo);
 begin
-  inherited create(Vorlage);
-  if Vorlage is tSergeyInputDateiInfo then
-    feldNummer:=(Vorlage as tSergeyInputDateiInfo).feldNummer
+  inherited create(vorlage);
+  if vorlage is tSergeyInputDateiInfo then
+    feldNummer:=(vorlage as tSergeyInputDateiInfo).feldNummer
   else
     feldNummer:=0;
 end;
@@ -676,14 +676,14 @@ end;
 
 // tPipeInputDateiInfo *********************************************************
 
-constructor tPipeInputDateiInfo.create(Vorlage: tGenerischeInputDateiInfo);
+constructor tPipeInputDateiInfo.create(vorlage: tGenerischeInputDateiInfo);
 begin
-  inherited create(Vorlage);
-  fillchar(analysator,sizeOf(analysator),#0);
-  if Vorlage is tPipeInputDateiInfo then begin
-    analysator:=(Vorlage as tPipeInputDateiInfo).analysator;
-    bytesPerSample:=(Vorlage as tPipeInputDateiInfo).bytesPerSample;
-    Kodierung:=(Vorlage as tPipeInputDateiInfo).Kodierung;
+  inherited create(vorlage);
+  fillChar(analysator,sizeOf(analysator),#0);
+  if vorlage is tPipeInputDateiInfo then begin
+    analysator:=(vorlage as tPipeInputDateiInfo).analysator;
+    bytesPerSample:=(vorlage as tPipeInputDateiInfo).bytesPerSample;
+    Kodierung:=(vorlage as tPipeInputDateiInfo).Kodierung;
   end
   else begin
     analysator:='/usr/bin/soxi -';
@@ -695,7 +695,7 @@ end;
 constructor tPipeInputDateiInfo.create;
 begin
   inherited create;
-  fillchar(analysator,sizeOf(analysator),#0);
+  fillChar(analysator,sizeOf(analysator),#0);
   analysator:='/usr/bin/soxi -';
   bytesPerSample:=-1;
   Kodierung:=kUnbekannt;
@@ -733,29 +733,29 @@ end;
 
 // tAndorInputDateiInfo *******************************************************
 
-constructor tAndorInputDateiInfo.create(Vorlage: tGenerischeInputDateiInfo);
-begin
-  inherited create(Vorlage);
-  if Vorlage is tAndorInputDateiInfo then begin
-    temperatur:=(Vorlage as tAndorInputDateiInfo).temperatur;
-    belichtungsZeit:=(Vorlage as tAndorInputDateiInfo).belichtungsZeit;
-    zyklusZeit:=(Vorlage as tAndorInputDateiInfo).zyklusZeit;
-    akkumulierteZyklusZeit:=(Vorlage as tAndorInputDateiInfo).akkumulierteZyklusZeit;
-    akkumulierteZyklen:=(Vorlage as tAndorInputDateiInfo).akkumulierteZyklen;
-    zyklusStapelZeit:=(Vorlage as tAndorInputDateiInfo).zyklusStapelZeit;
-    pixelAusleseZeit:=(Vorlage as tAndorInputDateiInfo).pixelAusleseZeit;
-    verstaerkungADW:=(Vorlage as tAndorInputDateiInfo).verstaerkungADW;
-    detektorTyp:=(Vorlage as tAndorInputDateiInfo).detektorTyp;
-    dateiName:=(Vorlage as tAndorInputDateiInfo).dateiName;
-    detektorGroesze:=(Vorlage as tAndorInputDateiInfo).detektorGroesze;
-    shutterZeit:=(Vorlage as tAndorInputDateiInfo).shutterZeit;
-    xAchsenTitel:=(Vorlage as tAndorInputDateiInfo).xAchsenTitel;
-    yAchsenTitel:=(Vorlage as tAndorInputDateiInfo).yAchsenTitel;
-    datenTypTitel:=(Vorlage as tAndorInputDateiInfo).datenTypTitel;
-    bildBereichStapel:=(Vorlage as tAndorInputDateiInfo).bildBereichStapel;
-    rahmenToepfe:=(Vorlage as tAndorInputDateiInfo).rahmenToepfe;
-    bildBereich:=(Vorlage as tAndorInputDateiInfo).bildBereich;
-    rahmenBereich:=(Vorlage as tAndorInputDateiInfo).rahmenBereich;
+constructor tAndorInputDateiInfo.create(vorlage: tGenerischeInputDateiInfo);
+begin
+  inherited create(vorlage);
+  if vorlage is tAndorInputDateiInfo then begin
+    temperatur:=(vorlage as tAndorInputDateiInfo).temperatur;
+    belichtungsZeit:=(vorlage as tAndorInputDateiInfo).belichtungsZeit;
+    zyklusZeit:=(vorlage as tAndorInputDateiInfo).zyklusZeit;
+    akkumulierteZyklusZeit:=(vorlage as tAndorInputDateiInfo).akkumulierteZyklusZeit;
+    akkumulierteZyklen:=(vorlage as tAndorInputDateiInfo).akkumulierteZyklen;
+    zyklusStapelZeit:=(vorlage as tAndorInputDateiInfo).zyklusStapelZeit;
+    pixelAusleseZeit:=(vorlage as tAndorInputDateiInfo).pixelAusleseZeit;
+    verstaerkungADW:=(vorlage as tAndorInputDateiInfo).verstaerkungADW;
+    detektorTyp:=(vorlage as tAndorInputDateiInfo).detektorTyp;
+    dateiName:=(vorlage as tAndorInputDateiInfo).dateiName;
+    detektorGroesze:=(vorlage as tAndorInputDateiInfo).detektorGroesze;
+    shutterZeit:=(vorlage as tAndorInputDateiInfo).shutterZeit;
+    xAchsenTitel:=(vorlage as tAndorInputDateiInfo).xAchsenTitel;
+    yAchsenTitel:=(vorlage as tAndorInputDateiInfo).yAchsenTitel;
+    datenTypTitel:=(vorlage as tAndorInputDateiInfo).datenTypTitel;
+    bildBereichStapel:=(vorlage as tAndorInputDateiInfo).bildBereichStapel;
+    rahmenToepfe:=(vorlage as tAndorInputDateiInfo).rahmenToepfe;
+    bildBereich:=(vorlage as tAndorInputDateiInfo).bildBereich;
+    rahmenBereich:=(vorlage as tAndorInputDateiInfo).rahmenBereich;
   end
   else begin
     temperatur:=0;
@@ -833,9 +833,9 @@ begin
   sergeyVorlage:=tSergeyInputDateiInfo.create;
   pipeVorlage:=tPipeInputDateiInfo.create;
   andorVorlage:=tAndorInputDateiInfo.create;
-  fillchar(_name,sizeOf(_name),#0);
+  fillChar(_name,sizeOf(_name),#0);
   name:=spaceTimeVorlage.name;
-  fillchar(_fehlerBehebungsKommando,sizeOf(_fehlerBehebungsKommando),#0);
+  fillChar(_fehlerBehebungsKommando,sizeOf(_fehlerBehebungsKommando),#0);
   fehlerBehebungsKommando:=spaceTimeVorlage.fehlerBehebungsKommando;
   gamma:=spaceTimeVorlage.gamma;
   groeszenFaktor:=spaceTimeVorlage.groeszenFaktor;
@@ -844,7 +844,7 @@ begin
   _xSteps:=spaceTimeVorlage.xSteps;
   spurNummer:=traceVorlage.spurNummer;
   feldNummer:=traceVorlage.feldNummer;
-  fillchar(_analysator,sizeOf(_analysator),#0);
+  fillChar(_analysator,sizeOf(_analysator),#0);
   analysator:=pipeVorlage.analysator;
   _bytesPerSample:=pipeVorlage.bytesPerSample;
   _Kodierung:=pipeVorlage.Kodierung;
@@ -1420,8 +1420,8 @@ end;
 constructor tTransformation.create;
 begin
   inherited create;
-  fillchar(vorgaenger,sizeOf(vorgaenger),#0);
-  fillchar(nachfolger,sizeOf(nachfolger),#0);
+  fillChar(vorgaenger,sizeOf(vorgaenger),#0);
+  fillChar(nachfolger,sizeOf(nachfolger),#0);
   _anzZugehoerigerDaten:=0;
 end;