AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Zeige Zeile in der "Datum" steht.

Ein Thema von Äfan · begonnen am 3. Sep 2004 · letzter Beitrag vom 3. Sep 2004
 
Benutzerbild von Treffnix
Treffnix

Registriert seit: 25. Jun 2003
Ort: AC
740 Beiträge
 
Delphi 7 Professional
 
#10

Re: Zeige Zeile in der "Datum" steht.

  Alt 3. Sep 2004, 08:47
Zitat von Luckie:
Ui, alceus, da hast du aber geschludert. Die erste Zeile hat den Index 0 und die letzte Count-1! Dein Glück dass die gesuchte Zeichenfolge wohl nie in der ersten oder letzten Zeile stehen kann. Sollte sie aber gar nicht vorkommen, fliegt dir dein Code um die Ohren.

Und wenn du die Schleife von 0 bis Count-1 laufen läßt musst du auch nicht so was machen: i-1
Ich stimme dir zu, dass ne Schleife von 0 bis pred( Count ) geschickter wäre, weil man dann das i nicht mehr umrechnen muss. Der Rest von dem was du sagst, stimmt meiner Meinung nach nicht.

Wenn der Text in der ersten Zeile steht, ist läuft die Schleife bis i = 1 also. Pos( 'Datum', Lines[1-1{=0}] ) findet das Wort und gibt eine Zahl > 0 zurück.

Existiert das Wort gar nicht, läuft die Schleife von 1 bis Count und prüft dabei alle Zeilen ( 1-1 bis Count -1 ) und die Pos > 0 Bedingung trifft einfach nie zu.

Ist das Memo leer, läuft die Schleife von 1 bis 0 also gar nicht erst an.

Mag sein, dass ich was übersehe ( die Augen wollen noch nicht ganz auf ), aber meiner Ansicht nach sollte die Schleife, so wie sie ist, funktionieren.
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 11:57 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz