Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)
-   -   Problema aplicando tStyleManager.TrySetStyle en formularios Modales (https://www.clubdelphi.com/foros/showthread.php?t=93766)

Kiranov 18-02-2019 21:36:06

Problema aplicando tStyleManager.TrySetStyle en formularios Modales
 
Buenas tardes,

Antes que nada una disculpa, la verdad no sé si este lugar es el correcto para publicar esta duda.

Mi duda es la siguiente:
He creado una aplicacion donde utilizo estilos VSF (es una aplicacion VCL), el modulo donde el usuario puede configurar el estilo deseado se abre desde un boton, el cual lo lanza como Modal. Dicho formulario tiene una lista con los nombres de los estilos previamente cargados con la siguiente rutina:

Código Delphi [-]
procedure RegisterStyleFromDisk(const StyleFileName: string);
begin
  if tStyleManager.IsValidStyle(StyleFileName) then
  begin
    tStyleManager.LoadFromFile(StyleFileName);
  end
  else
    showmessage('Estilo de visualización no válido');
end;

Al momento de seleccionar el estilo deseado en la listbox se manda llamar la siguiente linea:
Código Delphi [-]
tStyleManager.TrySetStyle(rzlbstyles.items[rzlbstyles.ItemIndex],false);

El problema es que cuando se aplica el estilo deseado, la form que originalmente era Modal, queda como Modaless. Alguien ha pasado por esta situacion.

Saludos y gracias por su ayuda.
Utilizo Delphi 10.3


La franja horaria es GMT +2. Ahora son las 09:49:18.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi