上一页 1 ··· 20 21 22 23 24 25 26 27 28 ··· 49 下一页
摘要: 注册全局热键(实例热键显示和隐藏窗体) ctrl+alt+aunit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs;type TForm1 = class(TForm) procedure FormCreate(Sender: ... 阅读全文
posted @ 2013-11-17 20:36 XE2011 阅读(324) 评论(0) 推荐(0)
摘要: 使用多线程实现打字效果 unit Unit1;interfaceusesWinapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls;ty... 阅读全文
posted @ 2013-11-17 13:49 XE2011 阅读(250) 评论(0) 推荐(0)
摘要: Delphi 调用外部程序并等待其运行结束function CreateSingleObject(FileName: string):Boolean;var s: TStartupinfo; p: TProcessInformation;begin Result:=False; FillChar(s, Sizeof(TStartupinfo), 0); s.cb := Sizeof(... 阅读全文
posted @ 2013-11-17 13:46 XE2011 阅读(610) 评论(0) 推荐(0)
摘要: http://files.cnblogs.com/xe2011/ScreenLight_pas.rar窗体文件object Form1: TForm1 Left = 0 Top = 0 Caption = 'Form1' ClientHeight = 220 ClientWidth = 447 Color = clBtnFace TransparentColor = True TransparentColorValue = clPurple Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Heig... 阅读全文
posted @ 2013-11-16 18:43 XE2011 阅读(388) 评论(0) 推荐(0)
摘要: //光标在控件不同位置时的样式 //改变控件的大小 使用 阅读全文
posted @ 2013-11-16 11:00 XE2011 阅读(511) 评论(2) 推荐(0)
摘要: 下面这2种方法都能实现对控件和窗体的拖拽 方法1 阅读全文
posted @ 2013-11-16 00:12 XE2011 阅读(1769) 评论(0) 推荐(0)
摘要: http://files.cnblogs.com/xe2011/StringToColor.rarunit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) Button1: TButton; Button2: TButton; procedure Button1Click(Sender: TObject); procedure Butt... 阅读全文
posted @ 2013-11-15 23:23 XE2011 阅读(642) 评论(0) 推荐(0)
摘要: 可编程机器人 阅读全文
posted @ 2013-11-14 12:40 XE2011 阅读(206) 评论(0) 推荐(0)
摘要: using System;using System.Collections.Generic;using System.ComponentModel;using System.Drawing;using System.Data;using System.Text;using System.Windows.Forms;/*使用说明:WindowsFormsApplication1- 添加- 现有项- ColorComboBox.cs先编译一下 然后工具栏中就有这个组件了选中这个组件有个 Extented属性 设置 为TRUE 就为完整了调用 private void colorComboBo... 阅读全文
posted @ 2013-11-13 12:47 XE2011 阅读(463) 评论(0) 推荐(0)
摘要: OfficePickershttp://www.codeproject.com/Articles/12327/Office-2003-Color-Picker来自为知笔记(Wiz)附件列表 阅读全文
posted @ 2013-11-13 12:46 XE2011 阅读(296) 评论(0) 推荐(0)
摘要: 附件 http://download.csdn.net/detail/teststudio/6575241主窗体UNITunit MainForm;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, StdCtrls, ComCtrls;type TFormMain = class(TForm) Button2: TButton; Button1: TButton; Panel1: TPanel; p... 阅读全文
posted @ 2013-11-11 18:04 XE2011 阅读(568) 评论(0) 推荐(0)
摘要: 以前用VB编程常用InputBox,现在学了C#,竟然找不到它了……后来到网上查到了,现在贡献给大家:1。首先要添加引用Microsoft.VisualBasic2。命名空间 Using Microsoft.VisualBasic;3。以后就可以直接使用VB中的好多类库 例如:Text=Microsoft.VisualBasic.Interaction.InputBox("行号","转到行","... 阅读全文
posted @ 2013-11-07 22:35 XE2011 阅读(728) 评论(0) 推荐(0)
摘要: ID 类 控件 备注(+窗体 共64个控件) 公共控件 1 Form 属性方法事件 2 ... 阅读全文
posted @ 2013-11-07 22:29 XE2011 阅读(401) 评论(0) 推荐(0)
摘要: http://files.cnblogs.com/xe2011/TreeView_Drag_and_Drop.rar假设把A节点往B节点上拖拽那么A 为Node1,B为Node2 privatevoidForm1_Load(objectsender,EventArgse){treeView1.AllowDrop=true; treeView1.HideSelection = false;} privateTreeNodenode1=null;//node1当前选中的那个节点privatevoidtreeView1_ItemDrag(objectsender,ItemDragEventA... 阅读全文
posted @ 2013-11-06 20:49 XE2011 阅读(652) 评论(1) 推荐(0)
摘要: privatevoidrichTextBox1_SelectionChanged(objectsender, EventArgse) { pos = richTextBox1.SelectionStart; } privateintpos =... 阅读全文
posted @ 2013-11-06 00:27 XE2011 阅读(1195) 评论(0) 推荐(0)
上一页 1 ··· 20 21 22 23 24 25 26 27 28 ··· 49 下一页