lenguaje de programación Delphi, problemas de matrices,

1: m_sSeparater:= VarToStr(avtemp[0])[1]//¿Qué significa [1] aquí?

Por ejemplo, la variante avtemp[0] actual el valor es la cadena 'ABC', entonces VarToStr(avtemp[0])[1] es igual a 'B'. [1] Tome el segundo subíndice.

2El significado de este código:

comenzar

heredado; //heredado

probar

// Crear instancia de IboCOASegment

oboCOASegments: = CreateEverestObject(CLASS_boCOASegment) as IboCOASegment;

//Pase el valor GUID y use el método GetSegmentInfo para obtener una matriz de cadenas de tipo variante

avtemp:=oboCOASegments.GetSegmentInfo(GetUID);

//Si el primer subíndice de la matriz avtemp no está vacío

if VarToStr(avtemp[0])lt; gt; EmptyStr then

//Obtiene el segundo carácter de la cadena avtemp[0]

m_sSeparater:= VarToStr(avtemp[0])[1]//Disculpe aquí[ 1] ¿Qué significa?

else

//De lo contrario, m_sSeparater es un carácter nulo

m_sSeparater:=#0;

//La máscara de cmbCode es GetCoaSegmentFormat

cmbCode.Properties.editMask:=GetCoaSegmentFormat

excepto

end

end;

end; p>

Dame puntos.