procedure TForm1.set_wiki_setups(mode_:String);
begin
reg1.WriteString('wikis',trim(mode_),Edit1.Text);
reg1.WriteString('wikis',trim(mode_)+'.main',Edit2.Text);
reg1.WriteString('wikis',trim(mode_)+'.search',Edit3.Text);
FlatButton3.Enabled :=false;
Label11.Visible :=false;
End;