文档章节

Delphi DLL 窗体

vga
 vga
发布于 2017/05/16 16:08
字数 90
阅读 15
收藏 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
博文 363
码字总数 26077
作品 0
佳木斯
私信 提问
聊天工具视频接口编写问题?求助

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

拉菲一箱
2012/03/14
395
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

没有更多内容

加载失败,请刷新页面

加载更多

c++ 定义新的异常

#include <iostream> #include <exception> using namespace std; struct MyException : public exception { const char * what () const throw () { return "C++ Exception"; } }; int main......

天王盖地虎626
38分钟前
1
0
PDMan-2.1.1 发布:用心开源,免费的国产数据库建模工具(春节前最后一个版本)

一、软件介绍 PDMan 是一款开源免费的数据库模型建模工具,是PowerDesigner之外另一种更好的选择。支持Windows,Mac,Linux等操作系统,具有上手容易,使用简单的特点。 2018年获得码云GVP (Gi...

O龙猫O
今天
12
0
OSChina 周二乱弹 —— 以后我偷小鱼干养你

Osc乱弹歌单(2019)请戳(这里) 【今日歌曲】 @庞巴哥 :只有这节奏瞬间变得轻松。。。。。。。。。分享Talking Eyes的单曲《In the sun (Extended Version)》: 《In the sun (Extended Ve...

小小编辑
今天
133
6
多表查询

第1章 多表关系实战 1.1 实战1:省和市  方案1:多张表,一对多  方案2:一张表,自关联一对多 1.2 实战2:用户和角色 (比如演员和扮演人物)  多对多关系 1.3 实战3:角色和权限 (比如...

stars永恒
今天
9
0
求推广,德邦快递坑人!!!!

完全没想好怎么来吐槽自己这次苦逼的德邦物流过程了,只好来记一个流水账。 从寄快递开始: 2019年1月15日从 德邦物流 微信小app上下单,截图如下: 可笑的是什么,我预约的是17号上门收件,...

o0无忧亦无怖
昨天
13
0

没有更多内容

加载失败,请刷新页面

加载更多

返回顶部
顶部