Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

delphi ÈçºÎÊÍ·ÅÐéÄâÄÚ´æ

ÈçÌ⣬thanks.
up

http://hi.baidu.com/xinhua_yin/blog/item/a9b4553f2dbe94c67d1e710f.html
×Ô¼º¿´¿´°É

Â¥ÉϵÄÍ·ÏñMMÕæÆ¯ÁÁ¡£

ÐéÄâÄÚ´æ´ÓÀ´Ã»¿¼ÂǹýÊÍ·Å£¬²»¹ýÐéÄâÄÚ´æÊÇÔÚϵͳÖÐ×Ô¼ºÅäÖôóС£¬ÅÌ·ûµÄ
ÕÒÁËÏÂÌû×ÓÕâÑùºÃÏñ¿ÉÒÔ
SetProcessWorkingSetSize(GetCurrentProcess,  $FFFFFFFF,  $FFFFFFFF);

ÒýÓÃ
Â¥ÉϵÄÍ·ÏñMMÕæÆ¯ÁÁ¡£

лл¿ä½±°¡

ÐéÄâÄÚ´æÔÚ³ÌÐò½áÊøºó»á×Ô¶¯ÊÍ·Å£¬Èç¹ûÄãÒªÔËÐÐʱÊͷŵϰ
if Win32Platform = VER_PLATFORM_WIN32_NT then
begin
    SetProcessWorkingSetSize(GetCurrentProcess, $FFFFFFFF, $FFFFFFFF);
    Application.ProcessMessages;
end;


if Win32Platform = VER_PLATFORM_WIN32_NT then
begin
    SetProcessWorkingSetSize(GetCurrentProcess, $FFFFFFFF, $FFFFFFFF);
    Application.ProcessMessages;
end;
ÕâôºÃÏñÊͷŲ»ÁËÐéÄâÄÚ´æ°¡£¬»¹ÊÇлл£¬¸÷λ¡£


Ïà¹ØÎÊ´ð£º

ACCESSµÄ×Ô¶¨Ò庯ÊýÔÚdelphiÀïÔõôÓÃÄØ...

ÎÒÔÚÄ£¿éÀï×Ô¶¨ÒåÁËÒ»¸öº¯Êý:stradd()

¿ÉÊÇÔÚadoquery1.sql.add('select stradd(author) from book');
ʱÌáʾstradd䶨Òå...

Õâ¸öÎÊÌâÓÐʲô°ì·¨¿ÉÒÔ½â¾öµÄÂð? ·Ç³£¸Ð¼¤!


(ÔÚA ......

delphi ÔõÑù½«ucs2±àÂëת»»³ÉÖÐÎÄ

½ÓÊÕµ½µÄÎı¾ÄÚÈÝÊÇucs2±àÂë¸ñʽ£¬ÇëÎÊÔõÑùת»»³ÉÖÐÎÄ
°´ÎÒµÄÀí½â£¬UCS-2ÊÇ×Ö·û¼¯£¬¾ßÌåµÄ±àÂëÓÐUTF-8£¬UTF-16 (LE/BE)µÈ¡£
Èç¹ûÄãÓÃDelphi 2009¼°ÒÔÉϰ汾£¬¿ÉÒÔ¿´¿´TEncodingÀà¡£
btw. Äã˵µÄת»»³ÉÖÐÎÄÊÇɶÒâË ......

delphi動態調ÓÃdllµÄÀ§»ó

procedure RunFunction;  
  type  
  TFunc = function(A: Integer): Integer;stdcall;¡¡//ÕâÀï¸ù¾ÝDLLÀïÃæº¯ÊýµÄÉùÃ÷ÐÞ¸Ä  
  var  
  ......

Çë½Ì¹ØÓÚDelphiµÄÊ÷Ðοؼþ

ÇëÎÊDelphiÓÐÊ÷ÐοؼþÂð£¿
ÔõÑùʹÓã¿
Ttreeview 
 treeview.items.addchild(nil(Éϼ¶½Úµã),'°¸·¢Ê±·¢'(text));

raize ¿Ø¼þ°üÀïÃæÓУ¬csdnÓÐÏÂÔØµÄ

²é°ïÖúTTreeViewºÍTNodeÁ½¸öÀà

TTreeView ......

delphi»æ×ø±êͼ

ÔÚdelphiÖлæ×ø±êͼ¶¼ÓÃʲô¿Ø¼þÄØ£¬Ð»Ð»ÁË
tchart ͼ±í¿Ø¼þ£¬»¹ÓÐÐí¶àµÚÈý·½¿Ø¼þ¶¼¿ÉÒÔ

×Ô¼º±à»òµÚÈý·½¿Ø¼þ¡£

лл¥ÉÏÁ½Î»»Ø´ð£¬Èç¹û×Ô¼º±àµÄ»°¸ÃÈçºÎÏÂÊÖÄØ£¬ÎÒ¸Õ½Ó´¥delphi£¬Ðí¶à¶«Î÷²»ÊǺÜÇå³þ£¬Ð»Ð»ÁË ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ