文档章节

Delphi DLL 窗体

vga
 vga
发布于 2017/05/16 16:08
字数 90
阅读 14
收藏 0

Dll 导出:


{$R *.res}
exports
  ShowDataCheckForm;
begin
end.

DLL 实现:

  public
    { Public declarations }
  end;

  procedure ShowDataCheckForm(app: THandle; CheckStep: Integer); stdcall;


var
  FormMain: TFormMain;

implementation


procedure ShowDataCheckForm(app: THandle; CheckStep: Integer);
begin
  Application.Handle := app;
  FormMain := TFormMain.Create(Application);
  if CheckStep = 1 then
    FormMain.Caption := '参数一'
  else
    FormMain.Caption := '参数二';

  try

    FormMain.ShowModal;
  finally
    FormMain.Free;
  end;
end;

DLL 调用:

procedure ShowDataCheckForm(app: THandle; CheckStep: Integer);
  stdcall;
  external '.\dll\YCDataCHK.dll'; // 动态连接库


procedure TForm1.btn1Click(Sender: TObject);
begin
  ShowDataCheckForm(Application.Handle, 1);
end;

© 著作权归作者所有

共有 人打赏支持
vga

vga

粉丝 21
博文 359
码字总数 24366
作品 0
佳木斯
聊天工具视频接口编写问题?求助

windows下实现一个聊天工具,支持视频。底下视频流和对接接口都是使用C/C++编写,提供dll接口。 UI考虑用delphi或者QT等其他语言编写。想问下,windows下使用directshow实现的话,怎么实现视...

拉菲一箱
2012/03/14
311
1
[开源项目-MyBean轻量级配置框架] 使用MyBean快速搭建分模块的应用程序(主页面的TAB)(DLL-MDI)

[概述] 抱歉由于上次开源比较匆忙,没有来的及做一个DEMO,里面也有些垃圾的文件没有及时清理。DEMO其实昨天晚上已经调通。相关说明文档今天晚上才说明好,欢迎大家继续关注和交流,和大家一...

天地弦
2014/05/20
0
0
Delphi调用 C# 写的webservice

Delphi调用 C# webservice总结 用delphi的THTTPRIO控件调用了c#写的webservice。 下面是我调试时遇到的一些问题: 1:导入wsdl文件:file--new----other----webservice---WSDLimporter---输入...

vga
2014/11/25
0
0
delphi fastMM 使用方法简介

delphi fastMM 使用方法简介 在 http://sourceforge.net/projects/fastmm 中可以下载到最新 stable 的 FastMM,当前推荐的是 4.62,主要特点包括: 1、彻底实现了 Borland 的内存管理器,可以...

vga
2014/08/26
0
0
Delphi 编写ActiveForm窗体工程知识和样例(开发浏览器客户端应用程序)

Delphi 编写ActiveForm窗体工程知识和样例(开发浏览器客户端应用程序) 目录(?)[+] 一基础知识介绍 二 ActiveForm工程 一、基础知识介绍: 1、ActiveForm的基础知识介绍: 在Delphi中,Act...

vga
2014/03/06
0
0

没有更多内容

加载失败,请刷新页面

加载更多

初级开发-编程题

` public static void main(String[] args) { System.out.println(changeStrToUpperCase("user_name_abc")); System.out.println(changeStrToLowerCase(changeStrToUpperCase("user_name_abc......

小池仔
今天
4
0
现场看路演了!

HiBlock
昨天
8
0
Rabbit MQ基本概念介绍

RabbitMQ介绍 • RabbitMQ是一个消息中间件,是一个很好用的消息队列框架。 • ConnectionFactory、Connection、Channel都是RabbitMQ对外提供的API中最基本的对象。Connection是RabbitMQ的s...

寰宇01
昨天
7
0
官方精简版Windows10:微软自己都看不过去了

微软宣布,该公司正在寻求解决方案,以减轻企业客户的Windows 10规模。该公司声称,企业客户下载整个Windows 10文件以更新设备既费钱又费时。 微软宣布,该公司正在寻求解决方案,以减轻企业...

linux-tao
昨天
8
0
TypeScript基础入门之JSX(二)

转发 TypeScript基础入门之JSX(二) 属性类型检查 键入检查属性的第一步是确定元素属性类型。 内在元素和基于价值的元素之间略有不同。 对于内部元素,它是JSX.IntrinsicElements上的属性类型...

durban
昨天
8
0

没有更多内容

加载失败,请刷新页面

加载更多

返回顶部
顶部