anchor.diff:    vista: TThemeButton;
   begin
     btnClose := TfpgButton.Create(self);
  -  btnClose.Width      := 75;
  +  btnClose.Width      := 80;
     btnClose.Left       := Width - btnClose.Width - 6;
     btnClose.Top        := Height - btnClose.Height - 6;
     btnClose.Text       := 'Quit';
  
positive.code:   xpsilver := TThemeButton.Create(self);
    xpsilver.Left       := 230;
    xpsilver.Top        := 45;
    xpsilver.Width      := 75;
    xpsilver.Text       := 'XP Silver (+)';
    bmp := LoadImage_BMP(SetDirSeparators('../../../images/themes/silver/button.bmp'));
    xpsilver.ThemeImage := bmp;
  
negative.code:   vista.ThemeImage := bmp;
  
    styledbutton := TStyledButton.Create(self);
    styledbutton.SetPosition(btnClose.Left, btnClose.Top-80, 80, 24);
  //      styledbutton.Default := True;
    styledbutton.ImageName := 'stdimg.quit';
    styledbutton.ShowImage := True;
    styledbutton.Text := 'Styled';
  end;
  
  