Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Befehle aus Strings einlesen und verarbeiten? (https://www.delphipraxis.net/48529-befehle-aus-strings-einlesen-und-verarbeiten.html)

Thorben86 26. Jun 2005 22:48


Befehle aus Strings einlesen und verarbeiten?
 
Hi,
ich bin gerade dabei ein Programm zu schreiben, dass befehle zeile für zeile einliest und dann verarbeitet.

mal ein ganz einfaches Beispiel:
Delphi-Quellcode:
open=xyz
schreibe=hallo
Das Programm soll also erkennen, welcher Befehl am Anfang steht und dann dem enstsprechen handeln.
Nun weis ich nicht genau, wie ich die befehle einlesen soll. Spontan fällt mir nur die Möglichkeit ein, den string nach dem "=" zu durchsuchen und die zeichen bis dahin dann in ne Variable einzulesen und den Rest in eine andere.

Hier ist dann auch die Frage, ob man das abfragen des befehls dann mit ner if/else-Anweisung oder Case Of Abfrage lösen muss, oder ob es noch ne bessere Lösung gibt.


Auch weis ich noch nicht genau, wie ich das speichern bzw einlesen soll. das einfachste wird sicherlich sein alles unter einander in ne einfache Textdatei zu speichern und dann in ne string-list einzulesen. Allerdings bräuchte ich das dann mehrfach, da ich mehrere befehlsfolgen beim Programmstart einlesen.
Gibt es hier sonst auch noch eine andere möglichkeit, welche eventuell effektiver ist?

Hoffe ihr könnt mir ein paar Tipps in die Richtung geben.

malo 26. Jun 2005 22:58

Re: Befehle aus Strings einlesen und verarbeiten?
 
Hier im Forum suchenParsen

Prinzipiell könntest du die Befehle in ein Array (bzw. TList/TobjectList) schreiben. Dann prüfst du zunächst, ob der Befehl ein Eintrag dieses Arrays ist. Wenn der entsprechende Eintrag gefunden wurde (per Schleife durchlaufen) kannst du den Integerwert der Schleife an eine Prozedur übergeben. Da kannst du dann per Case die Zahl abfragen und entsprechend darauf reagieren ;)


Alle Zeitangaben in WEZ +1. Es ist jetzt 01:41 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz