两个问题
1:我的ado上的ConnectionString是空的,现在我想把在ini里面的连接符取出来赋值给ado,
但赋值后不能运行,连接不上
adocon:=inif.ReadString('设置','con',''); 
ado.ConnectionString=adocon;求大虾指导正确的语法2现在我有一个PageControl自动创建上面的tabsheet,但我现在想重新刷新它,有没有什么方法?
每次我刷新都把数据重复添加上去
procedure TForm2.showsheet;    //显示文字ini
var myinifFileName:string;
    inif:TiniFile;
    myBtnCaption:string ;
    i:integer;
begin
    AF.Visible:=false;
    AF.Items.Clear;
    inif:=TIniFile.Create(ExtractFilePath(Application.ExeName)+'con.ini');
    inif.ReadSections(AF.Items);
    for i:=2 to  AF.Items.Count-1  do
    begin
      myBtnCaption:=AF.Items.Strings[i];
      self.CreatepicPagesheetdt(mybtncaption);
    end;
end;
      //创建page上的sheet;
Procedure TForm2.CreatepicPagesheetdt( BtnCaption:string) ;
var mybstabsheet:TTabSheet  ;
    i:integer ;
begin
    i:=self.Page1.PageCount+1;
      mybstabsheet:=TTabSheet.Create(self) ;
      with mybstabsheet do
       begin
          mybstabsheet.Font.Color:=clblue;
          Parent:=self.Page1;
          PageControl:=self.Page1;
          Caption:=BtnCAption;
          Name:='Tbtn'+inttostr(i);
       end ;
end;求救啊?