if anweisung

[Sidorion]

Versuchs doch mit einem try .. except Block Marke:

Delphi-Quellcode:

try
  Wert:=FtrToFloar(Var1)+......;
except
  ShowMessageFmt('Keine Werte für Datensatz %i.',[Query.ActiveIndex]);
end;