小编Hac*_*rew的帖子

我有一个值存储在名为 myStation 的变量中。现在我想在位于另一个名为 station.js 的文件中的数组中找到该值。当我找到匹配项时，我想获取 stationID。我使用的代码let stationNewName = Stations.find((s) => s.stationName === myStation);导致错误“错误处理：Stations.find 不是函数”。我错过了什么？

我希望不必加载 Lodash 库的开销，并认为我应该能够使用基本的 javascript 代码来完成。以下是我的代码中与错误相关的摘录：

需要 station.js 文件

const Stations = require("./stations.js");

这是导致错误的代码的摘录。下一行在我的一个处理程序中执行，其中 myStation 正在接收值“CBS”

const myStation = handlerInput.requestEnvelope.request.intent.slots.stationName.value;

下一行产生错误：“错误处理：Stations.find 不是函数”。

let stationNewName = Stations.find((s) => s.stationName === myStation);

这是我在stations.js 文件中的数组的摘录

STATIONS: [          
          {stationName: "CBS", stationID: "8532885"},
          {stationName: "NBC", stationID: "8533935"},
          {stationName: "ABC", stationID: "8534048"},
    ],  

更新 Array 以包含完整模块

'use strict';

module.exports = {

STATIONS: [          
          {stationName: "CBS", stationID: "8532885"},
          {stationName: "NBC", stationID: "8533935"}, …

我正在将一条新记录插入到我已打开并处于编辑模式的数据库表中.我有一个表单,而我的Delphi XE应用程序已经在TDBEdit框中预先填充了一些值.当从表单上的一个TDBEdit框切换到另一个TDBEdit框时,在进入框时将删除下一个TDBEdit框中的值.这不是我希望组件表现的方式......我宁愿把价值留在盒子里.在发出table.Post命令之前,数据不会存储在表中.

如何在进入TDBEdit框时将数据保留在框中？

我正在尝试使用编辑框过滤 Delphi 中的列表框，但它不起作用。这是我基于编辑框的 OnChange 事件的代码。

procedure TReportDlgForm.FilterEditOnChange(Sender: TObject);
var
  I: Integer;
begin
  ListBox1.Items.BeginUpdate;
  try
    for I := 0 to ListBox1.Items.Count - 1 do
      ListBox1.Selected[I] := ContainsText(ListBox1.Items[I], FilterEdit.Text);
  finally
    ListBox1.Items.EndUpdate;
  end;
end;

我希望当我在编辑框中键入内容时，列表框项目将被过滤。

我有一个 TMemo 对象，其中包含大约 30 行（一些文本，一些空白行）的文本，表示我希望应用程序发送的电子邮件的消息正文。在下面的代码中，我将 TMemo 对象中的文本传递给IdMessage1.Body.Text(Indy 10)，但我生成的电子邮件正文似乎只是一条连续的行。我想查看包含一些空行的间距。如果我从 TMemo 的 Lines 参数中复制内容并将其粘贴到文本编辑器中，我可以在行尾看到 CR 和 LF。

CR & LF 在此翻译中是否被剥离，我应该为此使用不同的组件而不是 TMemo，还是我将 TMemo 中的行IdMessage1.Body.Text错误地传递给了？

IdMessage1.Body.Text := EmailBodyMemo.Text;
IdMessage1.ContentType := 'text/html';