RSS订阅 | 匿名投稿
您的位置:网站首页 > 程序

delphi 在窗体上创建自己的光标并输入文字

我们知道在文本框等可以接收输入的组件中,我们可以看到闪烁的光标,并可以输入文字,如果我们在,比如窗体上时,因为不支持输入,也无法显示闪烁的光标,那我们有办法做自己的输入吗?当然可以,下面我们演示在Form…
类别:程序 标签: 作者:admin 日期:2013-11-22 19.37.08

delphi 在Win32程序中显示Dos调试窗口

在很多程序中,都可以看到程序运行中,会有一个Dos窗口,实时显示一些运行信息,这里就告诉大家是如何实现的,我们做个简单的,其实对控制台的操作还有很多,有兴趣的可以去查资料。用到的API函数如下:<pstyle="mar…
类别:程序 标签: 作者:admin 日期:2013-11-22 19.36.23

Delphi编程防止界面卡死的方法

1.循环里面防止界面卡死的方法可以使用Application.ProcessMessages;例如下列方法:varn:Integer;beginforn:=0to10000dobeginEdit1.Text:=IntToStr(n);...
类别:程序 标签: 作者:admin 日期:2013-11-15 11.31.47

Delphi操作ini配置文件

最近在做的IP设置程序~因为有些东西要保存成常量~但是又可能需要进行一些改动~所以就想到了保存到INI配置文件的办法~找了一下教程~还是继续分享~一、有必要了解INI文件的结构:;注释[小节名]关键字=值…—-INI文件允…
类别:程序 标签: 作者:admin 日期:2013-11-12 11.17.28

delphi 程序获取传参

转自万老师的博客...//获取程序参数//可从Project->Options->Debugger->Parameters中输入模拟参数,多个参数可用空格隔开procedureTForm1.FormCreate(Sender:TObject);vari:Integer;beginfori:=1toParamCount...
类别:程序 标签: 作者:admin 日期:2013-10-24 22.48.44

delphi各个版本编译开关值

delphi各个版本编译开关值{$IFDEFVER80}-Delphi1{$IFDEFVER90}-Delphi2{$IFDEFVER100}-Delphi3{$IFDEFVER120}-Delphi4{$IFDEFVER130}-Delphi5{$IFDEFVER140}-Delphi6{$IFDEFVER150}-Delphi7{$IFDEFVER160}-Delphi8{$…
类别:程序 标签: 作者:admin 日期:2013-10-15 22.58.50

Delphi异常机制与SEH

Delphi异常机制与SEH书呆子介绍SEH机制的文章很多,但基本都是C++的,关于Delphi的很少。最近项目需要,仔细阅读了VCL关于异常的处理,有些心得体会,希望和大家一起分享。
类别:程序 标签: 作者:admin 日期:2013-10-15 22.46.08

delphi Application.Title在Win7下失效了?

DelphiXE会默认使用Mainform的Caption作为Application的title,就是你在任务栏上看到的标题。实际上这是为兼容Vista设计的,如果你要显示自定义的标题,需要修改项目文件,beginApplication.Initialize;Application.M…
类别:程序 标签: 作者:admin 日期:2013-10-10 20.58.08

Delphi滚动标题栏文字

procedureTForm1.Button1Click(Sender:TObject);varoldtitle:String;begintmr1.Enabled:=nottmr1.Enabled;iftmr1.Enabled=falsethenbeginApplication.Title:=oldtitle;form1.Caption:=oldtitle;end;end;procedureTFo…
类别:程序 标签: 作者:admin 日期:2013-10-10 20.31.29

delphi 带参数的 Exit

unitUnit1;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,StdCtrls;typeTForm1=class(TForm)Button1:TButton;procedureButton1Click(Sender:TObject);end;var&nb...
类别:程序 标签: 作者:admin 日期:2013-10-10 20.24.22

delphi 点击关闭叉时,最小化图标

procedureWMSysCommand(varMessage:TMessage);messageWM_Syscommand;procedureTFrm_main.WMSysCommand(varMessage:TMessage);beginif(Message.WParam=SC_CLOSE)or(Message.WParam=SC_MINIMIZE)thenbeginCoolTrayIcon…
类别:程序 标签: 作者:admin 日期:2013-10-10 20.22.16

delphi 窗体不可用

delphi窗体不可用EnableWindow(handle,false);
类别:程序 标签: 作者:admin 日期:2013-03-25 15.47.51

delphi 如何判断一个EXE文件是否运行

如何判断一个EXE文件是否运行了呢?这里用到一个函数:functionexe_is_running(constexeName:String):Boolean;//exeName:不要扩展名的Exe主文件名varhCurrentWindow:HWnd;szText:array[0..254]ofchar;beginResult:=F…
类别:程序 标签: 作者:admin 日期:2013-03-20 09.30.29

delphi弹出信息框大全

1.警告信息框MessageBox(Handle,'警告信息框','警告信息框',MB_ICONWARNING);2.疑问信息框MessageBox(Handle,'疑问信息框','疑问信息框',MB_ICONQUESTION);3.错误提示框MessageBox(Handle,'错误信息框','错误信息…
类别:程序 标签: 作者:admin 日期:2013-03-20 09.19.24

delphi 侧边栏隐藏窗体

timer1.Interval设置为5最好unitUnit1;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,ComCtrls,ExtCtrls,Math,StdCtrls;typeTForm1=class(TForm)Timer1:TTimer;Label1:…
类别:程序 标签: 作者:admin 日期:2013-03-20 09.18.33

DELPHI 创建自己的定时器 定时清理内存

下面这个例子就是自定义时间清理内存空间。unitTrimWorkingSet;interfaceimplementationusesSysUtils,Windows,ExtCtrls;typeTTrimmer=class(TTimer)//继承自TTimer定时器类publicprocedureTimerTick(Sender:TObject)…
类别:程序 标签: 作者:admin 日期:2013-03-08 22.36.11

Delphi XE2 - 万一“获取程序自身大小的函数”改进版

functionGetFileSize(constFileName:string):Int64;varSR:TSearchRec;beginResult:=-1;ifFindFirst(FileName,faAnyFileand(notfaDirectory),SR)=0thentryResult:=SR.Size;finallyFindClose(SR);end;end;该函数用于获…
类别:程序 标签: 作者:admin 日期:2013-03-08 22.03.24

Delphi XE2 - 实现主窗口在任务栏上不显示

作者:
类别:程序 标签: 作者:admin 日期:2013-03-08 22.01.04

delphi 弹出输入框的InputQuery, InputQuery 函数用法

作者:饶诗伟procedureTForm1.Button1Click(Sender:TObject);varstr:string;beginstr:=InputBox('输入窗口标题','输入提示','默认输入内容');ShowMessage(str);//显示输入的内容end;InputBox是调用了InputQuery,Inpu…
类别:程序 标签: 作者:admin 日期:2013-03-08 21.59.09

Delphi2007-Delphi2010 程序不出现在任务栏的方法

转载请注明:小帆工作室以前的代码:///////////////////////////////////////ShowWindow(Application.Handle,SW_HIDE);///////////////////////////////////////在Delphi2007/2009/2010已经失效!原因是Delphi在For…
类别:程序 标签: 作者:admin 日期:2013-03-08 21.58.17