一維數組的運用

原创 2007年10月10日 08:35:00

 {...............................................................................
//  使用方式﹕判斷輸入的路徑是否合法
//  函式名稱﹕Gvt_GetCheckPath
//  傳入參數﹕Str: 路徑
//  返回值﹕  Boolean
...............................................................................}
function Gvt_GetCheckPath(Str: string): Boolean;
const
  Cv_Letters: array[0..25] of char=('A','B','C','D','E','F','G','H','I','J','K','L','M','N','O','P','Q','R','S','T','U','V','W','X','Y','Z');
  Cv_Letters2: array[0..25] of char=('a','b','c','d','e','f','g','h','i','j','k','l','m','n','o','p','q','r','s','t','u','v','w','x','y','z');
  Cv_Letters3: array[0..15] of char=('.','=','+','-','*','/','~','!','@','#','$','%','&','^','<','>');
var
  Lv_i, Lv_j, Lv_Time: Integer;
begin
  Result := True;
  Lv_i := 3;
  Lv_Time := 0;

  for Lv_j := 0 to 25 do
  begin
    if (Copy(Str,1,1)<>Cv_Letters[Lv_j])
      and (Copy(Str,1,1)<>Cv_Letters2[Lv_j])
    then
      Inc(Lv_Time);
  end;
  if (Lv_Time=26) or (Copy(Str,2,1)<>':')then
  begin
    Result := False;
    Exit;
  end;

  while Lv_i<Length(Str) do
  begin
    if ((Copy(Str,Lv_i,1)='/') and (Copy(Str,Lv_i+1,1)='/')) then
    begin
      Result := False;
      Exit;
    end;
    for Lv_j := 0 to 15 do
    begin
      if Copy(Str,Lv_i,1)=Cv_Letters3[Lv_j] then
      begin
        Result := False;
        Exit;
      end;
    end;
    Inc(Lv_i);
  end;
end;

a和&a的区别、二维数组的本质及多维数组

1 a和&a的区别 int a[10] = {1,2}; //其他初始化为0   a代表数组首元素的地址,不是整个数组的地址 &a表示整个数组的地址 &a,a代表的数据类型不一样 &a数组类型 in...
  • u010418035
  • u010418035
  • 2015年04月11日 19:23
  • 1422

百度面试题:求一个已排序的数组中绝对值最小的元素

题目为: 有一个已经排序的数组(升序),数组中可能有正数、负数或0,求数组中元素的绝对值最小的数,要求,不能用顺序比较的方法(复杂度需要小于O(n)),可以使用任何语言实现 例如,数组{-...
  • longshengguoji
  • longshengguoji
  • 2013年01月29日 22:57
  • 4604

给定一个无序整形数组,找出其中所以三个数之和为0的所有组合

/** * @author Liudong * @time 09/26/2014 * @function 3Sum * * title: * Given an array S of n ...
  • yx2008302080
  • yx2008302080
  • 2014年09月27日 13:12
  • 1044

一维数组的运用之求最大公约数和最小公倍数

编号及代码: /* *Copyright(c)2015,烟台大学计算机与工程学院 *All rights reserved; *文件名称:score.cpp *作者:范星月 *完成日期:2...
  • a716121
  • a716121
  • 2015年03月24日 18:30
  • 761

数据结构学习笔记(2)_一维数组及其简单运用

不知不觉大学过了三年,最遗憾的就是在大二没把《数据结构》和《算法》这两门课程学好~~~ 现在每天花一点时间把这两个内容回顾一下,算是给自己的一点目标吧! 数组(Array): 数组算是最简单的也...
  • dyllove98
  • dyllove98
  • 2013年07月09日 13:23
  • 640

使用冒泡法排序法对一维数组进行排序

  • 2017年12月20日 13:55
  • 14.3MB
  • 下载

生成一维数组 并反序存放

  • 2013年06月27日 09:18
  • 70KB
  • 下载

java 一维数组的创建与使用

  • 2010年06月18日 16:46
  • 59KB
  • 下载

使用直接插入法对一维数组进行排序

  • 2017年12月20日 13:57
  • 47KB
  • 下载

C++一维数组和指针的关系总结

  • 2014年11月01日 17:18
  • 41KB
  • 下载
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:一維數組的運用
举报原因:
原因补充:

(最多只允许输入30个字)