StringReplace和UpperCase函数可以解决上面两个问题

解决方案 »

  1.   

    StringReplace和UpperCase函数可以解决上面两个问题
    ? 怎么用? 给个例子好么? 谢谢。
      

  2.   

    1:StringReplace(YourString,SoureStr,DestStr:string)
    将yourstring中的sourcestr替换成deststr
    2:UpperCase(YourString:string)
    将yourstring 全部改为大写
      

  3.   

    1:....
    2:Str:=UpperCase(Str);//Str:String
      

  4.   

    1:StringReplace(YourString,SoureStr,DestStr:string)
    将yourstring中的sourcestr替换成deststr
    2:UpperCase(YourString:string)
    将yourstring 全部改为大写
    对形如"%a"也可以这样替换么?
      

  5.   

    能行,測試通過
    label1.Caption := StringReplace('%aowureo%a','%a','C',[rfReplaceAll]);
    label2.Caption := UpperCase('%aosjfos');
      

  6.   

    type
      TReplaceFlags = set of (rfReplaceAll, rfIgnoreCase);
    function StringReplace(const S, OldPattern, NewPattern: string; Flags: TReplaceFlags): string;