Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi Mehrfache if-Abfrage mit case vereinfachen??? (https://www.delphipraxis.net/24479-mehrfache-if-abfrage-mit-case-vereinfachen.html)

Andreas L. 21. Jun 2004 19:34


Mehrfache if-Abfrage mit case vereinfachen???
 
Hi,
ich überprüfe mit einer if-Abfrage den Text eines Memos und lasse gegebenfalls eine Aktion ausführen. Dies geschieht mehrfach.

Delphi-Quellcode:
if Memo1.text='hallo' then
 begin
   ShowMessage('okokok');
 end
  else
 if Memo1.text='wasanderes' then
 begin
  showmessage('is klar!!!');
 end
  else
...
...
Kann ich das mit CASE vereinfachen? Wenn ja, wie?

Greetz

Nachtrag:
Wie mache ich es wenn der memo-text "delete C:\file.txt" ist. Dann möchte ich das die Datei C:\file.txt gelöscht wird.

MrKnogge 21. Jun 2004 19:37

Re: Mehrfache if-Abfrage mit case vereinfachen???
 
Servus onlinehome,

case geht nur mit ordinal-typen, nicht mit Strings.

Andreas L. 21. Jun 2004 19:39

Re: Mehrfache if-Abfrage mit case vereinfachen???
 
Zitat:

Zitat von MrKnogge
Servus onlinehome,

case geht nur mit ordinal-typen, nicht mit Strings.

OK, frage beantwortet.

MrKnogge 21. Jun 2004 19:41

Re: Mehrfache if-Abfrage mit case vereinfachen???
 
Zitat:

Zitat von onlinehome
Nachtrag:
Wie mache ich es wenn der memo-text "delete C:\file.txt" ist. Dann möchte ich das die Datei C:\file.txt gelöscht wird.

Neue Frage, neuer Thread :wink:

[edit=r_kerber]Doppeltes Posting gelöscht. Mfg, r_kerber[/edit]


Alle Zeitangaben in WEZ +1. Es ist jetzt 14:42 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