SelText es una propiedad del tipo string, que pedes asignar de manera directa a cualquier variable o propiedad (que permita escritura) del mismo tipo. Si es de otro tipo ya tienes que ver que función cast aplicar para el caso.
Código Delphi
[-]
Label1.Caption := Memo1.SelText;
O en una variable:
Código Delphi
[-]
var
S: string;
begin
S := Memo1.SelText;
O llamando a una función / procedure:
Código Delphi
[-]
procedure TMiForm.MiProcedure(const MiValor: string);
begin
Label1.Caption := Memo1.SelText;
end;
procedure TMiForm.Button1Click(Sender: TObject);
begin
MiProcedure(Memo1.SelText);
end;
Saludos!