Salvar conf do DBGrid no Arquivo INI

Delphi

24/03/2004

Me ajudem a salvar as configurações das celulas do dbgrig, como largura, cor de fundo, em um arquivo ini

Alguem sabe? Me ajude


Josimar

Josimar

Curtidas 0

Respostas

Sremulador

Sremulador

24/03/2004

Amigo e muito fácil e só você gravar essas informações como outra qualquer em arquivo ini

Procedure TForm1.GravaIni( Numero : Longint ; Texto : String ; Condicao : Boolean);
var
ArqIni : TIniFile;
begin
ArqIni := TIniFile.Create(´c:\windows\temp\Teste.Ini´);
Try
ArqIni.WriteInteger(´Dados´, ´Numero´, Numero);
ArqIni.WriteString(´Dados´, ´Texto´, Texto);
ArqIni.WriteBool(´Dados´, ´Condição´, Condicao);
Finally
ArqIni.Free;
end;
end;

Procedure TForm1.LeIni( Var Numero : Longint ; Var Texto : String ; Var Condicao : Boolean);
var
ArqIni : tIniFile;
begin
ArqIni := tIniFile.Create(´c:\windows\temp\Teste.Ini´);
Try
Numero := ArqIni.ReadInteger(´Dados´, ´Numero´, Numero );
Texto := ArqIni.ReadString(´Dados´, ´Texto´, Texto );
Condicao := ArqIni.ReadBool(´Dados´, ´Condição´, Condicao );
Finally
ArqIni.Free;
end;
end;


GOSTEI 0
Paulo_amorim

Paulo_amorim

24/03/2004

Olá

Tente assim:
var Ini: TIniFile;
begin
  Ini := TIniFile.Create (<local do arquivo>);
  try
    { escreve no Ini a largura da coluna ZERO }
    Ini.WriteString(´conf´,´largura´,DBGrid1.Columns.Items[0].Width);
  finally
    Ini.free;
  end;
end;


e por aí vai...cada propriedade que quiser...


GOSTEI 0
Thiago Vidal

Thiago Vidal

24/03/2004

a classe TDBGridColumns possui 2 métodos que talvez possam ser úteis:
SaveToFile e SaveToStream, tente fazer algo do tipo:

DBGrid1.Columns.SaveToFile(´c:\arquivo.ini´);
// ou
DBGrid1.Columns.SaveToStream(msTemp);


O primeiro exemplo salva todas as configuracoes das colunas do DBGrid em um arquivo. Ja no segundo exemplo, sanvando em um objeto TMemoryStream voce pode salvar no registro do windows, ou mesmo em algum arquivo de configuracoes do seu programa.


GOSTEI 0
POSTAR