[roman]

Código Delphi [-]
var
  Matricula: String;

begin
  {
    EditCurso y EditAño son componentes TEdit donde se
    capturan los correspondientes campos.
  }
  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