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数据库没啥两样了。
优惠码50SSDOFF 首月5折50WHTSSD 年付5折15OFF 85折优惠,可循环使用荷兰VPSCPU内存SSD带宽IPv4价格购买1核1G50G1Gbps/3TB1个$ 9.10/月链接2核2G80G1Gbps/5TB1个$ 12.70/月链接2核3G100G1Gbps/7TB1个$ 16.30/月链接3核4G150G1Gbps/10TB1个$ 18.10/月链接阿联酋VPSCPU内存SS...
iON Cloud怎么样?iON Cloud今天发布了7月份优惠,使用优惠码:VC4VF8RHFL,新购指定型号VPS半年付或以上可享八五折!iON的云服务器包括美国洛杉矶、美国圣何塞(包含了优化线路、CN2 GIA线路)、新加坡(CN2 GIA线路、PCCW线路、移动CMI线路)这几个机房或者线路可供选择,有Linux和Windows系统之分,整体来说针对中国的优化是非常明显的,机器稳定可靠,比...
官方网站:点击访问亚州云活动官网活动方案:地区:美国CERA(联通)CPU:1核(可加)内存:1G(可加)硬盘:40G系统盘+20G数据盘架构:KVM流量:无限制带宽:100Mbps(可加)IPv4:1个价格:¥128/年(年付为4折)购买:直达订购链接测试IP:45.145.7.3Tips:不满意三天无理由退回充值账户!地区:枣庄电信高防防御:100GCPU:8核(可加)内存:4G(可加)硬盘:...
delphi2007为你推荐
安全防护安全防护用品都有哪些qq实名注册qq实名认证apple以旧换新苹果以旧换新怎么换?价格是怎样的电视蚂蚁电视蚂蚁是不是不能用了?我在国外该怎样看奥运?密码设置怎样登录怎样设置密码diskgenius免费版diskgenius 破解版?运行时错误1004ipad下载时出现错误1004是怎么回事?该怎么解决?vrrp配置vrrp怎样配置、它是什么东西、在那配置它呢?(超级终端里)最好举例子廖华rcd后的中性线可以接地对吗 南京廖华网页错误详细信息我为什么不可以收货那 网页错误详细信息
directspace cdn服务器 香港主机 免备案cdn 韩国电信 账号泄露 iis安装教程 php空间申请 免费申请网站 中国电信宽带测速网 t云 服务器监测 网站在线扫描 华为云服务登录 360云服务 视频服务器是什么 东莞主机托管 广东主机托管 97rb rewritecond 更多