Fórum Arquivo ini com paradox... #301339

if not (FileExists(ExtractFilePath(Application.ExeName) + ´\Arquivo.ini´))  then
 begin
  with TIniFile.Create(ExtractFilePath(Application.ExeName)+´\´+´Servidor.ini´)  do
  try
   WriteString(´Servidor´, ´Local´, FileExists(ExtractFilePath(Application.ExeName)+ ´\dados´);
  finally
   Free;
  end;

var
 arq: string;
with TIniFile.Create(FileExists(ExtractFilePath(Application.ExeName) + ´\Arquivo.ini´) do
 try
  arq:= ReadString(´Servidor´, ´Local´, ´´);
 finally
  Free;
end;