Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - If-Then-Anweisung, wie?


c_a - Mo 19.08.02 21:24
Titel: If-Then-Anweisung, wie?
Hallo, ich bin's nochmal, hab noch ne frage, kann mir wer sagen was ich schreiben muss wenn ich sagen will "wenn die variable z = irgendein buchstabe ist dann..."?
if z = ??? then???
thanxzz!

Titel geändert. Siehe Richtlinien! TINO


Steffer - Mo 19.08.02 21:37

Also die Frage basiert schon auf ein bischen Faulheit :wink:

Wie würdest du den einen oder mehrere Buchstaben im Code darstellen?


DeCodeGuru - Mo 19.08.02 21:38

Möchtest du wissen, ob z ein bestimmter buchstabe ist, oder irgendein buchstabe bzw. mehrere?


c_a - Mo 19.08.02 23:56

sorry, hab mich etwas undeutlich ausgedrückt!
Was ich eigentlich wissen wollte ist ob z überhaupt ein (oder mehrere) buchstabe ist, bzw. ob z eine zahl oder ziffer ist...


toms - Di 20.08.02 00:09

So was ?


Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
function Besteht_Z_Aus_Zahlen(Z: string): Boolean;
begin
  Result := True;
  try
    StrToInt(z);
  except
    Result := False;
  end;
end;


if  Besteht_Z_Aus_Zahlen(z) then
 ShowMessage('Z Besteht nur aus Zahlen!')
else
 ...


Indeterminatus - Mi 21.08.02 01:00
Titel: Allgemeiner ...
Um Deine Frage etwas allgemeiner zu beantworten :wink: :


Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
if (z in ['0','1','2','3','4','5','6','7','8','9']) then
begin
  // z ist eine Ziffer
end else

if (z in ['+','-','*','/']) then
begin
  // z ist ein gültiger Operator
end;


Du brauchst die runden Klammern hier natürlich nicht unbedingt ... tut mir Leid, ich programmiere sehr häufig in C++, da hab ich mir das auch in Pascal/Delphi angewohnt ...

Yours,
Indeterminatus.


DeCodeGuru - Mi 21.08.02 15:37

Zitat:

if (z in ['0','1','2','3','4','5','6','7','8','9']) then


Man kann des auch durch

Quelltext
1:
if z in ['0'..'9'] then                    


ersetzen. So wirds halt kürzer :wink: