Código Delphi [-]function TConfReg.ReadString(Valor, Default: string): string; begin if Valor='' then raise Exception.Create('Introdujo una cadena vacía como valor!!!');
function TConfReg.ReadString(Valor, Default: string): string; begin if Valor='' then raise Exception.Create('Introdujo una cadena vacía como valor!!!');