Source wird nicht vollständig compiliert

[MOCI]

Das Problem ist, dass es mitten in einer Prozedur auftaucht.

Delphi-Quellcode:

  if Value <> 0 then begin
    if Value/100 > 0 then
      Wert := 1 - Value/100          //wird nicht compiliert
    else                             //wird nicht compiliert
      Wert := -1 * (1 - Value/100);  //wird nicht compiliert
    for I := 0 to Self.CountPositionen - 1 do
      for J := 0 to Self.CountAuflagen - 1 do begin
        Wert := EinzelRabatt[I, J] + FRabatt;
        EinzelRabatt[I, J] := Wert;
      end; // End For
  end; // End If