Saves every individual of the population and its chromosomes to the XML parameter.
Namespace: RSGeneticAlgorithm
Delphi
|
public
procedure SaveToXML( const ChromosomesXML: IXMLChromosomes ); reintroduce; overload; virtual;
|
Parameters
ChromosomesXML
Type: IXMLChromosomes
The following example saves the gene descriptions and the population to a stream:
Delphi
|
procedure SaveToStream(const Stream: TStream);
var
GAXML: IXMLGeneticAlgorithm;
begin
GAXML := NewGeneticAlgorithm;
RSGeneticAlgorithm1.Genes.SaveToXML( GAXML.Domain.GenoType );
RSGeneticAlgorithm1.Population.SaveToXML( GAXML.Domain.Chromosomes );
GAXML.OwnerDocument.SaveToStream(Stream);
end;
|