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

Delphi ×ÊÔ´ÎļþʹÓÃ


DelphiʹÓÃ×ÊÔ´ÎļþÈ«¹¥ÂÔ
   ÔÚͨ³£Çé¿öÏÂʹÓÃdelphiÉè¼Æ³ÌÐò£¬¶¼Êǽ«×Ö·û´®¡¢Í¼ÏñµÈ×ÊÔ´Ö±½ÓʹÓÃdelphiÌṩµÄvcl¿Ø¼þ¼Óµ½*.dfmÖУ¬ÕâÑù×ö»áºÏÐÞ¸ÄÕâЩ×ÊԴʱ´øÀ´²»±ã£¬Èç¹û×ÊÔ´±»¶à´ÎÒýÓã¬ÕâЩ×ÊÔ´ÔÚ³ÌÐòÆô¶¯Ê±¶¼±»¼ÓÔص½ÄÚ´æÖУ¬·Ç³£ºÄ·Ñϵͳ×ÊÔ´¡£Òò´Ë£¬Õâ¾ÍÐèÒªÒ»ÖÖеÄÒýÓÃ×ÊÔ´µÄÎļþ£º×ÊÔ´Îļþ¡£×ÊÔ´Îļþ¾ÍÊǽ«Ò»Ð©×ÊÔ´£¬Èç×Ö·û´®¡¢Í¼ÏñµÈÐÅÏ¢½øÐбàÒ룬ȻºóÔÚ³ÌÐòÖÐÒýÓñàÒëºóµÄ×ÊÔ´Îļþ£¬×îºóºÍÔ´³ÌÐòÒ»Æð±àÒëÉú³É¿ÉÖ´ÐÐÎļþ¡£ÓÉÓÚÔÚ×ÊÔ´ÎļþÖеÄ×ÊÔ´ÊÇÔÚÐèҪʱ¼ÓÔØ£¬Òò´Ë£¬±È½Ï½Úʡϵͳ×ÊÔ´£¬¶øÇÒ£¬Èç¹ûÒª×ö¹ú¼Ê»¯°æ±¾µÄϵͳ£¬Ö»ÐèÒª½«×ÊÔ´ÎļþÒ»»»£¬ÖØбàÒë¼´¿É¡£ÏÂÃæ¾ÍÏêϸ½éÉÜdelphiÖÐ×ÊÔ´ÎļþµÄ½¨Á¢ºÍʹÓá£
Ò»¡¢½¨Á¢×ÊÔ´Îļþ
    ×ÊÔ´ÎļþµÄÔ´ÎļþÊÇÆÕͨµÄÎı¾Îļþ£¬À©Õ¹ÃûÊÇ*.rc¡£½«×ÊÔ´ÎļþµÄÄÚÈÝдÈëÎļþºó£¬µ÷ÓÃbrcc32.exe½«Æä±àÒëºóÉú³É*.resÎļþ¡£brcc32.exeÔÚdelphiµÄbinĿ¼ÖС£
¶þ¡¢×Ö·û´®×ÊÔ´
    ×Ö·û´®×ÊԴʵ¼ÊÉÏÊǽ«Ò»¸ö×Ö·û´®ºÍÒ»¸öÊý×ÖË÷Òý¶ÔÓ¦£¬ÔÚ×°ÔØ×Ö·û´®×ÊԴʱ£¬ÐèÒªÌṩÕâ¸ö×Ö·û´®×ÊÔ´Ëù¶ÔÓ¦µÄÊý×ÖË÷Òý¡£×Ö·û´®×ÊÔ´ÎļþÒÔstringtable¿ªÍ·£¬Ê¹ÓÃÒ»¶ÔbeginºÍand½«×ÊÔ´¶¨ÒåÀ¨ÆðÀ´¡£ ×Ö·û´®×ÊÔ´µÄ¸ñʽÊÇ£ºÊý×ÖË÷Òý£¬"×ÊÔ´×Ö·û´®"¡£
string.rcÎļþÄÚÈÝ
stringtable
begin
1001, "н¨"
1002, "±£´æ"
1003, "¹Ø±Õ"
1004, "°ïÖú"
1005, "Í˳ö"
1006, "×ÊÔ´Îļþ²âÊÔ"
End
    È»ºóµ÷ÓÃÃüÁbrcc32.exe string.rc £¬Éú³Éstring.res£¬×îºóÔÚ³ÌÐòÖмÓÈë{$R string.res}¡£ÒÔÏÂËùÊöµÄ*.rcÎļþ¶¼ÐèʹÓÃÀàËƵķ½·¨½øÐбàÒëºÍÒýÓá£
    ÔÚdelphiÖÐÓÐÁ½ÖÖ·½·¨¿ÉÒÔ×°ÔØ×Ö·û´®×ÊÔ´¡£
    1. ʹÓÃWindows APIº¯ÊýLoadString¡£Ê¹ÓÃÕâ¸öº¯ÊýÐèÒª¶¨ÒåÒ»¸öcharÊý×飬µ÷ÓõÄÐÎʽÈçÏ¡£
    LoadString(hInstance, 1001, buffer, 100); //100£ºbufferÊý×éµÄ×î´ó³¤¶È£¬1001£ºÊý×ÖË÷Òý
    2. ʹÓÃdelphi×ÔÉíµÄº¯ÊýLoadStr¡£Õâ¸öº¯ÊýÖ»ÐèÒªÒ»¸öÊý×ÖË÷Òý¾Í¿ÉµÃµ½ÏàÓ¦µÄ×Ö·û´®×ÊÔ´¡£µ÷ÓõÄÐÎʽÈçÏ¡£
    button2.Caption := LoadStr(1002);
Èý¡¢Bitmap×ÊÔ´
    λͼ×ÊÔ´µÄ¶¨Òå¾ÍÏà¶Ô¼òµ¥µÃ¶à¡£Ã¿¸öλͼ×ÊÔ´Ö»ÐèÒª¶¨ÒåÈýÏλͼ±êʶ λͼÀàÐÍ Î»Í¼ÎļþÃû £¨ÕâÈýÏîÖмäÓÿոñ»òtab¸ô¿ª£©ÆäÖÐλͼ±êʶºÍ×Ö·û´®×ÊÔ´µÄÊý×ÖË÷ÒýÀàËÆ£¬Ö»ÊÇλͼ±êʶ¿ÉÒÔÊÇ×Ö·û´®¡


Ïà¹ØÎĵµ£º

delphi ʹÓÃado ¶Áд vfp»òÕßdbase4µÄÊý¾Ý¿â


tableDB.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+ ExtractFilePath(dir) +';Extended Properties=dBase 5.0;Persist Security Info=False;';
       tableDB.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+ExtractFilePath(dir)+';Extended Pro ......

DelphiÖÐʹÓÃ@È¡º¯ÊýµØÖ·µÄÎÊÌâ

ÀýÈçÒÔÏ´úÂ룺
unit Unit1;
interface
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs;
type
  TForm1 = class(TForm)
    procedure one();
    function two(x,y:integer):integer;
  private
    ......

SDL & Object Pascal (Delphi) [2] ÏÔʾÖÐÎÄ×Ö·û

һЩ»ù´¡µÄÎÊÌâÎÒ²»ÔÙ׸ÊöÁË£¬²éÔÄ°ïÖúÎĵµ£¨Object Pascal SDL Doc.chm£©ÏÔÈ»±ÈÔÚÕâ¿´ÎÒºú³¶ºÏÊʵöࡣÄÇЩ»­ÏñËØ£¬»ñÈ¡ÏñËØÐÅÏ¢£¬ÏÔʾBMPÎļþ¶àÊýʱºòÖ»Òª°ÑÄÇЩ´úÂ븴ÖƹýÀ´»ù±¾¾ÍÄܹ¤×÷¡£ÏÂÃæ˵µÄÊÇÔõÑùÏÔʾÖÐÎÄ¡£
ÆäʵSDL¼ÓÉÏttfÖ§³Öʱ£¨ÐèÒª½«¶ÔÓ¦µÄdllÎļþÌí¼Óµ½¹¤³ÌĿ¼ÀÊÇÍêÈ«¿ÉÒÔÏÔʾÖÐÎĵģ¬¼òÌåºÍ·±Ì嶼ûΠ......

¹ØÓÚdelphi Moveº¯ÊýµÄÓ÷¨Ïê½â

ʹÓÃdelphi¶àÄê,ǰЩÌìºöÈ»Óöµ½²»»ástringתpbyte,ºÜÊÇʧÂä,´Ëʱ¶ÔÓÚ±à³Ì»ù±¾¹¦µÄÖØÒªÐÔÉîÓÐÌå»á.ÕâÆäÖÐÓõ½MOVEº¯Êý.
ʹÓÃdelphi¶àÄê,ǰЩÌìºöÈ»Óöµ½²»»ástringתpbyte,ºÜÊÇʧÂä,´Ëʱ¶ÔÓÚ±à³Ì»ù±¾¹¦µÄÖØÒªÐÔÉîÓÐÌå»á.ÕâÆäÖÐÓõ½MOVEº¯Êý.
 ¸ãÁ˺ÃÒ»»á²Å¸ãÃ÷°×ÆäÓ÷¨.ËùÒÔÏëÌù³öÀ´°ïÖúÐèÒª°ïÖúµÄÈË.
var
 &nb ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØͼ | ¸ÓICP±¸09004571ºÅ