Geschwindigkeiten

[Jeff93]

Hallo,

ich wollte mein Programm vorstellen. Es erfüllt den Zweck Geschwindigkeiten umzurechnen/umzuwandeln.
z.Bsp: 36km pro Stunde entspricht 10m pro Sekunde

Da ich noch ziemlich unerfahren im Programmieren mit Delphi bin, hoffe ich ihr könnt mir einige Tipps zur Verbesserung des Source geben und hoffe es gefällt euch.

Jeff93

[Edit]Position des Formulars wurde auf ScreenCenter umgändert. Die neue Dateien stehen im Anhang.[/Edit]

[RavenIV]

1) Nicht desktop-Center, sondern Screen-Center einstellen
2) Achte auf den StyleGuide
2.1) Komponenten vernünftig benennen (Label2 ist kein Name, ed_irgendwas auch nicht, Form1 erst recht nicht)
2.2) keine globalen Variablen benutzen (ValueofCBItems gehört in private und soll dann fValueofCBItems heissen)
2.2.1) dazu denn ein Property erstellen mit Setter und Getter
2.3) Formatierung: das if und das then gehören in die selber Zeile, das begin in eine neue Zeile
2.3.1) wo ein if ... then ist, muss auch eine begin...end hin

[Jeff93]

Ok, dann tu ich das mal^^, habe leider im Moment nicht allzu ser die Zeit, werde morgen die neue Version updaten.

[Codewalker]

Habe nur grob in die Source schauen können, aber macht einen guten Eindruck. Alles schön formatiert und eingerückt, mehr oder weniger sprechende Bezeichner - nur in den Prozeduren könnte der ein oder andere Kommentar sicher nicht schaden. Ansonsten: Hut ab, ist gut lesbar und ein positives Beispiel (im Foren geistern da einige abschreckende Beispiele herum :mrgreen: )

[Jeff93]

Danke für das Kompliment. Wenn ich im Code nicht weiterkomme dann mach ich mindestens den Source ordentlich und sauber.^^

[Jeff93]

Ok, hab mir mal wieder Zeit genommen und an meinem Projekt gearbeitet^^ :-D

Neuerungen:
- Alles in Klassen definiert
- Eine Klase TStrConverter entworfen, die den Text filtert

So, es hat sich nur ein wenig geändert hat, aber immerhin..
Ich würde mich sehr freuen wenn ihr euch den Source anschauen würdet und mir noch ein paar Tipps geben könntet.

Die Dateien sind im Anhang
-----------------------------------------------

Zitat:

Zitat von RavenIV

2.3.1) wo ein if ... then ist, muss auch eine begin...end hin

Was meinst du damit? sry schon lange her :oops:

Dies darf man doch so schreiben?

Delphi-Quellcode:

if True then i := 2;

[jbg]

Zitat:

Zitat von RavenIV

2.3.1) wo ein if ... then ist, muss auch eine begin...end hin

Wenn du schon den StyleGuide ansprichst, dann solltest ihn auch lesen :zwinker:

Zitat:

Dies darf man doch so schreiben?

Delphi-Quellcode:

if True then i := 2;

Wenn man sich haar genau an den StyleGuide halten will, dann es es nicht erlaubt.

Code:

 // INCORRECT
if A < B then DoSomething; 
  
// CORRECT
if A < B then 
  DoSomething;

[Jeff93]

Ok, nehmen wir an ich halte mich an den StyleGuide(der meiner Meinung nach eher eine Richtlinie ist, dass nicht jeder den Code einrückt wie er will).

Verstehe ich diesen Satz nicht:

Zitat:

Zitat von RavenIV

2.3.1) wo ein if ... then ist, muss auch eine begin...end hin

Das würde doch bedeuten ich müsse es so schreiben:

Delphi-Quellcode:

if True then
begin
  i := 2;
end;

oder missverstehe ich da etwas...

Ps: Eigentlich wollte ich in paar Tipps bekommen wie ich den Source aufbessern könnte^^

[bigg]

Zeit und Weg haben wir ja jetzt. Wie wäre eine Erweiterung, die mir die aufgewandte Arbeit/Energie und die Leistung in einer bestimmten Zeit anzeigt.

Sagen wir, ein Körper legt einen Weg von 10km zurück. Dann würde ich ganz gerne wissen, wieviel Energie dafür benötigt wird.

E = m/2 * v^2

[xZise]

Zitat:

Zitat von Jeff93

Ok, nehmen wir an ich halte mich an den StyleGuide(der meiner Meinung nach eher eine Richtlinie ist, dass nicht jeder den Code einrückt wie er will).

Verstehe ich diesen Satz nicht:

Zitat:

Zitat von RavenIV

2.3.1) wo ein if ... then ist, muss auch eine begin...end hin

Das würde doch bedeuten ich müsse es so schreiben:

Delphi-Quellcode:

if True then
begin
  i := 2;
end;

oder missverstehe ich da etwas...

Ps: Eigentlich wollte ich in paar Tipps bekommen wie ich den Source aufbessern könnte^^

Naja es geht darum, dass Raven das so "möchte", allerdings finde ich "ifs" ohne begin-end i.O. weiß aber nicht was Borland/CodeGear/Embadings :mrgreen: davon halten.
Und ich schreibe generell NIE einzeilig:

Delphi-Quellcode:

if <Bedingung> then
  <Anweisung>

So sehe ich sofort "Anweisung" wird bei "Bedingung" ausgeführt.

MfG
xZise