易截截图软件、单文件、免安装、纯绿色、仅160KB

Delphi 多线程中创建窗体 - Delphi / Windows SDK/API

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TForm1 = class(TForm)
  Button1: TButton;
  procedure Button1Click(Sender: TObject);
  private
  { Private declarations }
  public
  { Public declarations }
  end;

var
  Form1: TForm1;

implementation

uses Unit2;

{$R *.dfm}
procedure FileMd;
begin
  Application.CreateForm(TForm2, Form2); //这里错误,
  Form2.ShowModal; //这里错误,
end;
procedure TForm1.Button1Click(Sender: TObject);
var
dloopThreadID:DWORD;
begin
CreateThread(nil,0,@FileMD,nil,0,dloopThreadID);
end;

end.
会创建多个窗体!该如何创建!


Xabi Alonso

先up再看看

VCL的框架结构 就不允许在线程中创建窗体,否则整个消息循环就乱了!

VCL的框架结构 就不允许在线程中创建窗体,否则整个消息循环就乱了!


虚心学习一下。。。

多线程不熟悉。。。来学习地。。。

听说vcl在线程中是不安全的,


相关问答:

这个SQL语句有什么问题? - Delphi / 非技术区

select * from shuju.DB where 开盘价-收盘价<=0.02
开盘价 与收盘价 是数据库里的字段
select * from aTableName where ((开盘价-收盘价) <=0.02 )

开盘价比收盘价低两分以下的情况

Mark!!!!!!

se ......

DELPHI DLL实参传窗体

//DLL 放在EXE中没问题
function SkinForm(var skfrm:TForm):Integer;stdcall;
var
  skf:TbsBusinessSkinForm;
  nskfrm:TForm;
begin
  frmUUMain:=skfrm;
  skf:=TbsBus ......

delphi 數據類型

delphi 數據類型 定義A~Z 為有序型,A為最小,Z最大。
Delphi(Pascal) code:

var
arr:array ['A'..'Z'] of Char;

用集合搞定

怎麼去運算呢?inc() ......

简单SQL语言 - Delphi / 数据库相关

数据: 年 月 日 开盘 收盘
使用下面语句搜索到了 每年每个月的月初和月末都是几号  
select 年,月,MIN(日) as frist,MAX(日) AS laset from mt4his.DB GROUP BY 年,月
我想得到 每年每个月的月初和月末 ......

Delphi数据库图片问题 - Delphi / 数据库相关

我用的是sql server2000,里面存有字段:照片 image
我不明白怎么把图片存入数据库中?
我还在Delphi中建立了窗体,如何将数据库中的图片一并显示出来,我用的是DBGrid和Image
如何将两者关联起来?!
参考(我回 ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号