Ejemplo n.º 1
0
// convert ansi to unicodestring --------------------------------------------
UnicodeString __fastcall TPlot::A2U(AnsiString str)
{
    wchar_t buff[256]={0};
    ::MultiByteToWideChar(CP_UTF8,0,str.c_str(),-1,buff,512);
    UnicodeString u_str(buff);
    return u_str;
}
Ejemplo n.º 2
0
void EmacsInitialisation::setup_version_string()
{
    const char *build_time_string = ctime( &most_recent_built_module );
    // build a version string with that data and time in it
    version_string = EMACS_VERSION " of Emacs Copyright Barry A. Scott (c) ";
    version_string.append( EmacsString( EmacsString::copy, u_str(build_time_string), strlen( build_time_string )-1 ) );
}
Ejemplo n.º 3
0
//
// put dot and mark around the region matched by the n th parenthesised
// expression from the last search( n=0 = gtr the whole thing)
//
int region_around_match_command( void )
{
    int n;

    n = getnum( u_str(": region-around-match ") );
    if( ml_err )
        return 0;
    region_around_match( n );
    return 0;
}
Ejemplo n.º 4
0
    ReplaceBuffer = 1,
    AppendToBuffer,
    PrependToBuffer
};

int self_insert( EmacsChar_t c );
int self_insert_command( void );
static void del_to_buf( int n, DeleteToWhere_t where, int doit, const EmacsString &name );
static void line_move( int up, int n );
void insert_buffer( const EmacsString &name );
int left_marker( void );
int right_marker( void );
static int left_or_right_marker( int right );

// Strings
unsigned char *kill_buffer_str = u_str("Kill buffer");
unsigned char *no_mark_set_str = u_str("No mark set in this buffer \"%s\"");
unsigned char *mark_not_set_str = u_str("Mark not set");



int beginning_of_line( void )
{
    set_dot (scan_bf_for_lf (dot, -1));
    return 0;
}

int backward_character( void )
{
    int count = arg;