Fórum DirectoryExists aparece no Edit?? #225247
11/04/2004
0
Pessoal precizo duma dica, esto criando um programa pra um jogo, ele instala os Mapas, mais ainda tenho uma duvida?esto usando um DirectoryExists mas eu gostaria q mostraçe no Edit quando detecta do diretorio,e possivel?????????
PrevCur := Screen.Cursor;
try
Screen.Cursor := crHourGlass;
Edit1.Text :=´Estou vereficando se a jogo instalado aguarde...´;
Janela.Update;
Sleep(2000);
Janela.Update;
Sleep(2000);
finally
Screen.Cursor := PrevCur;
if DirectoryExists(´C:\Arquivos de programas\Infogrames\Deadly Dozen 2 Pacific Theater\Maps´) then
Edit1.Text :=APARECECE AQUI O DIRETORIO DETCTADO.............´
else
Edit1.Text :=´Error!! Jogo não instalado..´;
end;
Obrigado.
PrevCur := Screen.Cursor;
try
Screen.Cursor := crHourGlass;
Edit1.Text :=´Estou vereficando se a jogo instalado aguarde...´;
Janela.Update;
Sleep(2000);
Janela.Update;
Sleep(2000);
finally
Screen.Cursor := PrevCur;
if DirectoryExists(´C:\Arquivos de programas\Infogrames\Deadly Dozen 2 Pacific Theater\Maps´) then
Edit1.Text :=APARECECE AQUI O DIRETORIO DETCTADO.............´
else
Edit1.Text :=´Error!! Jogo não instalado..´;
end;
Obrigado.
Duvanel
Curtir tópico
+ 0
Responder
Posts
11/04/2004
Flávio Luiz
Se o nome do diretório é fixo porque vc não coloca simplesmente
if DirectoryExists(´C:\Arquivos de programas\Infogrames\Deadly Dozen 2 Pacific Theater\Maps´) then
Edit1.Text :=´C:\Arquivos de programas\Infogrames\Deadly Dozen 2 Pacific Theater\Maps´
else
Edit1.Text :=´Error!! Jogo não instalado..´;
if DirectoryExists(´C:\Arquivos de programas\Infogrames\Deadly Dozen 2 Pacific Theater\Maps´) then
Edit1.Text :=´C:\Arquivos de programas\Infogrames\Deadly Dozen 2 Pacific Theater\Maps´
else
Edit1.Text :=´Error!! Jogo não instalado..´;
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)