TEdit

JSON 之 SuperObject(15): 实例 - 模拟 Google 搜索

Classes,Graphics,Controls,Forms, Dialogs,StdCtrls; type TForm1=class(TForm) Memo1:TMemo; Edit1:TEdit
涂孟超·2014-09-26 15:00

事件自调用 - 回复 maxcool 的问题

Classes,Graphics,Controls,Forms, Dialogs,StdCtrls; type TForm1=class(TForm) Button1:TButton; Edit1:TEdit
涂孟超·2014-09-26 15:00

调整 TEdit 文本对齐

譬如让Edit1文本右对齐:SetWindowLong(Edit1.Handle,GWL_STYLE,GetWindowLong(Edit1.Handle,GWL_STYLE)orES_RIGHT);本例效果图:unitUnit1; interface uses Windows,Messages,SysUtils,Variants,Classes,Graphics,Controls,
涂孟超·2014-09-26 15:00

最大公约数与最小公倍数

Classes,Graphics,Controls,Forms, Dialogs,StdCtrls; type TForm1=class(TForm) Button1:TButton; Edit1:TEdit
涂孟超·2014-09-26 15:00

Delphi XE2 之 FireMonkey 入门(42) - 控件基础: TComboBox、TComboEdit

但分别包含了它们,所以使用起来都有点像TListBox.TComboBox更像TListBox,比TComboEdit多出了Selected等成员;TComboEdit是从TCustomEdit继承,和TEdit
涂孟超·2014-09-26 15:00

Delphi XE2 之 FireMonkey 入门(27) - 数据绑定: TBindingsList: TBindScope

如果在编写表达式时,如果能够随意指认需要的控件就好了(通过Owner也可以勉强做到),TBindScope就是解决这个问题的.示例设想:把三个TEdit的Text绑定到一个TLabel.在窗体上添加Label1
涂孟超·2014-09-26 15:00

使用剪切板[4]: 如果把子控件一起复制? - 同时回复 ghd2004 的问题

如果连同子控件一起复制到剪切板,需要定义一个新类型.譬如在一个TPanel中包含一个TEdit;在复制TPanel时,若要连同TEdit一起复制,需要重新从TPanel中继承出一个类来(譬如是TMyPanel
涂孟超·2014-09-26 15:00

Delphi XE2 之 FireMonkey 入门(31) - 数据绑定: 绑定数据库

一、全设计时操作:先在窗体上放置控件:DataSource1:TDataSource; ClientDataSet1:TClientDataSet; Label1:TLabel; Edit1:TEdit
涂孟超·2014-09-26 15:00

学习 Message(16): 测试 $0118 号消息

目前对$0118号消息的认识:1、微软和Delphi都没有给改消息定义一个常量,假如定义的话用WM_SYSTIMER比较合适;2、此消息只在文本输入类控件(譬如:TMemo、TRichEdit、TEdit
涂孟超·2014-09-26 15:00

测试 Components 与 Controls 的区别

Graphics,Controls,Forms, Dialogs,StdCtrls,ExtCtrls; type TForm1=class(TForm) Panel1:TPanel; Edit1:TEdit
涂孟超·2014-09-26 15:00

Delphi来实现一个IP地址输入控件

Classes, Graphics, Controls, Forms, Dialogs, ComCtrls, CommCtrl, StdCtrls; type TIpEdit = class(TEdit
·2014-06-20 15:00

delphi7 ini创建,读写,条件字节值判断,删除,释放

Variants,Classes,Graphics,Controls,Forms, Dialogs,StdCtrls,IniFiles;type TForm1=class(TForm)   Edit1:TEdit
hcf_force·2014-05-07 15:00

TEdit的创建与显示过程

-------------------------- 分析TEdit的创建与显示过程 --------------------------TCustomEdit = class(TWinControl)
·2014-04-15 18:00

delphi查找文件

Dialogs, StdCtrls;type TForm1=class(TForm)  Button1:TButton;  ListBox1:TListBox;  Label1:TLabel;  Edit1:TEdit
鹅倌·2014-03-01 08:00

Delphi下载指定网址（URL）的文件，带进度条显示

一、界面设置在窗体上放置两个TEdit控件，一个用于输入要下载的文件URL，一个用于输入要保存到本地的文件路径；放置两个TLabel控件，一个显示文件总大小，一个显示当前已下载大小；放置一个按钮TButton
一剑平江湖·2013-12-10 13:31

delphi 控件大全

http://www.torry.net/http://www.jrsoftware.orgTb97最有名的工具条(ToolBar)控件库,仿Office97，如TDoCk97,TToolBar97,TEdit97
yunshouhu·2013-10-28 11:46

delphi 控件大全

http://www.torry.net/ http://www.jrsoftware.orgTb97最有名的工具条(ToolBar)控件库,仿Office97，如TDoCk97,TToolBar97,TEdit97
earbao·2013-10-28 11:00

delphi中Tedit输入金额数字

procedureTform1.Edit1KeyPress(Sender:TObject;varKey:Char); //控制edit1的输入数字var p:Integer;begin //限制只能输入数字，小数点，负号 ifnot(Keyin['0'..'9','.','-',#8,#13])then begin  Key:=#0; end; //如果是小数，小数点前面只能输入一个零 ifkey
delphi308·2013-09-03 11:00

坐标的先对转化clienttoscreen与screentosclient

假如一个有一个TEdit的实例edt_Position，edt_Position所在容器有好几层，所在的窗体为frmMain。
jyxy521·2013-08-28 16:35

Delphi遍历所有控件

方法一：（经测试，行得通）var i:integer;begin fori:=0toComponentCount-1do begin  if(Components[i]isTEdit)and(TEdit
delphi308·2013-08-08 23:00

Delphi调用Windows打开方式对话框示例

Controls,Forms, Dialogs,StdCtrls; type TForm2=class(TForm) Button1:TButton; Button2:TButton; edtFile:TEdit
MaxWoods·2013-05-02 09:00

Delphi7如何实现让Tedit显示文字垂直居中(上下居中)

通过下面的组件，可以在输入文字的时候自动垂直居中 直接把下面代码保存到Unit1.pas即可 ------------------------------------------ unit Unit1; interface uses   Windows, Messages, SysUtils, Variants, Classes, Graphics, Cont
sbabzc·2013-03-01 15:00

Delphi7如何实现让Tedit显示文字垂直居中(上下居中)

阅读更多通过下面的组件，可以在输入文字的时候自动垂直居中直接把下面代码保存到Unit1.pas即可------------------------------------------unitUnit1;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,StdCtrls;ty
sbabzc·2013-03-01 15:00

输入框显示文字垂直居中

interfaceusesWindows,Classes,Controls,SysUtils,Messages,StdCtrls,Forms,Graphics;typeTCenterEdit=class(TEdit
kygl2003·2012-12-21 23:46

免费delphi组件和工具收集

免费delphi组件和工具收集http://www.jrsoftware.org/Tb97最有名的工具条(ToolBar)控件库,仿Office97，如TDock97,TToolBar97,TEdit97
ilvu999·2012-11-07 11:00

DELPHI WM_CopyData 用法

Graphics,Controls,Forms, Dialogs,StdCtrls,ComCtrls; type TForm1=class(TForm) Button1:TButton; Edit1:TEdit
huang_xw·2012-09-25 07:00

c++ 控制台菜单 制作

#include"stdio.h" #include"stdlib.h" #include"windows.h" voidvMainMenu()//初始项 { printf("File(F1)\tEdit
a771948524·2012-09-11 15:00

nandflash驱动移植patch

configdeletedfilemode100644index83e1515..0000000---a/.config+++/dev/null@@-1,2278+0,0@@-#-#Automaticallygeneratedmakeconfig:don'tedit
chongzi865458·2012-08-24 16:00

C++Builder之Edit和Memo

C++Builder之文本编辑（Edit、Memo）1、AnsiString中第一个字符的下标为1而不是0；2、TEdit组件A、PasswordChar属性密码替代字符。
likandmydeer·2012-07-25 16:00

Delphi 禁用TEdit右键菜单及复制粘贴

  Delphi 禁用TEdit右键菜单及复制粘贴简的单方法如下： 1) 设置TEdit的ReadOnly属性为True Edit1.ReadOnly := True; 2) 在TEdit的
xinzheng_wang·2012-07-19 11:00

Delphi 禁用TEdit右键菜单及复制粘贴

Delphi禁用TEdit右键菜单及复制粘贴简的单方法如下：1) 设置TEdit的ReadOnly 属性为True    Edit1.ReadOnly:=True;2) 在TEdit的OnContextPopup
xinzheng_wang·2012-07-19 11:00

delphi调用java代码

Classes,Graphics,Controls,Forms, Dialogs,StdCtrls,jni; type TForm1=class(TForm) Button1:TButton; Edit1:TEdit
imzoer·2012-04-22 23:00

Delphi 学习日记：禁止TEdit或TMemo的“Ctrl+V”粘贴

To intercept any key combination for a TEdit (or TMemo or more generally TCustomEdit) you need to handle
mmdev·2012-03-23 14:00

delphi edit 只输入数字 只输入字母

我们可以在TEdit组件的on..KeyPress事件中对输入进行处理，以限制对编辑框的输入。
beyondqd·2011-12-15 18:00

通过控件句柄获取控件实例

创建一Delphi工程，放置一个TEdit和TButton，在Edit1中随便输入一些文字。
dbyoung·2011-11-28 18:00

config-2.6.18-xenU_x86_64

# #Automaticallygeneratedmakeconfig:don'tedit #Linuxkernelversion:2.6.18.8 #MonSep513:40:362011 # CONFIG_X86
yxysdcl·2011-10-27 13:00

config-2.6-pvops_x86_64

# #Automaticallygeneratedmakeconfig:don'tedit #Linuxkernelversion:2.6.32.41 #TueSep609:42:182011 # CONFIG
yxysdcl·2011-10-27 13:00

Inno Setup入门（十八）——Inno Setup类参考（4）

Pascal中的编辑框由类Tedit实现，该类的定义如下：TEdit=class(TCustomEdit) propertyAutoSelect:Boolean;readwrite; propertyAutoSize
wangyong0921·2011-10-14 14:00

Delphi XE2 之 FireMonkey 入门(31) - 数据绑定: 绑定数据库

DataSource1 : TDataSource; ClientDataSet1 : TClientDataSet; Label1 : TLabel; Edit1 : TEdit
·2011-10-03 22:00

Delphi XE2 之 FireMonkey 入门(27) - 数据绑定: TBindingsList: TBindScope

示例设想: 把三个 TEdit 的 Text 绑定到一个 TLabel.
·2011-10-03 09:00

Android 使用模拟器远程调试

方法1ByhheimbuergerHereishowIsolveditonWindows.IprettymuchfollowedChristopher'slead,butIcan'tedit,soanewanswerwillhavetodo.TheproblemIhadwasthatADBaswellastheemulatorwasjustlisteningon127.0.0.1
ultrapro·2011-08-26 09:00

TEdit中限制只能输入"."或数字

写在onkeypress事件里面ifnot(keyin['0'..'9',#8]) then  begin   if(key='.')and(pos('.',Tedit(sender).Text)=0)
haiou327·2011-05-29 23:00

读ini文件

Classes,Graphics,Controls,Forms,Dialogs,inifiles,//配置操作文件StdCtrls,ExtCtrls;typeTForm1=class(TForm)Edit1:TEdit
chinazhd·2011-05-23 18:00

BCB TEdit组件限制输入数字

源：http://hi.baidu.com/jianboth/blog/item/ffe6d004b6d17703728b65a4.html 方法1：   实现TEdit组件的OnKeyPress()事件里面
qq752923276·2011-05-11 11:00

URL转图片

Controls,Forms, Dialogs,ExtCtrls,OleCtrls,SHDocVw,StdCtrls,MSHTML;type TForm1=class(TForm)   Edit1     :TEdit
dragoonnet·2011-03-21 17:00

浅析OnKeyPress事件和OnKeyDown/OnKeyUp事件

例如，在TEdit组件上捕获OnKeyPress事件，判断输入的是否是小写字母，如果是，将其转换为大写字
holoblog·2011-03-03 12:00

delphi 管道

----------------------------TForm1=class(TForm)Button1:TButton;Memo1:TMemo;Edit1:TEdit;Label1:TLabel;
rosehacker2010·2010-12-15 13:53

Delphi 进入TEdit控件时选中该控件中的内容，不使用SelectAll　

T(Custom)Edit'sAutoSelectpropertydetermineswhetherallthetextintheeditcontrolisautomaticallyselectedwhenthecontrolgetsfocus.TheAutoSelectpropertyhasthevalueofTRUEbydefault-whenthecontrolreceivesthefocu
sforiz·2010-08-25 17:00

使用Windows系统提供的IP控件

然而C++ Builder并没有为我们提供可以用于输入IP串的控件，于是我们只好用TEdit控件（单行文本框）来接受用户输入的IP串。
·2010-06-24 21:00

Delphi中窗体响应按键步骤

在窗体属性上修改KeyPreview:=True;2.在窗体的FormKeyDown函数里写：ifKeyPreviewthen  Form将先响应键盘事件（在TEdit等控件之前）else  除非FormGotFocus
liquanhai·2010-04-16 20:00
上一页 1 2 3 4 下一页
按字母分类： ABCDEFGHIJKLMNOPQRSTUVWXYZ其他