Einzelnen Beitrag anzeigen

AlexII

Registriert seit: 28. Apr 2008
1.717 Beiträge
 
FreePascal / Lazarus
 
#4

Re: Suche erweitern - bitte um ergenzung.

  Alt 17. Mai 2008, 00:25
Zitat von s-off:

'ne lustige Code-Formatierung hast Du
Ja man darf nicht vergessen, hatte nur ca. 30 Stunden Delphi in meinem Leben.

Zitat von s-off:
Als erstes solltest Du das 'Exit' in ein 'Break' ändern. Ansonten wunderst Du Dich nämlich irgendwann, wenn Du nach der Schleife noch Code angefügt hast, der dann nicht mehr ausgeführt wird.
Ich hatte erst mal Break gehabt, musste aber durch Exit ersetzen, da bei keinem Treffer Edit4.Text gelb bleibt.

Zitat von s-off:
Des weiteren solltest Du den Code in eine Methode auslagern, der Du als Parameter die Startkoordinaten übergibst, und als Rückgabewert ggf. die Koordinaten der letzten gefundenen Position.

Zum Suchen rufst dann die Methode mit den Anfangskoordinaten auf, und speicherst den Rückgabewert (die letzte Fundstelle) in einem Feld Deiner Klasse.

Beim Weitersuchen übergibst Du dann als Anfangskoordinaten die zuvor gespeicherten; fertig.
Booooohhhh..... ist noch Fachchinesisch für mich.
  Mit Zitat antworten Zitat