Delphi + DBµÄ²éѯÓÅ»¯Éè¼ÆË¼Ïë
¾µä°¸Àý·ÖÏí Ôݲ»Éæ¼°·ÖÇø±í,±íÉè¼ÆµÈ Ö»´Ó±È½ÏdzµÄ½Ç¶ÈÀ´ÓÅ»¯
1.Ïȼì²é³ÌÐò ¼ì²éÄ£ÐͲãµÄÉè¼ÆÓë±àÂëÊÇ·ñºÏÀí ½«ºÍÕâ¸ö±íÓÐÓа󶨵ÄÊý¾Ý¸ÐÖª¿Ø¼þÈ«²¿È¥µô¡£
2.¹ÀËãÒ»¸öÊý¾ÝµÄ×î´óÁ¿ ¿ÉÒÔ´ÓÉè¼Æ½Ç¶È Ò²¿ÉÒÔ´Ó¿Í»§ÌṩµÄÊý¾Ý·ÖÎö δÀ´Ò»¶¨ÖÜÆÚÄÚµÄÔ¤Ôö³¤Á¿
3.½«ÌõÂëµÄ³¤¶È±£´æÆðÀ´£¬ÏÈÓÃÌõÂëµÄ³¤¶È½øÐйýÂË£¬Èç¹û80%ÒÔÉϵij¤¶È¶¼ÊÇÒ»¸ö³¤¶È£¬Ôò²»ÓÃÕâ¸ö·½·¨
4.½«ÌõÂëÖеÄżÊý¸öÊý±£´æÔÚÒ»¸ö¶ÀÁ¢µÄÊý×Ö×Ö¶ÎÖУ¬ÏȽøÐбȽϣ¬Ó¦¸ÃÏÈÄÜÅųýÒ»°ë
5.½«ÌõÂëµÄ×îºó¼¸Î»Êý¾Ý¶ÀÁ¢±£´æÔÚÒ»¸öÊý×Ö×Ö¶ÎÖУ¬ÏȽøÐбȽϣ¬Êý×ֱȽÏËÙ¶ÈÓ¦¸Ã±È×ֶαȽϿì
6.ÔÚ¸ù¾ÝÒµÎñ¿´ÊÇ·ñÄÜÓÃʱ¼äÀ´»®·Ö£¬Ã¿Ìì»òÿÖÜ£¬Ã¿Ô½¨Á¢Ò»Õűí
7.Ôö¼ÓÒ»intÀàÐ͵ÄÖ÷¼ü¡£³·ÏúÌõÂëµÄÖ÷¼ü¡£
×ܵÄÔÔòÊǽ«Êý¾Ý·ÖÀàÀ´²é£¬²»ÒªÃ¿½«¶¼ÔÚÒ»´ó¶ÑÖвéÕÒ£¬¾ÍÏóÔÚÊéµêÒ»Ñù£¬¿ÉÒÔ°´³ö°æÉÌ£¬°´ÊéÀàÐͽøÐÐ
Êé¼Ü·ÖÀ࣬ȻºóÕÒÊéµÄʱ¼ä²ÅÄÜ¿ìËÙ¶¨Î»¡£
/////////////////////////////////////////////////////////////////////////
¾µäÒ»¾äSQL:
if not exists(select akey from a where akey='1234')
insert into a values(akey, b,c,d)
Ïà¹ØÎĵµ£º
Êý×éÊÇ¿ÉÒÔͨ¹ýË÷ÒýÀ´ÒýÓõÄͬÀàÐÍÊý¾ÝµÄÁÐ±í¡£°´ÕÕ´æ´¢¿Õ¼äµÄ»ñÈ¡·½Ê½£¬Delphi
Ö§³ÖµÄÊý×éÀàÐÍÓÐÁ½ÖÖ£¬¼´¾²Ì¬Êý×éºÍ¶¯Ì¬Êý×é¡£Ëùν¾²Ì¬Êý×é¾ÍÊÇÔÚÉùÃ÷ʱ¾ÍÒѾȷ¶¨´óСµÄÊý×éÀàÐÍ£¬¶ø¶¯Ì¬Êý×éÊÇÖ¸Æä´óСÔÚÉùÃ÷ʱ²»ÄÜÈ·¶¨µÄÊý×飬¶¯Ì¬Êý×éµÄ´óСÔÚʹÓÃʱȷ¶¨¡£
ÉùÃ÷¾²Ì¬Êý×éµÄ·½Ê½·Ç³£¼òµ¥£¬Ö»ÒªÖ¸Ã÷Êý×鳤¶ÈºÍÊý¾ÝÀàÐÍ ......
procedure TfrmMain.FormCreate(Sender: TObject); //Ö÷´°ÌåFormCreateʼþ
var FWidth:integer;
begin
if (screen.Width <> 1024) then //¼ÙÉèÄãÉè¼Æ³ÌÐòʱµÄ·Ö±æÂÊΪ1024
begin
FWidth:=width;
scaled:=true;
& ......
½ñÌìÓÃdelphi 2010£¬×öÒ»¸ö¼òµ¥µÄÄÚ´æÓ³ÉäµÄ³ÌÐò£¬ÔÚdelphiÒÔǰ°æ±¾ÉÏÅܵĺúõijÌÐò£¬ÔÚ2010ÉÏ£¬¾ÓÈ»³öÏÖÁ˲»Í¬µÄЧ¹û£¬·¢ËͶ˷¢Ë͵Ä×Ö·û´®£¬½ÓÊÕ¶ËÖ»ÊÕµ½Ò»°ë£¬´ó¸Å³ÌÐòÈçÏ£º
·¢ËͶˣº
var
str : String;
begin
CopyMemory(@(PShare^.Data),str,Length(str)); //°ÑÊý¾Ý¿½±´µ½ ......
DELPHI²ÎÊý¼¸¸ö¸ÅÄîÉϵÄÇø±ð ÊÕ²Ø
ÒýÓòÎÊý£º
ÒýÓòÎÊýÓÃvar¹Ø¼ü×Ö±êʾ
procedure DoubleTheValue (var Value: Integer);
begin
Value := Value * 2;
end;ÔÚÕâÖÖÇé¿öÏ£¬²ÎÊý¼È°ÑÒ»¸öÖµ´«µÝ¸ø¹ý³Ì£¬ÓÖ°ÑÐÂÖµ·µ»Ø¸øµ÷Óùý³ÌµÄ´úÂë¡£µ±ÄãÖ´ÐÐÍêÒÔÏ´úÂëʱ£º
var
X: Integer;
begin
X : ......
DelphiÖÐDLL³õʼ»¯ºÍÍ˳ö´¦Àí
choysan
2010-01-08 8:56:43
<1>ÀûÓÃUnitµÄInitalizationÓëFinalizationÕâÁ½¸öС½Ú
¡¡¡¡¿ÉÒÔÔÚUnitµÄÕâÁ½¸öС½ÚÖа²ÅÅUnitµÄ½øÈëºÍÍ˳ö£¬µ«ÊÇ
ProgramÓëLibrary²¢Ã»ÓÐÕâÁ½¸ö²¿·Ö£¬ËùÒÔÖ»ÄÜдÔÚUnitÖС£
<2>ÀûÓÃExitProc±äÁ¿
¡¡¡¡ÔÚLibraryµÄbegin..end.ÖмäÊÇ¿ÉÒÔд´úÂëµÄ£ ......