Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: Vereinfachung von Procedurenaufrufe

    Delphi
    by himitsu, 19. Nov 2005
  Wie gesagt, du hattest ja schon die "optimiertere" Version ... die Lange wäre die mit IFs -.-''
  
  If ki_status = '0' Then ki_status_0
  Else If ki_status = 'A' Then ki_status_A
  Else If ki_status = 'B' Then ki_status_B
  ...
  Else If ki_status = 'J' Then ki_status_J
  Else If ki_status = 'K' Then ki_status_K;
  Obwohl die lange Variante bei meiner Schreibweise noch 2 Zeilen einsparren würde, aber...
• Forum: Object-Pascal / Delphi-Language

  Re: Vereinfachung von Procedurenaufrufe

    Delphi
    by himitsu, 19. Nov 2005
  Das zuweisen kann man sich auch vereinfachen, obwohl es mit dem Case in codetechnischer Hinsicht schon optimal ist.
  
  Dises global (also außerhalb der Prozedur, eventuell direkt davor) definieren, dann kannst du das Array direkt vordefinieren.
  Const KI_statusList: array of Procedure =
  (@ki_status_a, @ki_status_b, ..., @ki_status_k);
  
  Und dann ist der Aufruf genauso wie bei Chimaira.
  ...