adriano_servitec
Colaborador
Registrado: Sexta-Feira, 30 de Janeiro de 2004
Mensagens: 17618
|
 Enviada: Ter Abr 24, 2007 10:22 pm Assunto: Dica! gravar skins no form sem precisar do arquivo ini. |
 |
|
Primeiro para salvar os Skins sem precisar ser em arquivo INI, tem que ter instalado no Delphi o pacote JEDI.
Fiz um pequeno exemplo num form
Primeiro vamos ateh a paleta JV Percistence
e coloque no teu form os componentes JvAppXMLFileStorage e JvFormStorage, no mesmo form coloque o componente SkinData, bom agora para gente procurar pelos skins eu optei por o componente OpenDialog da paleta Dialogs.
Entao num Button no evento onclick fiz o seguinte codigo
| Código: |
procedure TForm1.Button1Click(Sender: TObject);
begin
OpenDialog1.filter:='Skin files (*.skn)|*.SKN';
OpenDialog1.initialdir:='c:\skins\'; {aqui vc coloca o caminho da pasta dos skins}
if OpenDialog1.execute then
SkinData1.LoadFromFile(OpenDialog1.filename);
if not SkinData1.Active then
SkinData1.Active:=true;
end; |
Esse codigo acima eh para abrir o diretorio aonde encontra-se os skins, no meu caso aqui esta no diretorio apontado acima.
Bom depois vc escolhe o skin da preferencia e o form vai mudar para o skin que vc escolheu. Agora vem a pergunta, mais depois como ficara salvo esse skin?
Resposta: Ai eh que entra os dois componentes do JEDI JvAppXMLFileStorage e JvFormStorage
Agora vou explicar como usa-los
1º No componente JvAppXMLFileStorage vc vai na propriedade FileName e escreva skins.xml {opcional, vc escolhe o nome que quiser}
2º No componente JvFormStorage, na propriedade AppStorage aponte para JvAppXMLFileStorage, depois vc de dois cliques nele para abrir a caixa Form Storage Designer, e na caixa Components escolha o SkinData1 ena caixa Properties vc escolhe a opçao SkinFiles e aperte no botao Add, feche a caixa e compile o programa, depois de compilado execute o botao do escolha um skin e saia do programa, compile novamente e verifique se ficou gravado o skin que vc escolheu.
Faça mais vezes e veja se esta funcionando.
Dica, acho que podemos ter alguns skins diferentes na rede (Nao testei aki, pq nao possuo rede, mais a dica eh clique na propriedade Location do componente JvAppXMLFileStorage e mude para [b]flUserFolder, teste na rede com o programa aberto em outros terminais e veja se funciona os skins que foram escolhidos nos terminais.
**********************************
Bom pessoal, vou parando por aki, se alguem tiver alguma duvida post aki, que eu responderei.
**********************************
Espero que sirva para quem deseja essa maneira facil e rapida de salvar os skins.
**********************************
Esqueci de dizer que o skindata deve estar com a propriedade active=true
_________________
Jogo seu smartphone? Acesse o link e confira.
https://play.google.com/store/apps/details?id=br.com.couldsys.rockdrum
https://play.google.com/store/apps/details?id=br.com.couldsys.drumsetfree |
|
FAQ
Pesquisar
Membros
Grupos
Registrar
Perfil
Entrar e ver Mensagens Particulares
Entrar
