VarIsFilled

Syntax:

function VarIsFilled(const V: Variant): Boolean;

Beschreibung:

Diese Funktion ermittelt ob in der entsprechenden Variable etwas drinn steht.
Es wird überprüft ob der Inhalt der Variable den folgenden Kriterien nicht entspricht.

Variant <> null
Variant <> EmptyParam
Variant <> Error
Nur in diesem Fall bekommen wir ein true zurück und ansonsten ein false.

Beispiel 1:


procedure testFunction;
var
  aObjektNr: integer;
begin
  if VarIsFilled(self.getLocalVariable('OB_OBJEKT')) then
  begin
    aObjektNr:= self.getLocalVariable('OB_OBJEKT');
  end else
  begin
    aObjektNr:= 0;
  end;

Beispiel 2:
In diesem Beispiel wird jedoch nicht abgefangen falls die Variable einen Wert EmptyParam oder einen Fehler enthält.
In den meisten Fällen wird dies genügen jedoch beim Zugriff auf eine Adapter Klasse (z.B. Container o. ExcelAdapter)
kann es vorkommen das diese auch die Werte EmptyParam oder Fehler annehmen.


procedure testFunction;
var
  aObjektNr: integer;
begin
  if self.getLocalVariable('OB_OBJEKT') <> null then
  begin
    aObjektNr:= self.getLocalVariable('OB_OBJEKT');
  end else
  begin
    aObjektNr:= 0;
  end;