c is not a constructor

[diegojmap]

I have a function in VCL to write Unigui it works, but returns this error loading table:

"c is not a constructor"

//vcl
function ExisteFormulario(NomeFormulario: TComponentName): TUniForm;
var
  I: Integer;
begin
  Result := nil;

  for I := 0 to unisession.FormsList.Count  - 1 do
  begin
    if Result = nil then
    begin
      if TUniForm(UniSession.FormsList.Items).Name = NomeFormulario then
      begin
        Result := TUniForm(UniSession.FormsList.Items);
        Break;
      end;
    end;
  end;
end;

//unigui
function ExisteFormulario(NomeFormulario: TComponentName): TForm;
var
  I: Integer;

begin
  Result := nil;

  for I := 0 to Screen.FormCount - 1 do
  begin
    if Result = nil then
    begin
      if Screen.Forms.Name = NomeFormulario then
      begin
        Result := Screen.Forms;
        Break;
      end;
    end;
  end;
end;

[Farshad Mohajeri]

"Screen" is not available in unigui.