anchor.diff:    Vcl.Dialogs,
     Vcl.StdCtrls,
     Vcl.ImgList,
  +  Vcl.Themes,
     DDetours;
   
   {$REGION 'Fix TWICImage - https://quality.embarcadero.com/browse/RSP-26621'}
  
positive.code:       BorderStyle := bsDialog;
        Caption := ACaption;
        ClientWidth := MulDiv(180 , DialogUnits.X, 4) + MaxPromptWidth;  //KV
        if IsCustomStyleActive then
          ClientWidth := ClientWidth + 4;
        PopupMode := pmAuto;
        Position := poScreenCenter;
  
negative.code:       ButtonTop := Edit.Top + Edit.Height + MulDiv(15, LPPI, 96); //KV
        ButtonWidth := MulDiv(50, DialogUnits.X, 4);
        ButtonHeight := DialogUnits.Y + MulDiv(6, LPPI, 96);  //MulDiv(14, DialogUnits.Y, 8);
        if TStyleManager.IsCustomStyleActive then
          ButtonsRightOffset := 4
        else
          ButtonsRightOffset := 0;
  