AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein GUI-Design mit VCL / FireMonkey / Common Controls Delphi String auslesen und auf zeichen reagieren und und und ...
Thema durchsuchen
Ansicht
Themen-Optionen

String auslesen und auf zeichen reagieren und und und ...

Offene Frage von "Axxus"
Ein Thema von Axxus · begonnen am 19. Okt 2006 · letzter Beitrag vom 29. Okt 2006
 
Axxus

Registriert seit: 3. Okt 2006
212 Beiträge
 
Turbo Delphi für Win32
 
#1

String auslesen und auf zeichen reagieren und und und ...

  Alt 19. Okt 2006, 00:20
HI Delphianer

Ich hab wie immer schon gesucht aber nix gefunden

Also folgendes Es geht wieder um meine Konsole:

Zum Verstänidniss die Konsole soll auf befehle die in ein Edit eingegeben werden reagieren

Das werden denk ich ziemlich viele Befehle

Bis jetzt hab ich es immer so gemacht das Die eingabe durch eine reihe von If Abfragen geluafen sind

Also :

Sind die ersten 4 Ziffern = Memo dann...

Sind die ersten 7 ziffern = Konsole dann...

Jetzt hab ich mir gedacht

Das ist ziemlich unprofessional

Deswegen will ich es jetzt so machen das der Befehl in einer Klammer steht und Jede Befehlsform mit einem . Zeichen abgetrennt wird

Also so

(Memo.font.color) = ($ff0000)

So jetzt mein Problem:

Ich weiß nicht wie ich es machen kann das Mein Programm nach dem Enter drücken die Klammern sucht und Den Gesamtstring schon mal in teilsttringe zerlegt Soll dann also so aussehen

Eingabe = '(Memo.font.color) = ($ff0000)'
Eingabe1 = 'Memo.font.color'
Eingabe2 = '='
Eingabe3 = '$ff0000'

So aber damit nicht genug

Jetzt soll das Programm die Eingabe auch noch als Befehl interpretieren aber nicht nur als If Abfrage

Ich hoffe ihr wisst jetzt was gemeint ist oder

Ich will mir zumindest für die Objekte die If Abfrage ersparen das Programm soll also automatisch den String in einen befehl umwandeln Eingabe1 gibt den Linken Teil eingabe 2 den Operator und Eingabe 3 den zugewiesenen Wert

Jetzt Will Ich aber nicht
If Eingabe1 := 'memo.font.color' then...
If eingabe1 := 'Memo.Height Tehn...
If eingabe1 := 'Memo.weight' Then...
.
.
.

Ich hoffe es ist klar geworden was ich meine

Teilantworten sind auch OK

danke im Vorraus

Axxus
  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 07:38 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