uses System.SysUtils;

var
  SomeEmptyString: string;
begin
  //empty string literal
  SomeEmptyString := '';

  if SomeEmptyString = '' then
    WriteLn('string is empty');

  if Length(SomeEmptyString) = 0 then
    WriteLn('length is 0');

  //helper from System.SysUtils
  if SomeEmptyString.IsEmpty then
    WriteLn('helper agrees');
end.