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

Pegar Caminho Do Path


Eder

Pergunta

Ola..pessoal...to querendo pegar o caminho de um path... o porem que este caminho ele esta no caption de uma label.....

Para pegar de uma caminho fixo eu uso assim:

path='C:\inicial.ini';

resto abaixo do codigo:

procedure TForm1.FormCreate(Sender: TObject);

var

ini: TInifile; //declarar variavel

const

path='C:\inicial.ini';//coloque aqui o caminho onde sera salvo o arquivo

begin

ini:= Tinifile.Create(path);//aqui você estancia o arquivo

edit1.text:= ini.readstring('dados','dolar',''); //leitura da chave de dados dolar

edit2.Text:= ini.readstring('dados','Produto',''); //leitura da chave de dados produto

ini.Free;// liberar o arquivo

end;

eu tava tentando usar assim:

path=label1.caption;

mas ele não compila. :(

Link para o comentário
Compartilhar em outros sites

6 respostass a esta questão

Posts Recomendados

  • 0

Olá.... e porque você não faz o seguinte..

Seu arquivo ini está no mesmo diretório que o executavel do sistema...?

Se estiver... ou não... é possivel adaptar... mas tente o seguinte:

Var

Arquivo : TIniFile;

begin

Arquivo := TIniFile.Create(ExtractFilePath(Application.ExeName)+'Inicial.ini');

Essa linha vai buscar um arquivo chamado Inicial.ini que esta na mesma pasta que o .exe do sistema...

Espero que isso te ajude...

Att

Link para o comentário
Compartilhar em outros sites

  • 0
Olá.... e porque você não faz o seguinte..

Seu arquivo ini está no mesmo diretório que o executavel do sistema...?

Resposta: amigão...perdão.....mas como ficaria o meu codigo adaptado a sua ideia???porque sim o meu *.ini esta junto com o executavel do programa.

Poderias me passar o codigo completinho pra mim entender?

muito Grato..t+ :(

Link para o comentário
Compartilhar em outros sites

  • 0
procedure TForm1.FormCreate(Sender: TObject); 
var 
ini: TInifile; //declarar variavel 
const 
IniName='inicial.ini';//coloque aqui o caminho onde sera salvo o arquivo 
begin 
ini:= Tinifile.Create(ExtractFilePath(Application.ExeName)+IniName);//aqui você estancia o arquivo 
edit1.text:= ini.readstring('dados','dolar',''); //leitura da chave de dados dolar 
edit2.Text:= ini.readstring('dados','Produto',''); //leitura da chave de dados produto 
ini.Free;// liberar o arquivo 
end;

Link para o comentário
Compartilhar em outros sites

  • 0

beleza ..carinha eu também havia conseguido assim:

procedure TForm1.FormCreate(Sender: TObject);

var

ini: TInifile; //declarar variavel

begin

Ini:= Tinifile.Create(ExtractFilePath(Application.ExeName) + 'inicial.Ini'); // vai pegar o ini onde o executavel esta

edit1.text:= ini.readstring('dados','dolar',''); //leitura da chave de dados dolar

ini.Free;// liberar o arquivo

end;

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);

var

ini: TInifile; //declarar variavel

begin

Ini:= Tinifile.Create(ExtractFilePath(Application.ExeName) + 'inicial.Ini'); // vai pegar o ini onde o executavel esta

ini.writestring('dados','dolar',edit1.text);//grava a chave de dados dolar

ini.free;

end

muito Grato..amigão...t+

haaa,,,grato também ao nosso colega maikel

t+ :D

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...