delphi
文章平均质量分 59
爱凯特的威廉
工控
展开
-
delphi string 汇编
_xStryyy 其中x可以是字符P、L、W。P代表该函数是处理传统Pascal字符串的,L代表该函数是处理长字符串的,W当然就是Unicode了。yyy就是表示函数的实际作用了。比如_PStrCat就是表示传统Pascal字符串的连接函数。大家可以查阅system.pas来验证一下。不过一般不大见到W开头的函数。 下面是经过整理的结果,算是为大家提供一个方便。说明一下,列表不原创 2013-07-20 10:14:30 · 925 阅读 · 0 评论 -
delphi Format
Format是一个很常用,却又似乎很烦的方法,本人试图对这个方法的帮助进行一些翻译,让它有一个完整的概貌,以供大家查询之用:首先看它的声明:function Format(const Format: string; const Args: array of const): string; overload;事实上Format方法有两个种形式,另外一种是三个参数的,主要区别在于它转载 2014-03-31 14:57:56 · 473 阅读 · 0 评论 -
event
CoreShell: TCoreShell;CoreShell := TCoreShell.Create(...);CoreShell.InitializeApplication_1;CoreShell.InitializeApplication_2;......CoreShell.ExitAppl原创 2013-11-22 22:27:31 · 604 阅读 · 0 评论 -
SetWindowPos API
SetWindowPos 函数功能:该函数改变一个子窗口,弹出式窗口式顶层窗口的尺寸,位置和Z序。子窗口,弹出式窗口,及顶层窗口根据它们在屏幕上出现的顺序排序、顶层窗口设置的级别最高,并且被设置为Z序的第一个窗口。 函数原型:BOOL SetWindowPos(HWN hWnd,HWND hWndlnsertAfter,int X,int Y,int cx,int cy,UNIT.Fl转载 2013-10-30 09:24:13 · 751 阅读 · 0 评论 -
delphi ListView
//增加项或列(字段)ListView1.Clear;ListView1.Columns.Clear;ListView1.Columns.Add;ListView1.Columns.Add;ListView1.Columns.Add;ListView1.Columns.Items[0].Caption:='id';ListView1.Columns.Items[1].C原创 2013-10-11 15:45:13 · 693 阅读 · 0 评论 -
delphi 读写txt文件
wText: TextFile; AssignFile(wText, 'C:\WINDOWS\system32\NextSuiteDriver.txt'); ReSet(wText); ReadLn(wText, sdir); //WriteLine()用于写 CloseFile(wText);原创 2013-10-11 15:13:24 · 805 阅读 · 0 评论 -
查找字符串
function Lookup(S: string; Arr: array of string): Integer;var L, H, I, C: Integer;begin L := Low(Arr); H := High(Arr); Result := -1; while L begin I := (L + H) shr 1;原创 2013-09-17 12:00:09 · 490 阅读 · 0 评论 -
delphi Stack
TValueType = (vtInteger, vtFloat, vtBoolean, vtString, vtNone, vtMethod); TValue = record CurType: TValueType; I: Integer; F: Double; B: Boolean; S: string; end;原创 2013-09-17 10:48:40 · 920 阅读 · 0 评论 -
delphi Format
format('% * . * f',[10,4,num]);解析: 返回num变量格式化后的字符。整数位为10位,小数后为4位。例如:num=1234567890.123456,处理后为“1234567890.1234”的字符串。format函数,返回一个指定格式的字符。function Format(const Format: string; const Args: array o转载 2013-09-17 09:59:55 · 1083 阅读 · 0 评论 -
delphi BCC校验
function BCCCheck(Command: string): string;var Sum: Integer; iWork, i, j: Integer; sFinal, sTemp: string;begin try i := length(Command) div 2; Sum := 0; for j := 1 to i原创 2013-09-14 22:59:55 · 1330 阅读 · 0 评论 -
摄像头编程WindowsAPI - avicap32.dll 参数详解
WM_CAP_START= WM_USER=1024;// start of unicode messagesWM_CAP_UNICODE_START= WM_USER+100; //开始WM_CAP_GET_CAPSTREAMPTR= (WM_CAP_START+ 1); //获得 CAPSTR EAMPTRWM_CAP_SET_转载 2013-09-06 10:06:02 · 2597 阅读 · 1 评论 -
获取内存信息
var MemInfo: MEMORYSTATUS;begin // 获取内存信息 GlobalMemoryStatus(MemInfo); Memo1.Lines.Add(IntToStr(MemInfo.dwMemoryLoad) + '%的内存在使用'); Memo1.Lines.Add('物理内存共有' + IntToStr(MemInfo.dwTotalPhy转载 2014-12-24 11:18:12 · 636 阅读 · 0 评论