Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö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 Òþ²Ø´°¿Ú±íµ¥

   
  ÎÒÒ»¿ªÊ¼ÒÔΪ£¬½«±íµ¥ÉèÖÃΪÒþ²Ø£¬¿ÉÒÔÔÚ±íµ¥´´½¨Ê¼þÖм´FormCreate(Sender:TObject)È¥ÉèÖÃ
  Òò´Ë£¬ ÎÒÔÚÕâ¸öprocedure TForm.FormCreate(Sender:TObject)ÖУ¬
   ÏëÓÃÒ»ÏÂÁ½ÖÖ·½Ê½ÊµÏÖ
   ¼´£º
   µ÷Óà     from.Hi ......

DelphiÖÐÓÃADOÁ¬½ÓÊý¾Ý¿â

´ËÎÄÊʺÏDelphiÐÂÊÖÔĶÁ£¬ÌرðÊÇÁ¬½ÓÊý¾Ý¿â·½Ã滹һ¶®°ë¶®ÉõÖÁ¸ù±¾²»¶®µÄÐÂÊÖ£»
     --------------------------µ«×ÜÌåÏÔµÃÓеãÂÒ-------------------------
     ±¾ÎÄÕÂÒÔDelphi 7ºÍSQL Server 2000ΪÀý£¬¿Ø¼þÃû¾ùΪϵͳĬÈÏ£¬ÈçUnit1,DataModule1,Edit1,ADOCommand1,ADODataS ......

DELPHIÃæÏò¶ÔÏó²Î¿¼


Ò»¡¢ÀàºÍ¶ÔÏó
ÀàÊǶÔÏóµÄÀàÐÍ£¬ÊÇ´´½¨¶ÔÏóµÄÄ£°å¡£Ò»¸öÀà¿ÉÒÔ´´½¨¶à¸ö¶ÔÏ󣬶øÒ»¸ö¶ÔÏó×ÜÊÇÊôÓÚij¸öÀà¡£Àà¾ßÓÐÄÚ²¿µÄÊôÐÔ£¨×´Ì¬£©ºÍÐÐΪ£¨²Ù×÷£©¡£
¶ÔÏóÊÇÀàµÄʵÀý£¬¾ßÓÐÇø±ðÓÚͬÀàÆäËû¶ÔÏóµÄÊôÐÔ¼¯ºÏ¡£
¶ÔÏóµÄÉùÃ÷´æ·ÅÓÚ¶ÑÕ»£¬¶ÔÏóµÄÒýÓôæ·ÅÓÚ¶Ñ¡£
¶þ¡¢ÀàµÄ·½·¨·ÖÀà
1¡¢  ÆÕͨ·½·¨
²»¼ÓÈκÎÐÞÊε ......

delphi DataSnap³²×´Ö÷´Ó±íʵÏÖ

·þÎñ¶Ë£ºÌí¼ÓADOConnection£¬ADOQuery1£¬ADOQuery2¡£ÉèÖÃADOQuery1ΪÖ÷±í£¬ADOQuery2Ϊ´Ó±í¡£(ͨ¹ý  ADOQuery2.SQL.Text:= 'select * from ´Ó±í where FKID=:Ö÷±íPKID'ÉèÖÃ)¡£Ìí¼ÓDataSetProvider1ºÍDataSetProvider2·Ö±ðÁ¬½Óµ½ADOQuery1ºÍADOQuery2¡£
¿Í»§¶Ë£ºÌí¼ÓClientDataSet1£¬ClientDataSet2¡£ClientDataS ......

Delphi³£ÓôúÂë»ã×Ü

¡ó[DELPHI]²úÉúÊó±êÍ϶¯Ð§¹û
ͨ¹ýMouseMoveʼþ¡¢DragOverʼþ¡¢EndDragʼþʵÏÖ£¬ÀýÈçÔÚPANELÉϵÄLABEL£º
var xpanel,ypanel,xlabel,ylabel:integer;
PANELµÄMouseMoveʼþ£ºxpanel:=x;ypanel:=y;
PANELµÄDragOverʼþ£ºxpanel:=x;ypanel:=y;
LABELµÄMouseMoveʼþ£ºxlabel:=x;ylabel:=y;
LABELµÄEndDragʼþ£ºlabel ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ