anchor.diff:            Top := Prompt.Top + Prompt.Height - DialogUnits.Y -
               (GetTextBaseline(Edit, Canvas) - GetTextBaseline(Prompt, Canvas));
             Width := Form.ClientWidth - Left - MulDiv(8, DialogUnits.X, 4);
  +          if IsCustomStyleActive then
  +            Width := Width - 4;
             MaxLength := 255;
             Text := AValues[I];
             SelectAll;
             Prompt.FocusControl := Edit;
           end;
  -        CurPrompt := Edit.Top + Edit.Height + 5;
  +        CurPrompt := Edit.Top + Edit.Height + MulDiv(5, LPPI, 96); // KV
         end;
  -      ButtonTop := Edit.Top + Edit.Height + 15;
  +      ButtonTop := Edit.Top + Edit.Height + MulDiv(15, LPPI, 96); //KV
         ButtonWidth := MulDiv(50, DialogUnits.X, 4);
  -      ButtonHeight := MulDiv(14, DialogUnits.Y, 8);
  +      ButtonHeight := DialogUnits.Y + MulDiv(6, LPPI, 96);  //MulDiv(14, DialogUnits.Y, 8);
  +      if IsCustomStyleActive then
  +        ButtonsRightOffset := 4
  +      else
  +        ButtonsRightOffset := 0;
         with TButton.Create(Form) do
         begin
           Parent := Form;
           Caption := SMsgDlgOK;
           ModalResult := mrOk;
           Default := True;
  -        SetBounds(Form.ClientWidth - (ButtonWidth + MulDiv(8, DialogUnits.X, 4)) * 2, ButtonTop, ButtonWidth, ButtonHeight);
  +        SetBounds(Form.ClientWidth - (ButtonWidth + MulDiv(8, DialogUnits.X, 4)) * 2 - ButtonsRightOffset, ButtonTop, ButtonWidth, ButtonHeight);
         end;
         with TButton.Create(Form) do
         begin
  
positive.code:   PromptCount, CurPrompt: Integer;
    MaxPromptWidth: Integer;
    ButtonTop, ButtonWidth, ButtonHeight: Integer;
  
    function GetPromptCaption(const ACaption: string): string;
    begin
  
negative.code:         Caption := SMsgDlgCancel;
          ModalResult := mrCancel;
          Cancel := True;
          SetBounds(Form.ClientWidth - (ButtonWidth + MulDiv(8, DialogUnits.X, 4)) - ButtonsRightOffset, ButtonTop, ButtonWidth, ButtonHeight);
          Form.ClientHeight := Top + Height + MulDiv(13 + 2 * ButtonsRightOffset, LPPI, 96);
        end;
        if ShowModal = mrOk then
        begin
  