ZeilenZähler 2007 -> Zeilenzahl von Dateien bestimmen

[axelf98]

Wer sich schon immer gefragt hat, wie viele Zeilen sein *eigener* Programm-Code hat, der kann den ZeilenZähler Professional 2007 benutzen: Er zählt nur die Zeilen von Dateien, die man auswählt. Delphi zählt auch die verwendeten Komponenten mit.

Funktionen:
- Beliebige Dateiendungen auswählbar - mit Voreinstellung
- Übersichtliche Darstellung mit Sortierfunktion
- Report-Erstellung und Export.

Also ein sehr simples Programm, das aber nützlich sein kann!

EDIT: VERSION 0.3
- Ordner durchsuchen
- Entscheiden, ob Leerzeilen mitgezählt werden sollen oder nicht
- Pfade werden mit angezeigt
- Ein paar mehr Funktionen
- Design wurde angepasst

EDIT:
Nach Diskussion hier sah ich mich gezwungen, diese Warnhinweise auf die Verpackung des Programms zu drucken:
http://home.arcor.de/fabianbuerger/Stuff/warnung.jpg
http://home.arcor.de/fabianbuerger/Stuff/warnung2.jpg

[idontwantaname]

Hab's mal getestet, funktioniert soweit ganz gut, jedoch hätte ich folgende Vorschläge:

• FormPosition auf ScreenCenter stellen.
• Root-Ordner des Projektes zum Auswählen, da es sehr nervig ist, die Dateien aus den einzelnen Ordner auszuwählen.

[turboPASCAL]

Nett, aber wie zählst du die Dateien Zeilen?
Achtest du auch darauf das es Leerzeilen gibt ? Kommt mir so vor als ob...

// Edit: ...stimmt, er zählt Leerzeilen mit.

[dominikkv]

wobei du natürlich nicht weißt wie viel Zeilen davon auch wirklich in dem Projekt verwendet werden...

[Die Muhkuh]

Hi,

kann man ja eh nie rausbekommen, höchstens, man lässt vorher nen SourceFormatter drüber laufen, der alles in ein einheitliches Format bringt...

Delphi-Quellcode:

// 6 Zeilen
if bla then
begin
end
else
begin
end;

// 3 Zeilen
if bla then begin
end else begin
end;

Und Leerzeilen mitzählen ist auch nicht so dolle (und rein theoretisch dürfte er auch keine Kommentare mitzählen, da diese ja nicht "produktiv" zum Source beitragen. ;-) )

[jmit]

Hallo,

das Programm funkiert ohne Probleme,

aber wofür ist der Fortschrittsbalken, er bleibt nach dem ersten Starten (Zählen der Zeilen) immer auf 100% stehen? :gruebel:

Gruß Jörg

[axelf98]

Zitat:

Zitat von jmit

aber wofür ist der Fortschrittsbalken? :gruebel:

Wenn man sehr viele Dateien einliest, kann es schon mal länger dauern und wenn er bei 100% ist, weiß man, dass er fertig ist :)

[Olli]

Ist schon wieder April? :stupid:

[Die Muhkuh]

Er meinte, dass beim zweiten durchlauf der Balken nicht mehr funktioniert. Du hast wohl beim Starten ein TProgressBar.Position := 0 vergessen ;-)

[DeddyH]

Wozu braucht man das eigentlich? Die Anzahl der Zeilen einer *.pas sagt ja nun IMHO überhaupt nichts aus (Leerzeilen raus, OK, aber was z.B. mit Kommentaren, Compilerdirektriven etc.?) Im Übrigen verweise ich nochmal zurück auf #5 :zwinker:

[Olli]

Zitat:

Zitat von DeddyH

Wozu braucht man das eigentlich? Die Anzahl der Zeilen einer *.pas sagt ja nun IMHO überhaupt nichts aus (Leerzeilen raus, OK, aber was z.B. mit Kommentaren, Compilerdirektriven etc.?) Im Übrigen verweise ich nochmal zurück auf #5 :zwinker:

Daher die Frage ... ham wir schon wieder April? Für mich klingt das Programm eher nach Scherz und ist auch ziemlich dick für solch simple Funktionen. (Nachtrag in diesem Absatz:) Und nein, ich meine damit nicht, daß man es als nonVCL-Programm schreiben soll um es künstlich zu verkleinern. Aber bei diesem speziellen Programm wäre CLI u.U. besser und der Entwickler hätte sich mehr auf die Funktionalität, denn das Aussehen, konzentriert.

Ich müßte mich selbst ohrfeigen, wenn ich in meinem Team den Jungs sagen würde, daß sie ab jetzt nach Zeilen bewertet/bezahlt werden. Das ist so mit das Schlimmste was es gibt, weil die Entwickler dadurch statt durchdachtem und elegantem Code mehr daran denken wieviel sie abliefern. Bei C++-Entwicklern könnte das zu Auswüchsen führen, wie der Entwicklung mehrerer Stringklassen, statt auf eine gemeinsame (Template-)Klasse aufzusetzen etc. pp. ... :roll:

[DeddyH]

Dazu fällt mir spontan das hier ein :zwinker:

[Die Muhkuh]

Ich sag mal so. Einen nutzen hätte es, wenn es vor dem zählen nach Borland Styleguid formattiert. Dann könnte man sagen, dass das Programm aus xxx Zeilen besteht. Falls es jemand interessiert oder falls man es selbst wissen.

Ein kleines Berechtigungsdasein hat es ja ;-) Ansonsten stimme ich Dir, Oliver, voll und ganz zu.

@Deddy, sowas gibt es auch auf DSDT.info :mrgreen:

[DeddyH]

Ahja, aber eigentlich ist es ja wurscht, wohin man verlinkt, gell? :mrgreen:

[Olli]

Zitat:

Zitat von Die Muhkuh

Ich sag mal so. Einen nutzen hätte es, wenn es vor dem zählen nach Borland Styleguid formattiert.

Das wäre doch aber echter Mehrwert. Dann würde ich hier auch nix sagen.

[Die Muhkuh]

Man könnte doch theoretisch den JCF (Jedi Code Formatter oder wie das Ding heißt) als Vorlage nehmen. Man "stibitzt" sich den Formatier-Code, baut eine neue GUI drum rum und schon dürfte das funktionieren. (In der Theorie :mrgreen: )

[DeddyH]

Naja, trotzdem bleibe ich dabei, dass die Anzahl der getippten Zeilen im Bezug auf die Programmfunktionalität überhaupt keine Aussagekraft hat. Der Eine braucht für eine Funktion 50 Zeilen, während der Andere mit 10 Zeilen auskommt. Gründe hierfür könnten beispielsweise sein, dass man mit einer Built-In-Funktion von Delphi nicht zurechtkommt und diese lieber neu implementiert oder sie schlicht nicht kennt.

[axelf98]

Zitat:

Zitat von Olli

Ich müßte mich selbst ohrfeigen, wenn ich in meinem Team den Jungs sagen würde, daß sie ab jetzt nach Zeilen bewertet/bezahlt werden. Das ist so mit das Schlimmste was es gibt, weil die Entwickler dadurch statt durchdachtem und elegantem Code mehr daran denken wieviel sie abliefern.

Dafür kannst du auch erkennen ob die neue Version zB schlanker geworden ist -> Es muss ja nicht immer mehr sein!
Aber ich gebe zu, es gibt sinnvollere Programme. War auch nur eine Stunde Arbeit.
Ich wollte einfach vergleichen, wie viele Zeilen mein Vorgänger für die Software gebraucht hat: Die konnte nämlich weit weniger und ist oft abgestürzt - Nach der Neuentwicklung von mir kann sie viel mehr und ist auch noch 5000 Zeilen schlanker geworden.

btw: Neue Version 0.3 ;)

[jmit]

Zitat:

Zitat von Die Muhkuh

Er meinte, dass beim zweiten durchlauf der Balken nicht mehr funktioniert. Du hast wohl beim Starten ein TProgressBar.Position := 0 vergessen ;-)

Stimmt!!!!

[Die Muhkuh]

Zitat:

Zitat von DeddyH

Naja, trotzdem bleibe ich dabei, dass die Anzahl der getippten Zeilen im Bezug auf die Programmfunktionalität überhaupt keine Aussagekraft hat. Der Eine braucht für eine Funktion 50 Zeilen, während der Andere mit 10 Zeilen auskommt. Gründe hierfür könnten beispielsweise sein, dass man mit einer Built-In-Funktion von Delphi nicht zurechtkommt und diese lieber neu implementiert oder sie schlicht nicht kennt.

Hi Deddy,

das stimmt natürlich. Manche wollen jedoch nach ein paar Stunden Arbeit wissen, wie viel Zeilen sie hinzugefügt haben bzw. wie viele Zeilen das Programm hat. Da wäre es recht nützlich.

Apropos, man müsste sich quasi "Profile" anlegen können und nach jedem Scan wird die Anzahl der Zeilen abgespeichert. Scannt man erneut, wird aus dem neuen und aus dem alten Scan eine Differenz gebildet und kann sehen, wie viele (neue) Zeilen man getippt hat. ;-)

[jmit]

Zitat:

Zitat von axelf98

Zitat:

Zitat von jmit

aber wofür ist der Fortschrittsbalken? :gruebel:

Wenn man sehr viele Dateien einliest, kann es schon mal länger dauern und wenn er bei 100% ist, weiß man, dass er fertig ist :)

... das ist auch mir klar!

[Olli]

Zitat:

Zitat von axelf98

Dafür kannst du auch erkennen ob die neue Version zB schlanker geworden ist -> Es muss ja nicht immer mehr sein!

Hmm, sieht man oft schon an der Binärdatei. Aber stimmt, solange sie objektiv vergleichbar sind.

Zitat:

Zitat von axelf98

Ich wollte einfach vergleichen, wie viele Zeilen mein Vorgänger für die Software gebraucht hat: Die konnte nämlich weit weniger und ist oft abgestürzt - Nach der Neuentwicklung von mir kann sie viel mehr und ist auch noch 5000 Zeilen schlanker geworden.

Ah, mit diesem Hintergrund will ich nichts gesagt haben. Die Punkte aus #5 bleiben natürlich gültig, weil du irgendwie die Quelldateien normalisieren mußt, um sie vergleichen zu können.

[axelf98]

Ja, ihr habt alle Recht. Ich habe auch einen Warnhinweis (siehe #1) angebracht, der die Problematik noch einmal unterstreicht.
Er soll verantwortungsvolles und effizientes Programmieren fördern...

[Die Muhkuh]

Hi,

was ich z.B. noch grässlich finde: Deine Form ist ein "lila / pink" und die Buttons grau :arrow: Böses Pfui! Entweder alles in Deinem Style oder lass alles Windows-Standard (bitte noch XPMan einbinden, damit man auch schönes XP-Design hat, sofern es der Benutzer eingestellt hat). ;-)

[Olli]

Zitat:

Zitat von axelf98

Ja, ihr habt alle Recht. Ich habe auch einen Warnhinweis (siehe #1) angebracht, der die Problematik noch einmal unterstreicht.
Er soll verantwortungsvolles und effizientes Programmieren fördern...

:thumb: ... humorvolle Reaktion! :zwinker:

[DeddyH]

:lol: I break together :thumb:

[Die Muhkuh]

Was soll man dazu noch sagen? :mrgreen:

[axelf98]

Zitat:

Zitat von Die Muhkuh

was ich z.B. noch grässlich finde...

Angepasst. Vielleicht merkt ihr, dass ich grad gute Laune habe!

[Die Muhkuh]

Zitat:

Zitat von axelf98

Zitat:

Zitat von Die Muhkuh

was ich z.B. noch grässlich finde...

Angepasst.

Sieht viel besser aus :thumb:

Zitat:

Vielleicht merkt ihr, dass ich grad gute Laune habe!

Och, ich hätte gerne noch dies und jenes und ein bisschen von dem da drüben auch :mrgreen:

[Oracle]

gibts vom ZeilenZähler mal wieder etwas neues? Eine neue Version zum Beispiel?

[himitsu]

Da der TE seit gut 1,5 Jahren nicht mehr online war ... keine Ahnung

(du könntest ihm höchtens eine freundliche Frage-PN zukommen lassen, in der Hoffnung er hat die Banachrichtigung via eMail nicht abgeschaltet und bekommt es es so auch mit)


ich hab bei mir nur noch so'nen alten SourceCodeCounter von JLSoft.de rumliegen
oder du schaust dich noch etwas hier um (ich glaub da gab es auch noch andere Programme ... z.B. siehe SourceCodeCounter und Co.)