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

delphi±ÊÊÔÌâ(Ò»)


1¡¢ÇëÁоÙVCLÀà¿âÖÐÒÔTObjectΪ¸ùµÄ¶ÔÏóÌåϵ£¨¿ÉÒÔÖ»ÀàÖ÷¸É£©
2¡¢ÇëÁоÙVCLÊý¾Ý¿â·½ÃæµÄºËÐÄÀà
3¡¢DelphiÖÐoverrideºÍoverloadµÄ×÷Ó÷ֱðÊÇʲô£¿
4¡¢DelphiÖÐRTTIÊÇʲô£¿ÓÐʲô×÷Óã¿
5¡¢Èç¹ûÒ»¸ö¸Õ²¿ÊðµÄWeb·þÎñÆ÷²»ÄÜ·ÃÎÊ£¬Áоٳö¿ÉÄÜ´æÔÚµÄÔ­Òò£¿
6¡¢ÔÚSQLÖÐ×óÁ¬½Óʱʲô?ËüÄÜʵÏÖµÄÊý¾Ý½á¹û¼¯µÄÌØµãÊÇʲô£¿
7¡¢ÇëÎÊÔÚOracleºÍMssqlÖÐÈçºÎֻȡselectÓï¾ä½á¹û¼¯ÖеÄǰ100Ìõ£¿
Oracle£ºselect top 100 * from tablename
Mssql£ºselect * from tablename where rownum < 101
8¡¢¶þ²æÊ÷
type
TBTreeNode = class
      Data: string;
      Left: TBTreeNode;
      Right: TBTreeNode;
end;
function NewNode(const Data: string; Left, Right: TBTreeNode): TBTreeNode;
begin
Result := TBTreeNode.Create;
Result.Data := Data;
Result.Left := Left;
Result.Right := Right;
end;
var Root: TBTreeNode;
procedure Init;
begin
{ ½¨Ê÷£º
               =
      X                 *
                  +             -
              1       2    3       4
}
Root = NewNode('=', NewNode('X', nil, nil),
NewNode('*', NewNode('+', NewNode('1', nil, nil), NewNode('2', nil, nil)),
NewNode('-', NewNode('3', nil, nil), NewNode('4', nil, nil))));
end;
¼ÙÉè±äÁ¿RootÒѾ­ÓÐInit³õʼ»¯£¬Çëд³öÖÐÐò±éÀúRootÊ÷µÄ´úÂ룬ҪÇóÊä³ö½á¹ûX=1+2*3-4
9¡¢Á½ÖÖÊý¾Ý¿â½á¹¹±í¼°²¿·Ö¼Ç¼ÈçÏ£º
±àÂëÊ÷£º
—————————
ID
01
0102
0103
010204
—————————
¸¸×ÓÊ÷£º
—————&mda


Ïà¹ØÎĵµ£º

ÈçºÎÈÃDelphiµ÷ÓÃÍⲿ³ÌÐò²¢µÈ´ýÆäÔËÐÐÐÅÏ¢£¨Èç½áÊø£©

º¯ÊýÒ»£º
view plaincopy to clipboardprint?
uses 
    Windows,  
    SysUtils,  
    Classes,  
    ShellAPI;  
function RunAndWait(FileName: string; Visibility: Integer): THandle;&nbs ......

Delphi 7¸ßЧÊý¾Ý¿â³ÌÐòÉè¼Æ

ÄÚÈݼò½é
    dbExpressÊÇBorland¹«Ë¾ÏÂÒ»´úÊý¾Ý·ÃÎʼ¼Êõ¡£±¾Êé²»½öÏêϸ½éÉÜÁËdbExpressµÄ»ù±¾¹¦ÄÜ¡¢Ê¹Óü¼ÇÉÒÔ¼°Delphi/KylixµÄDataSnap¼¼Êõ£¬»¹ÏêϸÌÖÂÛÁËdbExpressµÄʵÏÖÔ­ÀíÒÔ¼°dbExpressµÄδÀ´·¢Õ¹Ç÷ÊÆ¡£±¾Êé½á¹¹ÇåÎú£¬½²½â͸³¹£¬ÊµÀý·á¸»¡£×÷ÕßÀîάÊÇBorland¹«Ë¾ÖøÃû¼¼Êõר¼Ò£¬ÔøÖøÓжಿDelphiÃû ......

Delphi µÄ×Ö·û¼°×Ö·û´®[

Delphi µÄ×Ö·û¼°×Ö·û´®[1] - string¡¢AnsiString¡¢WideString¡¢String[n]¡¢ShortString
2008-10-17 14:57:17
//×î³£ÓÃµÄ string
var
  str: string;   {¶¨Òå}
begin
  str := 'ÍòÒ»'; {¸³Öµ}
  ShowMessage(IntToStr(Length(str))); {³¤¶ÈÊÇ: 4}
end;
//³¤×Ö·û´® AnsiString; ÔÚµ±Ç°°æ± ......

delphi canvasʹÓÃ

ÔÚDELPHIΪ±à³ÌÕßÌṩÁËÒ»¸öÁé»îµÄ»æÍ¼³¡Ëù,¼´±¾ÎÄËùÊöµÄ   
CANVASÀà,ÔÚDELPHIÖÐµÄºÜ¶à¿Ø¼þ¶¼¾ßÓдËÊôÐÔ,ʹ±à³ÌÕß¿ÉÒÔ   
ÔÚÕâЩµÄ¿Ø¼þµÄ±íÃæËæÐÄËùÓûµÄ»æÍ¼,Õâ¶ÔÍêÉÆÓû§½çÃæ»òÕßÖÆ   
×÷һЩÆÁÄ»ÌØ¼¼¶¼ÓÐ×Å·Ç·²µÄ×÷ÓÃ,ÏÂÃæ¾ÙÀý˵Ã÷¼¸ÖÖÌØÊâÆÁÄ»    ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ