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

delphi ÈçºÎ ¶¯Ì¬¶¨Òå±äÁ¿

³ÌÐòÖÐÏë¸ù¾Ý²»Í¬ÎļþÃû£¬¶¯Ì¬Éú³É±äÁ¿Ãû³Æ£¬È»ºó£¬ÔÙ¸øÕâ¸ö±äÁ¿¸³Öµ¡£

ÏëÖªµÀDELPHIÖÐÄܹ»ÔõôʵÏÖ¡£

ÎʹýÅóÓÑ˵²»ÊǽâÊÍÐÍÓïÑÔ£¬ÎÒ¾õµÃÓ¦¸Ã¿ÉÒÔÓнâ¾öÎÊÌâµÄ;¾¶¡£
²»ÖªµÀÄãÏë¸Éʲô£¬ÊÔÊÔÓö¯Ì¬Êý×é°É¡£

ÕâÖÖÎÊÌâ¾ÍÊÇÒòΪÄÔ×ÓÀïÒ»íÈôݺý£¬¸ÅÄîÊÇʲô¶¼¸ãûÇå¾Í¿ªÊ¼Ï¹ÓÃ


¹À¼ÆÖ»ÓÐһЩscriptÈç remobjectµÄpascalscript»òfast script¿ÉÄÜÄÜʵÏÖÄãµÄÒªÇó

·ÇÒªÔÚÔËÐÐʱ¶¨Òå±äÁ¿Ãû³ÆÂð£¿Èç¹û²»ÐèÒªµÄ»°¿ÉÒÔÓÃÁ´±í»òÊý×é

type
  PMyFile = ^TMyFile;
  TMyFile = record
    Name: string;
    ....
  end;

AMyFile := TMyFile.create;
AMyFile.Name := 'Ãû×Ö';

¿ÉÒÔÓÃÁбí¹ÜÀíÆðÀ´
µÈµÈ£¬Äã¿ÉÒÔʵÏֵĸüºÃ

type
  MyRecord=record
    FileName:TFileName;
    ±äÁ¿:String;//?Integer?Variant?
  end;
  MyRecordArray=array of MyRecord;

.....

var FTest:MyRecordArray;
begin
  while ....
  begin
    SetLength(FText,Length(FText)+1);
    FText[Length(FText)-1].FileName:=xxxxx;
    FText[Length(FText)-1].±äÁ¿:=OOOOO;


end;

ºÃʹ²»£¿


Ïà¹ØÎÊ´ð£º

PythonÖеÄUnicodeÔÚDelphiÈçºÎ»¹Ô­³ÉGb2312£¿

ÒÑÖªPython ÖУº
s = unicode("²âÊÔ", "gb2312")
s = u'\u6d4b\u8bd5'
print s
²âÊÔ

ÔÚDelphiÀïÃæÈçºÎ½«\u6d4b\u8bd5ÕâÑùµÄ»¹Ô­³ÉGb2312µÄºº×ÖÄØ£¿
ÕÒµ½¸ö·½·¨
......

ÈçºÎÔÚdelphiÀïÓôúÂëʵÏÖ´´½¨VPNÁ¬½Ó?

ÎҵĴúÂëÈçÏÂ,Ôõô×ÜÌáʾÁ¬²»³É¹¦:
type
  GUID = record //ÉêÃ÷µ÷ÓÃRAS£¨´´½¨VPNÁ¬½ÓÓ㩺¯ÊýËùÐè½á¹¹Ìå
  Data1: integer;
  Data2: Shortint;
  Data3: Shortint;
  ......

Delphi ¶àỊ̈߳¬µ¯³ö¿òÖжÏÎÊÌâ

ÈçÌ⣺

ÎҵijÌÐò Create µÄʱºò ´´½¨ÁËN ¸öỊ̈߳»ÕâN¸öÏ̲߳»Í£µÄÔÚ ¼àÌýN¸öCOM¿ÚµÄÊý¾Ý£»µ±·ÖÎöÊý¾Ýʱ£¬ÓÐЩʱºòÒªµ¯³öapplication.messagebox ¶Ô»°¿òÅÐ¶Ï ÊÇ·ñ¼ÌÐø Ö´ÐÐỊ̈߳¬»¹ÊÇ¹ÒÆðÏ̡߳£µ±¶à¸öÏß³Ìͬʱ ......

Çë½ÌÏ£¬ÓÃDELPHI×öSOHUµÄ - Delphi / ·Ç¼¼ÊõÇø

Ò»°ã¶¼ÊÇÔõô½Ó»îµÄ£¿
ÊÕÈëÔõôÑù
sohu£¿soho£¿

sohu ¿ÉÄÜÊÇsmall office house unit
С°ì¹«ÊÒ£¬°Ñ¼Ò±ä³Éµ¥Î»¡£

È¥Íþ¿ÍÍø°¡,ºÜ¶à¸öÄØ,»¹ÓÐÍâ°üµÄÍøÕ¾

ѧϰѧϰ¡£

ÏÖÔÚDelphi×ö¶«Î÷²»ÐÐÁË,´¦ÓÚÌÔÌ­×´ ......

100·Ö£¡¹ØÓÚvbµ÷ÓÃdelphi±àдµÄdllµÄÎÊÌ⣬¼±£¡£¡£¡

¸÷λ¸ßÊָϿì°ï°ïæ¡£
ÏÖÔÚÓÐÒ»¸ödelphiдµÄdll£¬º¯ÊýÖÐÓÐPIntegerµÄ·µ»Ø²ÎÊý£¬ÔÚdelphiÖпÉÒÔÕý³£µ÷Ó㬵«ÊÇÎÒÔÚvbÀïдµÄʱºò¾Í²»ÖªµÀ¸ÃÔõôÀ´µ÷ÓÃÁË¡£
Çë¿´´úÂë
ÒÔÏÂÊÇdelphiÖеĺ¯Êý¶¨ÒåºÍµ÷ÓôúÂ룬ÄÜÕý³£ÔËÐ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ