var s : String;

s := ''; // assign an empty string (can also use "")

if s = '' then
   PrintLn('empty');

s := 'hello';

if s <> '' then
   PrintLn('not empty');