-[Duvida]- Duvida sobre o Delphi

[xxJuniorp 0]

PERGUNTA:

 

COMO colocar Button [Verificar Dirétorio]

COMO colocar button [Abrir Grand Chase]

???????????????????????????????/

[whell 0]

begin

if DirectoryExists(Edit1.Text) then

ShowMessage('Diretório Encontrado,Por Favor Prossiga!')

else

Application.MessageBox('Diretório Não Encontrado!','ERROR',MB_IConerror);

end;

 

 

Abrir grand chase.

 

if DirectoryExists(Edit1.Text) then

WinExec(PChar(Edit1.Text+'\main.exe'),SW_SHOW)

else

Application.MessageBox('Diretório do GC não foi encontrado.','ERROR!',MB_IConerror);

end;

 

 

eu pensei que você não ligasse :confused:

[xxJuniorp 0]

xD < Punido