快捷搜索:   服务器  安全  linux 安全  MYSQL  dedecms

AnsiString 使用大全(2)


    }
    void __fastcall TForm1::Button1Click(TObject *Sender)
    {
        AnsiString Test = "  拳脚  ";
        AnsiString Ret = TrimStr(Test,"B")
    }


    //相同字符重复输入
    void __fastcall TForm1::Button1Click(TObject *Sender)
    {
        AnsiString Soc = AnsiString::StringOfChar( '*' , 100 );
       Edit1->Text=Soc ;//显示100个*

    }


    //字符串替换
    void __fastcall TForm1::Button1Click(TObject *Sender)
    {
        AnsiString Str = "Borland C++ Builder is free";
        AnsiString From = "C++ Builder";
        AnsiString To = "Delphi";
        AnsiString Result;
        Result = StringReplace( Str, From, To, TReplaceFlags() <<
    rfReplaceAll << rfIgnoreCase );
    //<<后是参数,得到Borland Delphi is free
    }


    //全角变半角
        AnsiString Zen = "1234567890";
        int Len = Zen.Length();
        char buf[MAX_PATH];
        ZeroMemory( buf, sizeof( buf ) );
        LCMapString( GetUserDefaultLCID(), LCMAP_HALFWIDTH, Zen.c_str(), Len, buf, sizeof( buf ) );
        AnsiString Han = AnsiString( buf );
        Edit1->Text=Han;


    //半角变全角
    void __fastcall TForm1::Button1Click(TObject *Sender)
    {
        AnsiString Han = "1234567890";
        int Len = Han.Length();
        char buf[MAX_PATH];
        ZeroMemory( buf, sizeof( buf ) );
        LCMapString( GetUserDefaultLCID(), LCMAP_FULLWIDTH, Han.c_str(), Len, buf, sizeof( buf ) );
        AnsiString Zen = AnsiString( buf );
    }

顶(0)
踩(0)

您可能还会对下面的文章感兴趣:

最新评论