Comprueba si existe un fichero especificado en la ruta especificada, si existe devuelve True, en caso contrario devuelve False.
Ejemplo de utilización:
1 2 3 4 5 6 7 8 9 |
procedure TformMenuPrincipal.FormCreate(Sender: TObject); var fichero : string; begin iniciado := false; fichero := ExtractFilePath(ParamStr(0)) + 'ips.txt'; if FileExists(fichero) then txtIP.Items.LoadFromFile(fichero); end; |
Unidad SysUtils