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数据库没啥两样了。
Virtono最近推出了夏季促销活动,为月付、季付、半年付等提供9折优惠码,年付已直接5折,而且下单后在LET回复订单号还能获得双倍内存,不限制付款周期。这是一家成立于2014年的国外VPS主机商,提供VPS和服务器租用等产品,商家支持PayPal、信用卡、支付宝等国内外付款方式,可选数据中心包括罗马尼亚、美国洛杉矶、达拉斯、迈阿密、英国和德国等。下面列出几款VPS主机配置信息,请留意,下列配置中...
华纳云双11钜惠出海:CN2海外物理服务器终身价688元/月,香港/美国机房,免费送20G DDos防御,50M CN2或100M国际带宽可选,(文内附带测评)华纳云作为一家专业的全球数据中心基础服务提供商,总部在香港,拥有香港政府颁发的商业登记证明,APNIC 和 ARIN 会员单位。主营香港服务器、美国服务器、香港/美国OpenStack云服务器、香港高防物理服务器、美国高防服务器、香港高防I...
老鹰主机HawkHost是个人比较喜欢的海外主机商,如果没有记错的话,大约2012年左右的时候算是比较早提供支付宝付款的主机商。当然这个主机商成立时间更早一些的,由于早期提供支付宝付款后,所以受众用户比较青睐,要知道我们早期购买海外主机是比较麻烦的,信用卡和PAYPAL还没有普及,大家可能只有银联和支付宝,很多人选择海外主机还需要代购。虽然如今很多人建站少了,而且大部分人都用云服务器。但是老鹰主机...
delphi2007为你推荐
网页图片显示不出来电脑的图片都显示不出来了,怎么办?安全防护安全防护措施exe文件打不开我的电脑里面的EXE文件打不开啦scanf返回值Scanf()函数的使用电子听诊器听诊器的构造及原理是……visio使用教程怎样使用visio画E-R图qsv视频格式转换器有没有手机上用的(把qsv视频格式转换成mp4的转换器)讯飞tts能配合讯飞语音tts使用的手机阅读器都有哪些微店是什么微店和微商有什么区别呢vrrp配置INTERNET协议属性里面的备用配置有什么用?
工信部域名备案 贝锐花生壳域名 google电话 仿牌空间 大硬盘 inmotionhosting permitrootlogin 日志分析软件 国外php空间 主机合租 魔兽世界台湾服务器 灵动鬼影 cdn加速原理 1美金 web服务器是什么 香港ip 免费的加速器 美国十大啦 reboot 低价 更多