Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  AW: Case AnsiIndexText -> Ergebnis verändern

    Delphi
    by himitsu, 14. Nov 2013
  Mein zweites Beispiel sollte man wohl nicht ganz Ernst. (aber wenn es ihm zuviele Zeilen sind, dann halt so :lol:)
  
  Wenn in dem CASE jeweils nur 1-3 Zeilen stehen, dann würde ich eher Variante bevorzugen, oder das CASE gegen ELSE-IFs austauschen.
  
  Es gibt tausende Wege es zu lösen, also wie wäre es beispielsweise mal mit etwas Mathematik?
  // angenommen Z kennt nur 0 und 1
  case...
• Forum: Object-Pascal / Delphi-Language

  AW: Case AnsiIndexText -> Ergebnis verändern

    Delphi
    by himitsu, 14. Nov 2013
  Oder vor dem CASE prüfen und da noch den Index ändern.
  
  I := AnsiIndexText(Wert, );
  if (I = 0) and (Z = 1) then I := 1;
  case I of
  0: begin
  ...
  
  :stupid:
  if IfThen((UpperCase(Wert) = 'A') and (Z = 1), 1, AnsiIndexText(Wert, )) of