Cita:
Empezado por Al González
Sangrado de dos espacios, uso de mayúsculas y minúsculas incluso en las palabras reservadas, espacio antes de abrir paréntesis de función, dos puntos (":") como prefijo del tipo de dato y línea en blanco antes de empezar bloque después de sentencias (como esa línea en blanco que está antes del Try).
|
También uso mayúsculas y minúsculas y las escribo siempre igual porque estoy acostumbrado al C, donde son distintas unas y otras. En delphi sigo la misma costumbre aunque no sea necesario.
En lugar del espacio que tú dejas, yo hago algo parecido: dejo el espacio pero pongo //
Código Delphi
[-]
If Prop = dspropReadOnly Then
Begin
New (Props);
Try
Check (DSBase.GetProps (Props^));
Result := Integer (Props.bReadOnly);
Finally
Dispose (Props);
End;
End
Else
Check (DSBase.GetProp (Prop, @Result));