Entwickler-Ecke
Freeware Projekte - LineCounter 1.0
Alibi - Sa 24.05.03 18:32
Titel: LineCounter 1.0
LineCounter ist ein kleines Tool, welches die Zeilen und Zeichenanzahl von ASCII Dateien in einem bestimmten Verzeichnis, optional auch dessen Unterverzeichnisse, ermittelt. Die Dateitypen lassen sich mit Filtern eingrenzen.
http://www.philiplb.de/LineCounter.zip
Zerfetzt dieses kleine, relativ sinnfreie, Spielzeug. ;)
// Edit: Hatte einen Savebutton für den Report vergessen, neu hochgeladen. ;)
JayEff - Di 10.08.04 00:35
Ich habs mir nicht angeguckt. aber... könnte man das ganze so ausdrücken?
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
| function Zeichen(text:string) :Integer;
begin
Zeichen:=length(text);
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
Edit1.Text:=IntToStr(Zeichen(Memo1.Text));
Edit2.Text:=IntToStr(Memo1.Lines.Count);
end; |
oder hast du dafür gesorgt, dass eine neue zeile nicht als 2 neue zeichen gelten?
aber gut- dass es für mehr dateien geht, ist ja schon garnicht so schlecht... war wahrscheinlich eine kleine "herausforderung"... also, nur um dein Prog nicht völlig nieder zu machen.
Chatfix - Fr 13.08.04 14:49
Ich habs mir auch nicht angeschaut, weil irgendwie mehr als nur Sinnlos... Sorry *g*
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!