Hola, tenía un problema parecido y lo resolví usando un arrelgo de caracteres (aux) y la función STRNCPY (Copia N caracteres)
char aux[5]="";
strncpy(aux,Edit1->Text.c_str(),4);
Label1->Caption= aux;
entonces ahí definimos el arreglo auxiliar, copiamos 4 caracteres del Edit1 (el método .c_str() nos deja el AnsiString en un arreglo de caracteres) al arreglo aux y finalmente asignamos aux a un Label.
Espero te sirva.
Saludos
p/d: no lo probé a esto, pero supongo que anda, igualmente la idea la tenés .. cualquier cosa comentame, y decime también si te anduvo.