Tagesanzahl Februar eines Jahres

[Uwe Raabe]

Bei IfThen gilt auch zu beachten, dass es sich hier um einen Funktionsaufruf handelt, bei dem immer alle Parameter ausgewertet werden.

Delphi-Quellcode:

var
  cmp: TComponent;
  cmpName: string;
begin
  cmp := FindComponent('Edit1');

  { hier kann ein Zugriffsfehler auftreten }
  cmpName := IfThen(cmp <> nil, cmp.Name, '');

  { kann hier nicht passieren }
  if cmp <> nil then
    cmpName := cmp.Name
  else
    cmpName := '';