delphi2007delphi2007 如何 连接oracle数据库 求详细的过程。
delphi2007 时间:2021-08-03 阅读:(
)
delphi2007里面是怎么加线程的,有没有例子??
delphi2007中的线程定义与delphi3-7的一模一样!找找以前的例子就行了!
下面附一段简单的多线程例子:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
UsedThread: TButton;
NoUsedThread: TButton;
Label1: TLabel;
Button1: TButton;
Button2: TButton;
Button3: TButton;
procedure UsedThreadClick(Sender: TObject);
procedure NoUsedThreadClick(Sender: TObject);
procedure Button1Click(Sender: TObject);
procedure Button3Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
hThread:Thandle;//定义一个句柄
ThreadID:DWord;
implementation
{$R *.dfm}
function MyThreadFunc(P:pointer):Longint;stdcall;
var
i:longint;
begin
form1.Label1.Caption:='0';
for i:= 0 to 50000 do
begin
form1.Label1.Caption:=inttostr(i);
end;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
SuspendThread(hThread); //挂起线程
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
TerminateThread(hThread,0); // 终止线程
end;
procedure TForm1.Button3Click(Sender: TObject);
begin
ResumeThread(hThread); // 激活线程
end;
procedure TForm1.NoUsedThreadClick(Sender: TObject);
begin
MyThreadfunc(nil);
//没有创建线程时,直接调用线程函数
end;
procedure TForm1.UsedThreadClick(Sender: TObject);
begin
//创建线程,同时线程函数被调用
hthread:=CreateThread(nil,0,@MyThreadfunc,nil,0,ThreadID);
if hThread=0 then
messagebox(Handle,'Didn’tCreateaThread',nil,MB_OK);
end;
end.delphi7和delphi2007有什么区别?学哪个版本最好??
DELPHI2007支持更多的东西 比如.NET FOR PHP
如果是入门得话 学DELPHI7就OK了
源码是否兼容以及到底应该学哪个版本最好??
。
。
。
(这个都是OBJ PASCAL)Delphi2007能开发WIN CE程序吗?回答好还有加分
可以,可以绕过.
其实windows ce,在微软自己的教材里,只是一套WindowsApi组合,可以使用这套组合做出可以在Ce上运行的程序.
而Ce主要用于数据终端,所以你的Delphi只要可以运行,可以连接到服务器上的IIS指定的数据库里,并进行数据传输就算完成一个程序.
所以楼上的回答是不对的.
现在我们使用的仓库管理软件,就是使用Delphi7做的,服务器端使用Soap的管理软件.Delphi 2007中如何安装*.pas控件?
新建控件包第二步:选中右边“ Project Manager ”中“ Contains ”文件夹,点击鼠标右键,在弹出的菜单中选择“ Add”。
添加第三步:在 Add 对话框中,点击“ Browse ”按钮,选择要安装的 PAS 文件,然后点击“ OK ”按钮。
delphi2007 如何 连接oracle数据库 求详细的过程。
1、安装oracle客户端;
2、在windows“管理工具-数据源(odbc)-系统DSN”中设置好 oracle对应的odbc数据源;
3、在bde中设置“别名”;
4、剩下的和访问其他bde数据库没啥两样了。
轻云互联成立于2018年的国人商家,广州轻云互联网络科技有限公司旗下品牌,主要从事VPS、虚拟主机等云计算产品业务,适合建站、新手上车的值得选择,香港三网直连(电信CN2GIA联通移动CN2直连);美国圣何塞(回程三网CN2GIA)线路,所有产品均采用KVM虚拟技术架构,高效售后保障,稳定多年,高性能可用,网络优质,为您的业务保驾护航。官方网站:点击进入广州轻云网络科技有限公司活动规则:用户购买任...
Digital-VM商家目前也在凑热闹的发布六月份的活动,他们家的机房蛮多的有提供8个数据中心,包括日本、洛杉矶、新加坡等。这次六月份的促销活动全场VPS主机六折优惠。Digital-VM商家还是有一点点特点的,有提供1Gbps和10Gbps带宽的VPS主机,如果有需要大带宽的VPS主机可以看看。第一、商家优惠码优惠码:June40全场主机六折优惠,不过仅可以月付、季付。第二、商家VPS主机套餐1...
对于一般的用户来说,我们使用宝塔面板免费版本功能还是足够的,如果我们有需要付费插件和专业版的功能,且需要的插件比较多,实际上且长期使用的话,还是购买付费专业版或者企业版本划算一些。昨天也有在文章中分享年中促销活动。如今我们是否会发现,我们在安装宝塔面板后是必须强制我们登录账户的,否则一直有弹出登录界面,我们还是注册一个账户比较好。反正免费注册宝塔账户还有代金券赠送。 新注册宝塔账户送代金券我们注册...
delphi2007为你推荐
cs躲猫猫cs躲猫猫的游戏叫什么最好的视频播放器现在最好的播放器 是什么呀实数的定义什么是实数?实数的概念是什么数据管理制度网络管理制度.武汉教育云平台武汉天喻教育科技有限公司怎么样?传奇私服教程怎样开传奇SF?我要具体详细的步骤第五人格抄袭第五人格逃生模式与猫和老鼠如出一辙,这是否存在抄袭?印度it印度IT业与中国IT业的差异?深度剖析!免杀远控远控+免杀,到底是怎么一回事?wifi快速破解器电脑版电脑版,WIFI密码破解软件哪个好?
泛域名绑定 本网站服务器在美国维护 x3220 cve-2014-6271 镇江联通宽带 魔兽世界台湾服务器 湖南服务器托管 dux 柚子舍官网 速度云 东莞数据中心 免费网页空间 lick cxz 个人免费邮箱 阿里云邮箱登陆 rewritecond 亿库 ncp sonya 更多