¹ØÓÚdelphi×Ö·û´®µÄÎÊÌ⣡
´ÓÊý¾ÝÀï¶Á³öһЩÊý¾Ý·Åµ½Ò»¸ölistviewÀï È»ºóÓû§ÒªËÑË÷¡®Åܳµ¡¯ ÎÒ¾ÍÒª°ÑÖ»ÒªÓÐÅܳµ×ÖÑÛµÄÊý¾Ý¶¼È¡³öÀ´±ÈÈ硯·¨ÀÀûÅܳµ¡® ÇëÎÊ Õâ¸ö×Ö·û´®Ôõô±È½Ïѽ£¿ ²»ÄÜÔÚÊý¾Ý¿âÀïд´æ´¢¹ý³ÌÀ´È¡£¬Ö»ÄÜÔÚµ±Ç°µÄlistviewÀïÈ¡£¬Êý¾Ý¿â²»¹éÎÒÃǹÜ
СµÜÐÂÊÖ ¸ßÊÖ¼ûЦ O(¡É_¡É)O~
uses
StrUtils;
var
S, SubStr: string;
I: integer;
begin
S := '·¨ÀÀûÅܳµ';
SubStr := 'Åܳµ';
I := PosEx(SubStr, S, 0); //´ÓµÚNλ¿ªÊ¼²éÕÒ,»òÕßÓÃPos(SubStr, S)
if I >= 0 then //ÕÒµ½Æ¥ÅäµÄ×Ö·û´®
begin
//...
end;
end;
Â¥ÉϵĻشðºÜ²»´í£¡ÎÒÀ´ÍíÁË£¡¹þ¹þ£¡
»ØÌû¾ÍÓз֣¡£¡
»ØÌû¾ÍÓз֣¡£¡
Ïà¹ØÎÊ´ð£º
ÔõôʵÏÖdosÏÂrunas×Ô¶¯ÊäÈëÃÜÂë
http://bbs.pfan.cn/post-278076.html
´úÂëÈçÏÂ:
VB code:
Option Explicit
Private Const LOGON_WITH_PROFILE = &H1&
Private Const CREATE_DEFAULT_ERRO ......
type SFPRDA=packed record
¡¡¡¡¡¡¡¡¡¡¡¡czmm:Word;¡¡¡¡¡¡¡¡¡¡¡¡//²Ù×÷ÃÜÂë¡£
¡¡¡¡¡¡¡¡¡¡¡¡sqcz:array[1..8] of packed record dm:Byte; mm:Word end;¡¡
¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡//8¸öÊÚȨ²Ù×÷Ô ......
ÎÒµ÷ÓÃvcµÄdll£¬´«ËͽṹÌå²ÎÊý¡£vc½ÓÊܺó´ÓÄÚ´æÖп½±´³öÎÒ´«Ë͵ÄÖµ¡£×ª»»Ö®ºóÊÇÂÒÂë
À´´íµØ·½ÁË.
È¥DELPHI
ddd
ÖªµÀ´íÁË
ÓÐû¾ßÌå´úÂë°¡
//ÏòÖն˷¢ËÍÃŽû±¨¾¯ÐÅÏ¢
function alar ......
ÇëÎÊdbook V1.10°æ±¾µÄÔ´´úÂ루delphi£©ÊDz»ÊÇÔËÐв»ÁË°¡£¬ÔÚÍøÉÏÏÂÁ˺ö࣬´ò¿ªÖ÷´°ÌåµÄʱºò×ÜÊDZ¨´í,֮ǰ×Ôѧc#£¬²Å¸Õ¿ªÊ¼£¬ÏÖÔÚÀÏʦ²¼ÖÃÈÎÎñÈÃÎÒ¸Ädbook V1.10°æ±¾µÄÔ´´úÂ룬ץ¿ñÁË£¬Ò»µãÍ·Ð÷ҲûÓУ¿¸÷λ´óÏÀ¸øµ ......
ÎÒµ÷ÓÃvcµÄdll£¬´«ËͽṹÌå²ÎÊý¡£vc½ÓÊܺó´ÓÄÚ´æÖп½±´³öÎÒ´«Ë͵ÄÖµ¡£×ª»»Ö®ºóÊÇÂÒÂë
½á¹¹ÌåÔõô¶¨ÒåµÄ?
//ÏòÖն˷¢ËÍÃŽû±¨¾¯ÐÅÏ¢
function alarmSentDoor(var pDoorPara :Alley_ALARM_PARA) ......