Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > FireMonkey
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 15-05-2016
Avatar de turbopascual5.0
turbopascual5.0 turbopascual5.0 is offline
Miembro
 
Registrado: feb 2011
Posts: 54
Poder: 14
turbopascual5.0 Va por buen camino
Error en asignación de default style

Hola a todos.
He implementado que en el aplicativo se pueda cambiar el estilo.
Hay varios ejemplos por la web y en la doc de Embarcadero.
En concreto el error se produce en este procedimiento:
Código Delphi [-]
procedure TTabbedwithNavigationForm.ComboBox1Change(Sender: TObject); 
var  aTos: string;  
aStyle: TfmxObject;  
begin 
  aStyle:=nil; 
  if combobox1.itemindex > 0  then 
  begin    
    atos:=combobox1.selected.text;    
    aStyle:=TStyleStreaming.LoadFromResource(HInstance, aTos, RT_RCDATA);    
    if NOT assigned(astyle) then        
    begin          
      showmessage(atos+linefeed+'Not Found');        
    end;  
  end;   
  if astyle <> nil then       
    TStyleManager.SetStyle(astyle)   
  else     
    TStyleManager.SetStyle(nil);  // set the "default" style 
end;
La parte del if then else es redundante, pero quería determinar exactamente donde seproducía el error:
Código Delphi [-]
TStyleManager.SetStyle(nil);  // set the "default" style
raised exception class EStyleException with message 'Argument must be nil'.
Aparte de los ejemplos por la web, en :
http://docwiki.embarcadero.com/Libra...nager.SetStyle
lo indica tal como lo hago:
To set the active style to the native system style, for example Windows theme, pass nil as the Style parameter.
¿Alguien sabe como asignar el estilo por defecto?.
Gracias a todos.

Última edición por Casimiro Notevi fecha: 15-05-2016 a las 18:15:45.
Responder Con Cita
  #2  
Antiguo 16-05-2016
Avatar de turbopascual5.0
turbopascual5.0 turbopascual5.0 is offline
Miembro
 
Registrado: feb 2011
Posts: 54
Poder: 14
turbopascual5.0 Va por buen camino
Le he encontrado una solución, por lo menos para salir del paso.

El estilo AndroidLlight es que usa por defecto, lo cargo y a todos los efectos es como restituir el default.

Un saludo
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Error de asignacion de parametros. BuenaOnda MS SQL Server 1 10-04-2017 14:55:29
TCombobox style csDropDownList mjjj Varios 2 12-12-2007 22:54:25
TCombobox STYLE en csOwnerDrawFixed Carlos Arevalo Varios 12 09-01-2004 22:56:15
error en asignacion de campos en un dbgrid con seleccion multiple ElSanto24 Varios 1 05-01-2004 18:12:27
Style y color en un Rich Tonio Varios 0 18-08-2003 01:08:21


La franja horaria es GMT +2. Ahora son las 19:59:44.


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
Copyright 1996-2007 Club Delphi