Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: goto-befehl in delphi?

    Delphi
    by Go2EITS, 26. Jul 2006
  @Himitsu
  Na, da schwirrt mir der Kopf. Ich bin für GOTO und EXIT, mein schlechtes Beispiel wurde durch sehr schöne Lösungen ersetzt. Break und Continue verwende ich nicht, dies wird mir sogar zu unübersichtlich. Wahrscheinlich, weil ich es Break und Continue nie verwende.
  Ist eben Geschmackssache. Gelegentlich ereifern wir uns zu sehr über eine Sache. Ist aber nur allzu menschlich...
  
  Ich...
• Forum: Object-Pascal / Delphi-Language

  Re: goto-befehl in delphi?

    Delphi
    by Go2EITS, 26. Jul 2006
  @Hallo,Himitsu
  So lange bin ich auch noch nicht dabei. Ich bin erst seit kurzem wieder hier aktiv.
  Das kann sich wieder ändern.
  
  Du hast wohl meinen Thread oben nicht gelesen zum Thema Schleifen oder EXIT, da gehe ich mit Dir konform. :oops: oder :pale: ist jetzt bei DIR angebracht. :)
  
  So, nun ein praktisches Beispiel von Dir... ich warte neugierig :)
  Aber vorher meinen Thread...
• Forum: Object-Pascal / Delphi-Language

  Re: goto-befehl in delphi?

    Delphi
    by Go2EITS, 26. Jul 2006
  @Michael Habbe
  Sorry, habe Deinen Thread irgendwie übersehen! Der Code ist super übersichtlich. Danke für Deine Mühe.
  Der Code von Sakura ist ein Code vom Profi, der sofort die Schleifen erkennt aber besonders schön ist die Lösung, wie er es in eine Mengenabfrage packt.
  
  @Seehase
  Stimmt, ich packe auch solche Constructe in eine separate Function bevor es unübersichtlich wird.
  Es hängt...
• Forum: Object-Pascal / Delphi-Language

  Re: goto-befehl in delphi?

    Delphi
    by Go2EITS, 26. Jul 2006
  @MKinzler
  Na, das mit dem Readln und LFCR habe ich "zur Sicherheit" eingebaut, aber Zeilen die auch LFCR beinhalteten, hatte nicht geprüft. Kann ich nun weglassen.
  
  Du hast mein GOTO-Problem elegant gelöst! Vielen Dank für das konkrete Beispiel!
  CU :zwinker:
  
  @Hallo, Himitsu
  Ja, den BUG mit IF X:=A mit dem Doppelpunkt mache ich manchmal verkehrt.
  Code nur aus dem Kopf heraus geschrieben....
• Forum: Object-Pascal / Delphi-Language

  Re: goto-befehl in delphi?

    Delphi
    by Go2EITS, 26. Jul 2006
  @MKinzler
  :warn:
  
  Ne, Spass beiseite.
  Also, nun muss ich es wohl doch mit GOTO lösen:
  
  Result:=False;
  Daten:='';
  repeat
  readln(f, Daten);
• Forum: Object-Pascal / Delphi-Language

  Re: goto-befehl in delphi?

    Delphi
    by Go2EITS, 26. Jul 2006
  @MKinzler
  War ernst... :oops: Beispiel oben um realen Einsatz geändert.
  Sollte ich vielleicht CASE nehmen?
• Forum: Object-Pascal / Delphi-Language

  Re: goto-befehl in delphi?

    Delphi
    by Go2EITS, 26. Jul 2006
  @MKinzler
  Du weichst vom Thema ab MKinzler! (ERMAHN!) :-D
  
  Meine Lösung scheint wohl OK zu sein. In Assembler gibt es ja auch Sprünge in dieser
  Art. Und ein EXIT, wenn in der Funktion das Result natürlich gesetzt wurde, bevor nochmals
  viele IF's abgearbeitet werden müssen verwende ich auch. In einer Procedure ebenso, wenn
  das Ergebnis erziehlt wurde. Ich setze GOTO und EXIT dann ein, um...
• Forum: Object-Pascal / Delphi-Language

  Re: goto-befehl in delphi?

    Delphi
    by Go2EITS, 26. Jul 2006
  @Alle
  Noch ein obendraufsetz:
  
  Was ist mit
  
  Start: //Label Start
  readln(f,Daten); //Aus File in die Variable DATEN Zeile einlesen
  if EOF(f) then if daten:='' then goto Start; //Daten ist leer, kein EOF also springe ich zu Start.