{$HeaderCode}
{$StartForm}
{$PnLogin}
{$PnQuery}
{$PnPrincipal}
{$EndForm}