20160115学习日志

1.关于：InputBox，因为Android不支持showmadle. FMX.Dialogs中的不少窗口函数就不能直接使用。要修改为经过存储过程做为方法传递

好比：

InputBox('新建单元', '单元名称', '',
  procedure(const AResult: TModalResult; const AValue: string)
  begin
    strName := AValue;
    // 增长一个单元
    if strName <> '' then
    begin

      if TDirectory.Exists(FdyPath + TPath.DirectorySeparatorChar + strName)
      then
        ShowMessage('单元[' + strName + ']已经存在,请删除后再建立!')
      else
      begin
        TDirectory.CreateDirectory(FdyPath + TPath.DirectorySeparatorChar
          + strName);
        ReadDy;
      end;
    end;
  end);

2.关于路径，貌似建立系统没法建立根目录下的文件，多是权限问题，有待处理。