主页 / user-12597

Ian Boyd's questions

Martin Hope
Ian Boyd
Asked: 2024-11-23 15:32:15 +0800 CST
  • 11

在 Delphi 的Vcl.Buttons单元中，他们调用：

Caption := LoadResString(BitBtnCaptions[Value]);

BitnBtnCaptions如下数组在哪里：

BitnBtnCaptions: array[TBitBtnKind] of Pointer = (
        nil, @SOKButton, @SCancelButton, @SHelpButton, @SYesButton, @SNoButton,
        @SCloseButton, @SAbortButton, @SRetryButton, @SIgnoreButton,
        @SAllButton);

常数BitnBtnCaptions为：

resourcestring
  SOKButton = 'OK';
  SCancelButton = 'Cancel';
  SYesButton = '&Yes';
  SNoButton = '&No';
  SHelpButton = '&Help';
  SCloseButton = '&Close';
  SIgnoreButton = '&Ignore';
  SRetryButton = '&Retry';
  SAbortButton = 'Abort';
  SAllButton = '&All';

因此它本质上就是在调用：

resourcestring
  SOKButton = 'OK';

s := LoadResString(@SOKButton);

LoadResString的声明是：

function LoadResString(ResStringRec: PResStringRec): string;

此函数需要一个指向TResStringRec的指针：

PResStringRec = ^TResStringRec;
TResStringRec = packed record
   // 32bit = 8 bytes
   // 64bit = 16 bytes
   Module: ^HMODULE;
   Identifier: NativeUint;
end;

但是我们正在传递一个资源字符串。

这是否意味着我们正在将一个字符串传递给一个仅接受PResStringRec的函数？

你为什么问这个？

我问这个问题是因为我要打电话：

Result := LoadResString(@SMsgDlgOK);

并且对于类型指针评估（即 {$T+}或{$TYPEDADDRESS ON}），它会给出不兼容的类型警告：

E2010 不兼容的类型：“PResStringRec”和“Pointer”

当然，我也可以用强制转换来强制执行：

Result := LoadResString(PResStringRec(@SMsgDlgOK));

硬铸？

但对于本应是正确的做法，这似乎有点苛刻。有点奇怪。

更糟糕的是，如果我要做硬石膏，我最好知道自己在做什么。

在我看来，唯一可行的方法是：

  • 魔法常数SMsgDlgOk
  • 其实是一个TResStringRec。

我们不想盲目地使用硬铸件将三角形件强行放入方形孔中。

这让我想到了我的问题：资源字符串

resourcestring
  SMsgDlgOK = 'OK';

字符串？还是一条记录？

但我一定得这么做吗？

我是否需要实际执行该Vcl.Buttons操作？是否Vcl.Buttons需要执行该操作？

我们不能简单地替换：

s := LoadResString(@SOKButton);

和

s := SOKButton

这难道不是resourcestring关键字的全部意义吗？它将字符串放入字符串表（本地化人员可以在其中对它们进行本地化），并在运行时执行所有神奇的操作（即LoadResString）以将resourcestrings公开为字符串？

如果这不是真的：为什么不是？

  • 什么是 resourcestring？
  • 它与 LoadResString(resourceString) 有何不同？

我通过拨打以下电话可以获得什么：

LoadResString(@SOKButton)

仅仅使用 SOKButton？

如果我必须使用 LoadResString ，那么强制进行类型转换是否真的、真的、真正、真正地 100％安全？

  • 理想的：s := SOKButton
  • 当前：s := LoadResString(@SOKButton)//类型指针检查失败
  • 正确的 （？）：s := LoadResString(PResStringRec(@SOKButton))

奖金聊天

如果资源字符串实际上是，TResStringRect那么我应该能够看到它。所以我检查它们是什么：

╔════════════════════════════╤══════════╗
║ Watch Name                 │ Value    ║
╠════════════════════════════╪══════════╣
║ PResStringRec(@SMsgDlgOK)  │ $AD3C54  ║
║ ├──Module                  │ $400000  ║
║ ╰──Identifier              │ 0        ║
╟┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┼┈┈┈┈┈┈┈┈┈┈╢
║ PResStringRec(@SMsgDlgYes) │ $AD3C54  ║
║ ├──Module                  │ $400000  ║
║ ╰──Identifier              │ 0        ║
╟┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┼┈┈┈┈┈┈┈┈┈┈╢
║ PResStringRec(@SMsgDlgNo)  │ $AD3C54  ║
║ ├──Module                  │ $400000  ║
║ ╰──Identifier              │ 0        ║
╚════════════════════════════╧══════════╝

每个资源字符串：

  • 住在同一地址
  • 有相同的模块
  • 具有相同的标识符

所以有些事情不对劲；对我来说这看起来不像是一个记录。

那么为什么代码可以Vcl.Buttons工作呢？

delphi
Martin Hope
Ian Boyd
Asked: 2024-04-11 21:45:55 +0800 CST
  • 4

简洁版本

如何在 HTML 中制作组合框？

长版

如何使用 HTML 中的默认文本创建可编辑的下拉列表？

也就是说：

  • 用户可以输入的文本框
  • 或者他们可以单击（或Alt+ Down）以显示下拉菜单
  • 并选择一些预定义的文本
  • 而文本框默认为一些有用的默认值，但（不一定）出现在列表中

类似于标准的 Windows Combo Box控件或 WinForms ComboBox：

在此输入图像描述

研究工作

我尝试过以下 HTML：

<input id="edPhrase" list="phrases" value="Hello, world!">
<datalist id="phrases">
  <option value="Good morning Vietnam">Good morning Vietnam</option>
  <option value="Stay classy San Francisco">Stay classy San Francisco</option>
  <option value="Cleaveland Rocks">Cleaveland Rocks</option>
  <option value="I see dead people">I see dead people</option>
  <option value="Guess who's drunk">Guess who's drunk</option>
</datalist>

但没有出现下拉菜单：

在此输入图像描述

如果用户删除现有文本，则会出现下拉菜单：

在此输入图像描述

这样就违背了下拉菜单的全部目的。

这就引出了我们的问题：

如何在 HTML 中制作组合框？

完整的最小可重复示例 (CRME)

因此，您可以尝试摆弄它以使其在您的沙箱中工作：

html
Martin Hope
Ian Boyd
Asked: 2024-01-19 02:07:40 +0800 CST
  • 7

我正在关注 Tensorflow 初学者教程：

我们来到第一行代码：

构建机器学习模型

构建 tf.keras.Sequential 模型：

model = tf.keras.models.Sequential([
  tf.keras.layers.Flatten(input_shape=(28, 28)),
  tf.keras.layers.Dense(128, activation='relu'),
  tf.keras.layers.Dropout(0.2),
  tf.keras.layers.Dense(10)
])

我对第一行感到困惑：

tf.keras.layers.Flatten(input_shape=(28, 28))

具体来说就是input_shape论点。

为什么：因为我认为该Flatten操作采用前一层并将其转换为一维向量；那么这个input_shape论证是什么意思呢？

所以我们查阅文档

文档Flatten()： https: //www.tensorflow.org/api_docs/python/tf/keras/layers/Flatten

说：

压平输入。不影响批量大小。

具体来说，我对这个input_shape论点感兴趣：

参数

data_format一个字符串，channels_last（默认）或 之一channels_first。输入中维度的顺序。Channels_last 对应于形状 ( batch, ..., channels) 的输入，而 Channels_first 对应于形状 ( batch, channels, ...) 的输入。如果未指定，则使用image_data_formatKeras 配置文件中~/.keras/keras.json（如果存在）“channels_last”处找到的值。默认为“channels_last”。

没有名为 的参数input_shape。

那么这个论证的意义是什么？

简洁版本

  • 如果我从文档中编写 TF 代码，我怎么知道它Flatten需要一个input_shape参数？
  • 为什么input_shape文档中省略了该参数？

换句话说：文档假定您具备一些有关 TensorFlow 的基本知识，但文档本身并未对此进行说明。

有人可以帮助我理解这种无证行为，以及为什么它没有记录？

研究工作

除了查阅文档之外，我们还有：

tensorflow