Ir para conteúdo
Fórum Script Brasil
  • 0

Ajuda Em Arquivo De Configuração


Guest --fabio --

Pergunta

Guest --fabio --

pessoal. montei um programinha que é uma bateria virtual.

Estou fazendo programinhas simples assim pra começar a engatinhar. Mais ficou tão legal, que eu resolvi me empenhar pra deixalo do meu jeito.

Meu problema é o seguinte.

São 15 instrumentos. eu defini 15 var´s string. toda vez que eu abro o programa eu tenho que configurar som a som que cada botão ira executar usando o SNDplayerSound.

Eu gostaria de saber, como eu crio um "TXT", pra guardas as configurações de som de cada botão, para proxima vez que eu executar o programinha, ele buscar os respectivos sons de cada botão.

Obrigado

Fabim

Link para o comentário
Compartilhar em outros sites

1 resposta a esta questão

Posts Recomendados

  • 0

Olá Fabio,

O recomendável é você criar um arquivo INI.

Exemplo:

declare no uses: IniFiles

Criando um arquivo INI:

var
  vSom1, vSom2, vSom3, etc..., Som15 : string;
  ArqIni : string;
  SomIni: TIniFile;
begin
  ArqIni := ExtractFilePath( Application.ExeName )+'\Config.ini';
  if not(fileexists(ArqIni)) then begin
     SomIni := TIniFile.Create(ArqIni);
     SomIni.WriteString('SOM', 'Som1', 'Meu Som1');
     SomIni.WriteString('SOM', 'Som2', 'Meu Som3');
     SomIni.WriteString('SOM', 'Som3', 'Meu Som2');
     etc...
     SomIni.WriteString('SOM', 'Som15', 'Meu Som15');
     SomIni.Free;
  end;
Pegando as incormações do .INI e jogando em variaveis:
ArqIni := ExtractFilePath( Application.ExeName )+'\Config.ini';
    SomIni := TIniFile.Create(ArqIni);
    vSom1 := SomIni.ReadString('SOM', 'Som1', '0');
    vSom2 := SomIni.ReadString('SOM', 'Som2', '0');
    vSom3 := SomIni.ReadString('SOM', 'Som2', '0');
    etc...
    vSom15 := SomIni.ReadString('SOM', 'Som15', '0');

abraços Progr'amador.

B)

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152k
    • Posts
      651,7k
×
×
  • Criar Novo...