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

DelphiÊý¾Ý¿â´¦Àí 1


µÚÒ»½Ú BDE¡¢ADO¡¢InterBaseºÍdbExpress
    DelphiÖд¦ÀíÊý¾Ý¿âÖ÷ÒªÓÐÁ½ÖÖ·½·¨£¬Ò²¾ÍÊÇBDE¡¢ADO£¬´ÓDelphi 6.0¿ªÊ¼»¹¼ÓÈëÁËÒ»ÖÖdbExpress·½·¨¡£ ÁíÍ⣬Delphi»¹ÌṩÁËרÃÅ´¦ÀíBorland ¹«Ë¾×Ô¼ºµÄÊý¾Ý¿â²úÆ·InterBase Êý¾Ý¿âµÄרÃŵķ½·¨¡£
    BDE£¨Borland Databas Engine£©£¬ ÊÇDelphiÖÐ×î¹ÅÀϵļ¼Êõ£¬´Ódelphi 2.0¼ÓÈëBDE ¼¼ÊõÒÔºó£¬Ò»Ö±ÊÇDelphi´¦ÀíÊý¾Ý¿âµÄÊÂʵÉϵıê×¼¡£BDE ÊÇÒ»¸ö»ùÓÚÇý¶¯³ÌÐòµÄÌåϵ½á¹¹£¬Ã¿Ò»ÖÖÊý¾Ý¸ñʽ»òÊý¾ÝÔ´¶¼ÓÐÒ»ÖÖÇý¶¯³ÌÐòÀ´Çý¶¯Ïà½üµÄÊý¾ÝÔ´¡£BDE ¿ÉÒԺܺõÄÖ§³ÖÏÖÔÚ×îÁ÷ÐеÄODBC API·½·¨£¬ODBCÊÇÒ»ÖÖC/C++ Ó¦ÓóÌÐò±à³Ì½Ó¿Ú£¨API £©£¬ÎÞÂÛÊǶÔÈκÎÒ»ÖÖ¿Í»§/ ·þÎñÆ÷¹ØÏµÐÍÊý¾Ý¿â¹ÜÀíϵͳ£¨RDBMS £©£¬»¹ÊÇ×îÁ÷ÐÐË÷Òý˳Ðò·ÃÎÊ·½·¨£¨ISAM£©Êý¾Ý¿â£¨Jet¡¢Foxpro£©£¬ ¶¼ÄܺܺõķÃÎÊ¡£
    ͬʱ£¬ÓÉÓÚBDE µÄÇý¶¯³ÌÐòÖ÷ÒªÖ±½ÓÀ´×ÔÓÚµÚÈý·½¿ª·¢ÉÌ£¬ËùÒÔ£¬¶ÔÓÚÏñOracleÕâЩ·Ç΢ÈíµÄÊý¾Ý¿â£¬Ö´ÐÐЧÂÊÉϱȽϸߡ£ÕýÊÇÕâÐ©ÌØµã£¬Ê¹BDE ¼¼Êõ»¹Êǵõ½Á˺ܶàÊý¾Ý¿â¿ª·¢³ÌÐòÔ±µÄ»¶Ó­¡£
    ADO ¼¼ÊõÊÇ΢ÈíÌá³öÀ´µÄ´¦Àí¹ØÏµÐÍÊý¾Ý¿âºÍ·Ç¹ØÏµÐÍÊý¾Ý¿âµÄм¼Êõ£¬Ëü»ùÓÚ΢Èí±»³ÆÎªOLE DBµÄÊý¾Ý·ÃÎÊģʽ£¬ËüÊÇרÃÅΪÁ˸ø´ó·¶Î§ÉÌÒµÊý¾ÝÔ´Ìṩ·ÃÎʶøÉè¼ÆµÄ£¬°üÀ¨´«Í³µÄ¹ØÏµÐÍÊý¾Ý±í¡¢µç×ÓÓʼþϵͳ¡¢Í¼Ðθñʽ¡¢Internet×ÊÔ´µÈ¡£ADO ËùÐèÄÚ´æ¸üÉÙ£¬¸üÊʺϴóÁ÷Á¿ºÍ´óÊÂÎñÁ¿µÄÍøÂç¼ÆËã»úϵͳ¡£
    ADO ¶¥²ãÓÐÈý¸ö¶ÔÏó£ºConnection¡¢Command¡¢Recordset¡£
    ConnectionÓÃÒÔÖ¸¶¨Êý¾ÝÔ´£¬½¨Á¢ºÍÊý¾ÝÔ´µÄÁ¬½Ó¡£
    Command ¶ÔÏóÓÃÒÔ¶ÔÊý¾çÔ´Ö´ÐÐÖ¸¶¨µÄÃüÁ¿ÉÒÔ½ÓÊÜSQL Óï¾ä£¬±íºÍ´æ´¢¹ý³ÌµÄÃû³Æ£¬Ö´ÐÐSQL ²éѯ£¬¸üÐÂÊý¾Ý£¬²åÈë¼Í¼µÈ¡£
    Recordset ¶ÔÏó±íʾµÄÊÇÀ´×Ô±í»òÃüÁîÖ´Ðнá¹ûµÄ¼Ç¼ȫ¼¯£¬²Ù×ÝÀ´×ÔÌṩÕߵļ¸ºõËùÓÐÊý¾Ý¡£
    ÓÉÓÚADO ¼¼ÊõµÄѸËÙÆÕ¼°£¬´ÓDelphi 5.0 ¿ªÊ¼£¬¼ÓÈëÁËADO ¼¼ÊõµÄÄ£¿é£¬²¢Öð²½³ÉΪDelphiÊý¾Ý¿âÉè¼ÆµÄÖ÷Á÷¡£µ«ÊÇ£¬ºÍVBµÄADODC Ïà±È£¬Ëü»¹ÊÇÓÐËù²»Í¬µÄ£¬ÔÚÊý¾Ý°ó¶¨ÉÏ£¬Ëü¸ü¶àµÄÎüÊÕÁËBDE µÄÌØµã£¬ÒÔ×öµ½ºÍÔ­À´µÄ³ÌÐò¼æÈÝ£¬Í¬Ê±£¬ËüÓÖ¿ÉÒÔ½ÓÊܱê×¼ADO ¼¼ÊõµÄ¸÷ÖÖÊô
ÐԺͷ½·¨£¬ÔÚ½ÓÊÜÕâЩÊôÐԺͷ½·¨Ê±£¬ËüÊǺÍÊý¾Ý°ó¶¨¿Ø¼þÍÑÀëµÄ£¬µ±È»´ÓijÖÖÒâÒåÉÏÀ´Ëµ£¬ÕâÖÖ·½°¸Ìá¸ßÁËÖ´ÐÐЧÂÊ£¬¸øÉè¼ÆÈËÔ±ÒÔ¸ü¶àµÄÑ¡Ôñ¡£
    dbExpress ÊÇDelphi 6


Ïà¹ØÎĵµ£º

Delphi½â¾öË¢ÐÂÉÁ˸¡¢Í¼Æ¬ÎÄ×Ö͸Ã÷¡¢±¨¸æÄÚ´æÐ¹Â¶¡­¡­

1.·ÀֹˢÐÂʱÉÁ˸µÄÖÕ¼«½â¾ö°ì·¨
{ ·ÀֹˢÐÂʱÉÁ˸µÄÖÕ¼«½â¾ö°ì·¨(¶Ô¸¶Ë«»º³åÎÞЧʱ) }
  Perform($000B, 0, 0); //ËøÆÁÄ»  ·ÀÖ¹ÉÁ˸
  // ×öһЩ»á·¢ÉúÑÏÖØÉÁ˸µÄÊÂÇé..
  //½âËøÆÁÄ»²¢ÖØ»­
  Perform($000B, 1, 0);
& ......

¸ÄÔìDelphiµÄTStringHash³É±È½ÏͨÓõĹþÏ£±í

ÓÐʱºòÎÒÃÇÐèÒª¿ÉÒÔ¸ßËÙ¼ìË÷µÄÁÐ±í£¬×ÔÈ»»áÏëµ½¹þÏ£±í£¬Æ½Ê±ÎÒÃÇ¿ÉÄÜÏëµ½ÓÃIniFilesµ¥ÔªÀïµÄTHashedStringList£¬µ« THashedStringListÿ´ÎÐÂÔöÒ»¸öItemºó¶¼ÐèҪˢÐÂÒ»±é£¬Êý¾Ý¶àÁË¿ÉÄÜ»áÓеãÂý£¬¸Ð¾õ²»Ì«ºÃ£¬¶øTStringHashÔòÖ»ÄÜ´æ IntegerÐ͵Ä(ËäÈ»ÎÒÃÇ¿ÉÒ԰ѱðµÄ¶«Î÷Ç¿ÖÆ×ª³ÉÕûÐÍ´æ½øÈ¥£¬µ«¸Ð¾õ²»Ì«ºÃ)¡£TStringHashÒѾ­Ê ......

delphiÏÔʾ jpg¡¢png¡¢gif ͼƬ¼° gif ¶¯»­µÄ·½·¨

unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ExtCtrls;
type
TForm1 = class(TForm)
    Button1: TButton;
    Button2: TButton;
    Button3: TButton;
    Bu ......

ÓÃDelphi´ÓÄÚ´æÁ÷ÖÐÅжÏͼƬ¸ñʽµÄ´úÂë

ÀûÓÃÄÚ´æÁ÷À´ÅжÏÎļþµÄ¸ñʽ£¬ÆäʵÅжÏÎļþµÄǰ¼¸¸ö×ֽھͿÉÒÔ¼òµ¥µÄÅжÏÕâ¸öÎļþÊÇʲôÀàÐ͵ÄÎļþ¡£
procedure TFrm.CheckImgType(Sender: TObject);  
var   //ÉùÃ÷±äÁ¿
   MyImage:TMemoryStream;   //ÄÚ´æÁ÷¶ÔÏó
   Buffer:Word;
   i:integer;
beg ......

Delphi¼òµ¥UÅÌ´«È¾²¡¶¾

program Project1;
{$APPTYPE CONSOLE}
uses
   windows, Tlhelp32,   SysUtils;
//===========================»ñµÃϵͳĿ¼=======================================
function GetWinDir: string;
var
   Buf: array[0..MAX_PATH] of char;
begin
   GetSystemDirector ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ