随笔分类 -  Delphi学习笔记

上一页 1 ··· 3 4 5 6 7
delphi的Public，Private，Protected，Published作用域
摘要：关于Class里的成员： 1.Public， 2.Private， 3.Protected， 4.Published， 以上四个class 的成员指令，它们的功用是什么？？要怎么用和什么时候输入？怎样用？ 和C++是差不多的、可见性不同、比较容易弄混的就是private和protected了、pro 阅读全文
posted @ 2022-07-18 15:10 一曲轻扬 阅读(708) 评论(0) 推荐(0)
Delphi 让子窗口显示到任务栏上
摘要：//事件声明procedure CreateParams(var Params: TCreateParams); override; //事件主体代码 procedure TForm1.CreateParams(var Params: TCreateParams); begin inherited 阅读全文
posted @ 2022-07-13 17:17 一曲轻扬 阅读(361) 评论(0) 推荐(0)
Delphi 动态创建TpageControl标签 基于Frame
摘要：form1: frame3: 效果图:可以基于frame3创建多个相同的tab,且包含所有frame3设定的业务逻辑 代码也很简单: uses Unit3;procedure TForm2.Button2Click(Sender: TObject); var NewTab: TTabSheet ; 阅读全文
posted @ 2022-07-12 17:18 一曲轻扬 阅读(1277) 评论(0) 推荐(0)
【Delphi 】StyleControls组件 学习笔记
摘要：一.TscGPButton按钮 1.按钮外观基本上都在options里设置. Normal开头的属性: 按钮常态下的效果设置; HOT开头(或包含)的属性: 鼠标停在按钮上时的效果设置; Frame开头的属性: 边框设置; pressed开头(或包含)的属性: 与点击有关的效果设置; Font开头的 阅读全文
posted @ 2022-07-08 11:00 一曲轻扬 阅读(3908) 评论(0) 推荐(1)
【delphi】妙用Taborder 和 Tabstop
摘要：【使用上下键控制控件的选择】 Taborder Tabstop： 这组表识号本来是用来表示组件的按键顺序以及在该组件上是否停留的标识号。但是如果在某些时候稍微重视一下的话，将会事半功倍。下面略举一例：桌面上有几个编辑框，用户希望按回车键、上下方向键而不是TAB在其间来回游动。 【属性设置】 Form 阅读全文
posted @ 2022-07-06 17:03 一曲轻扬 阅读(540) 评论(0) 推荐(0)
delphi Jpg和Bitmap相互转换
摘要：delphi Jpg和Bitmap互转转换的方法： uses Jpeg; procedure Bmp2Jpeg(const BmpFileName, JpgFileName: string); var Bmp: TBitmap; Jpg: TJPEGImage; begin Bmp := TBitm 阅读全文
posted @ 2022-07-01 08:01 一曲轻扬 阅读(433) 评论(0) 推荐(0)
Delphi操作剪切板
摘要：效果要求: 一.当剪切板内容为字符串时,把内容输出到Edit控件上 二.当剪切板内容为图片里,输出到image控件上 引用单元: user Vcl.Clipbrd; { 功能函数常用的类型有以下三种: 文字:CF_TEXT　=1 //字符,不包括文本文件 位图:CF_BITMAP　=2 //截图,不 阅读全文
posted @ 2022-06-27 15:56 一曲轻扬 阅读(1322) 评论(0) 推荐(0)
Delphi 限制窗体大小的最大值与最小值
摘要：【Delphi】限制窗体大小的最大值与最小值 QQ主窗体可以随意拉动，但在拉小时，会在达到某个最小 宽度或高度后无法再拉动，这里有2种方法： 1）：使用VCL窗体控件的Constraints子组件，如下设置： procedure TForm1.FormCreate(Sender: TObject); 阅读全文
posted @ 2022-06-25 15:10 一曲轻扬 阅读(506) 评论(0) 推荐(0)
DELPHI第三方控件及组件大全(安装方法与使用)
摘要：一，DELPHI第三方控件安装方法介绍1、对于单个控件，Componet–>install component..–>PAS或DCU文件–>install;2、对于带*.dpk文件的控件包，File–>Open(下拉列表框中选*.dpk)–>install即可；3、对于带*.bpl文件的控件包，In 阅读全文
posted @ 2022-06-22 09:06 一曲轻扬 阅读(2106) 评论(0) 推荐(1)
DELPHI 拖动窗体
摘要：我写了一个无边框的窗体.想通过pnlTop实现拖动窗体,与双击时最大化的功能. 最佳的解决方案如下: procedure TFMain.pnlTopMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: I 阅读全文
posted @ 2022-06-17 19:42 一曲轻扬 阅读(463) 评论(0) 推荐(0)
Delphi 获取屏幕分辨率与Windows任务栏的高度
摘要：屏幕分辨率: 宽: screen.WorkAreaWidth; 高: screen.WorkAreaHeight; 获取任务栏高度的方法有三种: 第一种：需要引用Windows单元 ShowMessage(IntToStr(GetSystemMetrics(SM_CYSCREEN)-GetSyste 阅读全文
posted @ 2022-06-17 11:12 一曲轻扬 阅读(452) 评论(0) 推荐(0)
Delphi 关于AdoQuery中的Refresh函数
摘要：首先看看Delphi的官方文档中关于refresh的说明Refetches data from the database to update a dataset抯 view of data.procedure Refresh;DescriptionCall Refresh to ensure tha 阅读全文
posted @ 2022-05-27 10:27 一曲轻扬 阅读(623) 评论(0) 推荐(0)
Delphi 窗体置顶(总在最前面)
摘要：代码如下： SetWindowPos(Handle,HWND_TOPMOST,Left,Top,Width,Height,SWP_NOACTIVATE or SWP_NOMOVE or SWP_NOSIZE); 只要改变相应参数还可实现其他效果，如隐藏、固定不动等。 下面我举一个复选框的例子： pr 阅读全文
posted @ 2022-05-27 09:26 一曲轻扬 阅读(1644) 评论(0) 推荐(0)
Delphi复制与粘贴操作
摘要：复制操作: 先选择后操作 edt1.SelectAll;edt1.CopyToClipboard; 粘贴: edt1.SelectAll; //如果不选择的话,会变成插入 edt1.PasteFromClipboard ; 也可以引用Vcl.Clipbrd 复制: Clipboard.AsText 阅读全文
posted @ 2022-05-25 14:33 一曲轻扬 阅读(739) 评论(0) 推荐(0)
Delphi RGB与TColor的转换
摘要：1.RGB转换为Tcolor function RGBToColor(R,G,B: byte): Tcolor;begin Result := B Shl 16 or G shl 8 or R;end; 2.Tcolor转换为RGB proceudre Tform1.Button1Clink(Sen 阅读全文
posted @ 2022-05-25 11:49 一曲轻扬 阅读(686) 评论(0) 推荐(0)
Delphi自定义光标形状
摘要：procedure T屏幕取色器.img1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); begin if Button = mbLeft then begin img1.Vis 阅读全文
posted @ 2022-05-25 11:42 一曲轻扬 阅读(260) 评论(0) 推荐(0)

上一页 1 ··· 3 4 5 6 7