Delphi Ïà¹Ø¼Ç¼
1¡¢TStringListÖ§³ÖµÄ×î´óÐÐÊýÊǶàÉÙ£¿£¨http://topic.csdn.net/t/20060209/14/4547405.html£©
Â¥Ö÷½áÂÛ£º“TStringListµÄLoadfromFileº¯ÊýÓ¦¸ÃÖ»ÄܶÁÈ¡15ÍòÐÐÒÔÄÚµÄÊý¾Ý£¬µ«TStringListºÍTListµÄAddº¯Êý¿ÉÒÔ¼Óµ½¼¸°ÙÍòÐУ¨ÉõÖÁ¸ü¶à£©Ò²²»»á³ö´í¡£³ÌÐò³ö´íµÄÔÒòÓ¦¸ÃÊÇAdd·Ç·¨ÄÚ´æÖ¸Õëµ¼Öµģ¬ÕýÈçtanlim(ÇóѧÕß) Ëù˵µÄ¡£·Ç³£¸Ðл£¡”
“9 Â¥tanlim£¨sunsos.net sunsos.cn£©»Ø¸´ÓÚ 2006-02-09 17:51:13 µÃ·Ö 45
TStringList ËüÊÇ»ùÓÚÁ´±íÊý¾Ý½á¹¹À´µÄ¡£²»´æÔÚÉÏÏÞÎÊÌâ¡£
Ö÷ÒªÊǸú¼ÆËã»úÄÚ´æÓйء£»¹ÓоÍÊÇËùÖ¸ÄÚ´æ¿Õ¼äÊÇ·ñÊܱ£»¤£¬ÒÔ¼°ÊÇ·ñÈ«Çå¿ÕµÄÎÊÌâ¡£
²ÉÈ¡TStringListÀ´²Ù×÷ÀàËÆµÄÎı¾¶ÓÁС£ÏàÐÅÔ³ÌÐòÔ±ÊdzöÓÚЧÂÊÉϵĿ¼ÂÇ£¬ÉÏÃæ´ó¼ÒÌáµ½ÁËÓÃÊý¾Ý¿âÀ´´úÌæµÄ·½·¨¡£ÔÚЧÂÊÉϿ϶¨ÊÇÒª´òÕۿ۵ġ£»òÕßÔÚijÖÖÔ´æ´¢Îĵµ¼ÓÃÜÉϲ»Áé»î¡£
ͨ³£ÓÃÕâÖÖ·½·¨µÄÇé¿ö£¨¹ÀµÄ£©£¬²»»á²ÉÓÃÁãÐÇÉêÇë·ÖÅäµÄ·½·¨£¬¶øÊDzÉÓÿéÉêÇ룬ȻºóÔÚн¨À๹Ô캯ÊýÖУ¬×Ô¼ºÀ´¹ÜÀíÄÚ´æµÄ·ÖÅäÇé¿ö¡£ÕâÖ»ÊǸö²Â²â£¬¾ßÌåÒª¿´ÄãµÄ³ÌÐòÉè¼ÆÇé¿ö¡£
×ÜÖ®£¬ÉÏÏÞÎÊÌâÊǿ϶¨²»´æÔڵ쬼´Ê¹ÄãÄÚ´æ²»¹»£¬WINDOWSÒ²»áÓÃÐéÄâÄÚ´æÀ´×Ô¶¯½â¾ö²»×ãÎÊÌâ¡£ÕâµãÏàÐÅ´ó¼Ò¶¼ÖªµÀ¡£”
Ïà¹ØÎĵµ£º
רÃÅÕë¶ÔdelphiµÄ£¬Ç¶ÈëÔ´ÂëµÄ²¡¶¾
Èç¹ûÔÚ X:\Program Files\Borland\Delphi7\Lib ·¢ÏÖÓÐ SysConst.bak (12KB) ºÍ
SysConst.dcu (18KB)£¬ÄÇô¹§Ï²Ä㣬ÖÐÕÐÁË¡£
http://topic.csdn.net/u/20090817/20/102ba10b-82ae-472d-a0be-6d54ce6a331b.html
http://bbs.2ccc.com/topic.asp?topicid=330829
http://bbs.2ccc.com/top ......
Ñо¿ÁËÒ»ÏÂPop3µÄÓʼþ½ÓÊÕÐÒ飬ȻºóËæÊÖдÁËÒ»¸öPop3µÄÓʼþ½ÓÊտؼþ£¡Pop3µÄÓʼþÐÒéʵ¼ÊÉÏÊǺܼòµ¥µÄ£¬ÖªµÀÄǼ¸¸öÃüÁî¾ÍÐÐÁË£¬Óë·þÎñÆ÷Ö®¼ä
µÄ½»»¥ÊÇÒ»ÎÊÒ»´ðµÃ·½Ê½£¬¿ØÖÆÆðÀ´Ò²ÈÝÒ×£¬Ïà¶Ô¶øÑÔÓʼþ¸ñʽµÄ½âÎöµ¹ÊǸü¼ÓÂé·³Ò»µã£¡ÓÚÊÇÒ²±ã˳´ø×Ž«MIMEÓʼþ¸ñʽ¸øÊìϤÁËһϣ¡×ܹé˵À´£¬¹æÂÉÐÔ±È
½ÏÇ¿£¬ÏÈ»ñÈ¡×î´óµÄ¶¥²ã¿ò ......
½«Ô¶³Ì¿ØÖÆÓ¦ÓÃÓÚ½ÌѧÖУ¬ÒѳÉΪĿǰ¼ÆËã»ú»¯½ÌѧµÄÖØÒªÊֶΡ£Ò»¶¨ÓкܶàµÄÍø³æÏëÁ˽âÕâÖÖÍøÂç½Ìѧ·½Ê½µÄ±à³ÌÔÀí°É¡£ÔÚ´ËÎÒÃǾÍÒÔÒ»¸ö¼òµ¥µÄÔ¶³Ì¿ØÖƳÌÐò×÷ΪʾÀý£¬ËµÃ÷ÕâÖÖÍøÂç±à³ÌµÄ»ù±¾ÔÀí¡£±¾³ÌÐòÒÔDelphi±à³ÌΪÀý¡£
¡¡¡¡Æäʵ¸Ã³ÌÐòµÄ¹¤×÷»úÖÆºÜ¼òµ¥£¬Êܿط½ÔËÐÐÒ»¸ö³ÌÐò£¬ÓÃÓÚÕìÌý¶Ë¿Ú²¢½ÓÊÕÊý¾Ý°ü£¬¶øÖ÷¿Ø·½Í¨¹ý¶ ......
dll µ÷Ó÷½·¨ÓÐ ¾²Ì¬µ÷ÓúͶ¯Ì¬µ÷ÓÃÁ½ÖÖ·½·¨
Óõ½µÄdllΪÉÏÆªÎÄÕÂËù±àдµÄdll.
×ܽáÈçÏ£º
Unit Unit1;
Interface
Uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
Type
TForm1 = Class(TForm)
Button1: TButton; ......
delphi ×¢²á com ¶ÔÏóµÄ·½·¨
procedure TForm1.Button3Click(Sender: TObject);
var
Sd: TSecurityDescriptor;
begin
InitializeSecurityDescriptor(@Sd, SECURITY_DESCRIPTOR_REVISION);
SetSecurityDescriptorDacl(@Sd, true, Nil, false);
RegSe ......