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

ÈçºÎÓÃDelphi¶Áд.mnuÎļþ

ÎÒÖªµÀÓÃDelphi¶Áд.iniÎļþ,µ«ÎÒÏÖÔÚÓÐÒ»¸ö.mnuÎļþÒ²ÐèÒªÏñ¶Áд.iniÎļþÒ»Ñù¸ÄдÀïµÄÄÚÈÝ,²»ÖªµÀÐв»?
×îºÃÄÜÓдúÂë^_^
Òª¿´.mnuÀïÃæµÄÄÚÈÝÊDz»ÊÇ·ûºÏini½á¹¹£¬Èç¹ûҪдÈëеÄÄÚÈÝ£¬Ã»ÎÊÌ⣬.mnuÖ»ÊǸöºó׺¶øÒÑ

²»ÖªµÀÄãµÄ.mnuÎļþÊÇʲôÑùµÄ¸ñʽ£¬Èç¹ûÀïÃæ´æµÄºÍiniÒ»Ñù£¬ÄÇÓÃTiniFile¶ÁдÊÇ¿ÉÒÔµÄ

½á¹¹ÓëiniÎļþÒ»Ñù,µ«ÎÒ¶Áд²»³É¹¦,ûÓÐÈκα仯!
var
  DSMenu:TIniFile;
begin
    DSMenu:=Tinifile.create(PChar(P+'c_dsbin\DSMenu1.mnu'));//PÊÇÒ»¸ö»ñÈ¡µÄ·¾¶
    DSMenu.WriteString('Item','1','YCSCXJC.exe');
    DSMenu.Destroy;
end;

mnuÎļþ£¿²Ëµ¥ÏîÂð
Èç¹ûºÍini¸ñʽһÑù£¬¿Éͨ¹ýTIniFileÀà²Ù×÷
Èç¹ûÓÐËùÇø±ð£¬Ó¦¸ÃÒ²ÊÇÀàËÆµÄÎı¾ÅäÖÃÎļþ°É£¬Ö±½ÓÓÃTStringList¶Á½øÀ´½âÎö

°ÑÄãµÄP+'c_dsbin\DSMenu1.mnu'µÄ·¾¶Showmessage³öÀ´¿´¿´ÔÚÄÄÀ˵²»¶¨Éú³ÉµÄ·¾¶´íÁË¡£ÔÙ°ÑDSMenu.Destroy¸Ä³ÉDSMenu.free;Delphi²»Ìá²ýÖ±½Óµ÷Destroy·½·¨£¬Free»¹Òª´¦ÀíһЩ¶«Î÷µÄ

¼ì²éÄãµÄ·¾¶ÊÇ·ñÕýÈ·£¬show³öÀ´¿´¿´

¿ÉÒÔ,ллÁË!


Ïà¹ØÎÊ´ð£º

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

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

delphi¶¯Ì¬Êý×éÈçºÎÈ¥µôÒ»¸öÔªËØ

procedure DynArrayDelete(var A;elSize:Longint;index,Count:Integer);
var
len,MaxDelete:Integer;
P:PLongint; //4 ¸ö×ֽڵij¤ÕûÐÎÖ¸Õë
begin
P:=PLongint(A);// È¡µÄ A µÄ ......

DelphiÔõôȡ·µ»ØÄÚÈÝÖеÄÖ¸¶¨²¿·Ö.

·µ»ØµÄÄÚÈÝÊÇÈçÏ´úÂë,ÔõôÄÜÇþµÀ2b?
<p class="text1">1a </p>
<p class="text1">2b </p>
<p class="text1">3c </p>
<p cl ......

VC Delphi ÄÚ´æËÙ¶È±È½Ï - VC/MFC / ·Ç¼¼ÊõÀà

VC ¿ØÖÆÌ¨³ÌÐò:
#include <iostream>
using namespace std;
int main()
{
const int def_buffer = 1024 * 4;
DWORD t;
BYTE b[def_buffer];
memset(b, 0, sizeof(b));
PBYTE p;
t = GetTickC ......

Delphi Óë ACCESSµÄ¹îÒìÏÖÏó

delphi 2007 + access 2007 +odbc +TADODataset,TADOConnection,TADOCommand


//ɾ³ýÊý¾Ý
procedure TCDSSelectTools.DeleteMachine(byMachineID: string);
  tmpCmd := TADOCommand.Create(ni ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ