sexta-feira, 12 de junho de 2009

Usando Opendialog

Usar o Opendialog é uma coisa bem simples, mas se você está começando a programar em Delphi, como eu, certamente terá duvidas, então vou explicar uma utilidade muito boa dele, copiar o caminho de um arquivo para o texto de uma Edit, tendo o caminho do arquivo nessa edit poderemos trabalhar com ele facilmente, no meu caso usei para poder trabalhar com a importação de um arquivo TXT, mãos a obra:

Primeiro crie um projeto novo e monte a tela com os seguintes componente: 1 label, 1 edit, 1 botão e um TOpenDialog, mais ou menos como a figura abaixo:

Depois no evento click do botão coloque o seguinte código:

if OpenDialog1.Execute then begin
edit1.Text := OpenDialog1.FileName;
end
else begin
ShowMessage('Favor selecionar o arquivo !!!')
end;

pronto, o caminho do arquivo irá aparecer na edit, com isso você consegue trabalhar de varias maneiras com o arquivo.
Espero ter ajudado, um abraço a todos e até a próxima.

2 comentários: