Código Delphi
[-]
var
Matricula: String;
begin
Matricula := Copy(EditCurso.Text, 1, 3) + Copy(EditAño.Text, 2, 4);
end;
De verdad que no se entiende qué es lo que preguntas, ¿cómo concatenar cadenas?, ¿cómo usar la función Copy? Consulta el manual, como que andamos un poco verdes y es hora de leerse un poco de lo básico, ¿no crees?
// Saludos