随笔分类 - 编程
摘要：1 type 2 TNotifyEventRef = reference to procedure(Sender: TObject); 3 4 function AnonymousEvent(const Proc: TNotifyEventRef): TNotifyEvent; 5 type 6 T
阅读全文
摘要：从 Rad Studio 10.2 Tokyo 开始，可以编译和运行 Linux 服务器应用程序（无用户界面）。我们将使用 Ubuntu 准备一个 docker 映像，以及通过 PAServer 在 Linux 上运行 Delphi 应用程序所需的一切。使用 Docker，我们可以将这些应用程序在
阅读全文
摘要：最进一直在想要弄个自动化框架，如何在接口已经实现的情况下快速对接，快速开发应用程序，小试了一把，初步成功了。 以下是关键代码部分，作为备忘： 1 procedure TfrmMain.LoadMenu(Astr: string); 2 var 3 ribbonTab: TdxRibbonTab; 4
阅读全文
摘要：数据采集技术在工业控制及自动化等领域中发挥着重要的作用。数据采集的一般过程是这样的： ①向采集卡发出通道选择指令。 ②选择要采集的通道号。 ③启动A/D转换。 ④等待，直到转换完成。 ⑤从采集卡读出数据。 对于多通道的采集，在程序的设计中，一般采用的两种方法： 1、查询法 所谓查询方法就是采用一个循
阅读全文
摘要：工厂模式，有工厂就有产品，工厂里就是加工产品的，这个模式有以下参与者： 1.抽象产品，对象产品的对像接口或抽象层。 2.具体产口，实现抽象产品的接口。 3.抽象工厂，工厂的方法，方法用于反回产品对象。可以用抽象类或接口定义 4.具体工厂，实现抽象工厂接口的具体类 1 unit Unit1; 2 3
阅读全文
