【问题标题】:Inconsistency with control location and control appearance与控件位置和控件外观不一致
【发布时间】:2015-04-08 21:28:05
【问题描述】:

我的“关于”表单在我的计算机(Win7 32 位)和 IDE 中看起来像这样

至少在一台 PC 上(在 Win7 64 位下),它看起来像这样:

关于此的 2 个问题:

  • 为什么在我的代码中没有任何东西可以隐藏时,我的“确定”按钮没有出现?我该如何解决?当我单击另一个按钮或单击其位置时,会出现“确定”按钮。

  • 为什么我的按钮和标签向右移动,超出了我在 VB6 中设计的形式?我的代码中没有任何内容可以改变它们的位置。

一点信息: 我的按钮位于“框架”控件内。这个框架控件应该是 840 twips(VB6 单位......为什么他们不能使用像素?!)从左侧和顶部 525。我的标签不在任何东西里面。

谢谢。

编辑:管理窗口的唯一代码在 form_load 中。 FraAbout 包含您在上面看到的按钮,FraSplash 包含一个进度条。 ZOrder 制作按钮始终显示在顶部。

Private Sub Form_Load()

出错后继续下一步

Timer1.Enabled = False
LblRevision = App.FileDescription

SendMessage pb1.Hwnd, PBM_SETBARCOLOR, 0, ByVal RGB(114, 191, 68)

FraAbout.Visible = False: FraSplash.Visible = False

    Me.ForeColor = 0: Me.DrawStyle = 0: Me.BorderStyle = vbFixedSingle: Me.Refresh

If AppLoaded Then
    FraAbout.Visible = True
Else
    t = 0: pb1.value = pb1.min: FraSplash.Visible = True: Timer1.Enabled = True
End If

结束子

【问题讨论】:

  • 你能和我们分享一些代码吗?
  • 好吧,实际上代码中没有与这些控件相关的内容。我添加了Form_Load中的内容,但并不多
  • 按钮的属性怎么样?

标签: vb6 controls


【解决方案1】:

这一切都来自...我的配置面板。如果你有问题,这里是解决问题的方法。我当时是 125,只是把它放回 100 :

【讨论】:

  • 我的 QHD 显示器显示 150%。 200% 将在几年内成为新的“小字体”,尤其是在平板电脑上。您现在必须使您的代码 DPI 独立。
  • 在 VB6 软件上很难做到;)
猜你喜欢
  • 2011-01-03
  • 2010-12-08
  • 1970-01-01
  • 2011-03-19
  • 1970-01-01
  • 2014-07-15
  • 1970-01-01
  • 2013-10-02
  • 1970-01-01
相关资源
最近更新 更多