Einzelnen Beitrag anzeigen

Benutzerbild von idontwantaname
idontwantaname

Registriert seit: 31. Aug 2004
Ort: Traiskirchen
575 Beiträge
 
Turbo Delphi für Win32
 
#6

Re: aktionen nacheinander ausführen

  Alt 31. Mai 2005, 19:31
Dann will ich dir den obigen Code erklären:

Statt jedes Editfeld einzeln mit einer if-Abfrage zu versehen, habe ich Delphi-Referenz durchsuchenFindComponent verwendet. Diese Funktion verlangt einen String ( der Name der Komponente ), in deinem Fall wäre das Edit1, Edit2, Edit3, Edit4, ....
So nehme ich jetzt eine for-Schleife die von 4 hinunter bis 1 zählt, jedes Mal suche ich nach der Komponente 'Edit' + Zahl der Schleife, also wäre das dann Edit4, Edit3, Edit2, Edit1
Nun überprüfe ich, ob das Edit-Feld weiß ist, wenn ja, setze ich die Farbe auf grün und breche die Schleife mittels Break; ab, dadurch wird die Schleife kein weiteres Mal ausgeführt. Sollte die Farbe des Edit-Feldes nicht Weiß sein, so wird das nächste Edit-Feld überprüft, da ein neuer Durchlauf der Schleife folgt.
Oliver Hanappi
Besucht meine neue Homepage: http://oli.hux.de
  Mit Zitat antworten Zitat