root/trunk/Forms/frm_create_mask.pas

Show revision log
 
454465
139
    R.AddGenreAny('', Edit12.Text);
139
    R.AddGenreAny('', Edit12.Text);
140
  end;
140
  end;
141
  if CheckBox7.Checked then
141
  if CheckBox7.Checked then
 
142
    R.RootGenre := Edit13.Text;
142
    R.RootGenre.Alias := Edit13.Text;
 
143
143



144
  Result := R;
144
  Result := R;



145
end;
145
end;