runtime favicon değiştirmek

[greenegitim]

Merhaba, inidosyamdaki bir değere göre favicon değiştirmek istiyorum delphi içerisinde bunu değiştirebiliyorum fakat aşağıdaki kod ile değiştiremiyorum.

procedure TUniServerModule.UniGUIServerModuleCreate(Sender: TObject);
var
  iniFile: TMemInifile;
  ico_path :string;
begin
  if not FileExists(GET_INI_SETINGS_PATH()) then
    CreateFirstSetingsFile()
  else
  begin
     iniFile := TMemInifile.Create(GET_INI_SETINGS_PATH(), TEncoding.UTF8);
    try
    ico_path :=iniFile.ReadString('AYARLAR','FAVICON_PATH','');
    UniServerModule.Favicon.LoadFromFile(ico_path);
    finally
     iniFile.Free;
    end;

  end;

end;

 

[Farshad Mohajeri]

Merhaba,

OnBeforeInit event'i içerisinde dener misiniz?