problem with class

[cpalx]

hello,

why this clas compile but i can not use it???

i call from other unit, i add in clausules uses

and in a button just put this

GV.sgEnterpriseName:=''

and crash

the class is :



unit STglobalVariables;

{$mode objfpc}{$H+}

interface

uses
  Classes, SysUtils;

Type

  { TBD }
  TvariableGlobales = class

  private
  public
  sgEnterpriseName,
    sgHostBD, sgNameBD,
    sgUserBD, sgpasswdBD,
    sgPortBD, sgProtocolBD,
    sgSecurityConecctionDB,
    sgVersionApp, sgVersionBD: String;
    procedure AsignaValoresPorDefecto();
end;
var  GV: TvariableGlobales;


implementation
{ TBD }

procedure TvariableGlobales.AsignaValoresPorDefecto();
begin
 sgEnterpriseName:='STsoft';
end;

end.

[Zaher]

Did you create GV

GV := TvariableGlobales.Create;

you can put it in "initialization"

Code: [Select]

initialization
  GV := TvariableGlobales.Create;
end.


[cpalx]

Thanks