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.