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

DelphiÖÐ×ÊÔ´ÎļþʹÓ÷½·¨Ïêϸ½²Êö


Ò»£®±àд RC ½Å±¾Îı¾
¡¡¡¡ÓüÇʱ¾»òÆäËüÎı¾±à¼­Æ÷±àдһ¸öÀ©Õ¹ÃûΪ“.rc”µÄÎļþ¡£¸ñʽÈçÏ£º
¡¡¡¡AVI ÎÞÉù¶¯»­
¡¡¡¡BITMAP λͼÎļþ
¡¡¡¡CURSOR ¹â±êÎļþ
¡¡¡¡ICON ͼ±êÎļþ
¡¡¡¡WAVE ÉùÒôÎļþ
      ÒÔÉÏËùÁоùΪ±ê×¼×ÊÔ´ÀàÐÍ£¬Ò²¿ÉÒÔ¸ø×ÊÔ´×Ô¶¨ÒåÒ»¸öÀàÐÍ£¬È磺“mytype”¡£²»¹ýÁ½ÕßÔÚµ÷Ó÷½Ê½ÉÏÓÐЩ²»Í¬¡£
 
¶þ£®¸ù¾Ý RC ½Å±¾Îļþ±àÒë³É RES ×ÊÔ´Îļþ
¡¡¡¡ÔÚÃüÁîÌáʾ·ûÖÐÊäÈëÒÔÏÂÄÚÈÝ£º brcc32 FileName.rc //×¢£ºbrcc32.exeÔÚDelphiX\BinĿ¼ÖÐ
 
Èý£®ÔÚDelphiµ¥ÔªÖмÓÈë×ÊÔ´Îļþ
        ½«Éú³ÉµÄ RES ×ÊÔ´Îļþ¸´ÖƵ½ÏàÓ¦³ÌÐòËùÔÚµÄĿ¼ÖУ¬ÔÚµ¥ÔªÎļþÖеē{$R *DFM}”ºóÃæ¼ÓÉÏ“{$R FileName.res}”£¬±àÒëºó×ÊÔ´Îļþ¾Í±»°üº¬ÔÚ¿ÉÖ´ÐÐÎļþÖÐÁË¡£
        ËµÃ÷£ºÈç¹ûÏÓ2¡¢3Á½²½Âé·³£¬¿ÉÒÔ²ÉÓøü¼ò±ãµÄ×ö·¨£¬¼´£º½« RC ÎļþÖ±½ÓÌí¼Óµ½ÏîÄ¿ÖУ¬ÔÚ±àÒëDelphiÏîĿʱ£¬»á×Ô¶¯±àÒë¸Ã×ÊÔ´Îļþ¡£
 
ËÄ£®×ÊÔ´Îļþµ÷ÓÃʾÀý
¡¡¡¡£¨1£©´æÈ¡×ÊÔ´ÎļþÖеÄλͼ
         //RC: testBmp bitmap res\test.bmp
         Image1.Picture.Bitmap.LoadfromResourceName(HInstance, 'res\test.bmp');
         //RC: testBmp bmptype res\test.bmp
      var
 resStream: TResourceStream;
      begin
          resStream := TResourceStream.Create(HInstance, 'testBmp', 'bmptype');
          Image1.Picture.Bitmap.LoadfromStream(resStream);
          resStream.Free;
      end;
      Çë×¢ÒâÉÏÃæÁ½ÖÖµ÷Ó÷½Ê½µÄ²»Í¬Ö®´¦¡£
 
£¨2£©´æÈ¡×ÊÔ´ÎļþÖеÄͼ±ê
         ½«Í¼±ê·ÅÔÚ×ÊÔ´ÎļþÖУ¬¿ÉÒÔʵÏÖ¶¯Ì¬¸Ä±äÓ¦ÓóÌÐòµÄͼ±ê¡£
         //RC: testIcon icon res\test.ico
         Application.Icon.Handle := LoadIcon(HInstance, 'testIcon');
 
£¨3£©´æÈ¡×ÊÔ´ÎļþÖеÄAVI¶¯»­
         //RC:


Ïà¹ØÎĵµ£º

[delphi×é¼þ] WebbrowserµÄʹÓÃ

delphiÖÐWebbrowserµÄʹÓÃ
1.»ñµÃÍøÒ³ÖбäÁ¿Öµ
     htmÖÐ<script> var currID=123</script>
     ³ÌÐòÖпÉÒÔÕâôµ÷Óà id := Form1.WebBrowser1.OleObject.Document.script.currID
     ÖµµÃ˵Ã÷µÄÊÇ,±äÁ¿¿ÉÒÔÊÇjavascript¶¨ÒåµÄ,Ò²¿ÉÒÔÊÇvbs ......

delphi ÖеÄdelayº¯Êý

procedure Delay(msecs:integer);
var
Tick: DWord;
Event: THandle;
begin
Event := CreateEvent(nil, False, False, nil);
try
    Tick := GetTickCount + DWord(msecs);
    while (msecs > 0) and (MsgWaitForMultipleObjects(1, Event, False, msecs, QS_ALLINPUT) <&g ......

Delphi 7ʼþµÄ¶à´¦Àí»úÖÆ


 Delphi 7ʼþµÄ¶à´¦Àí»úÖÆ
Allen Tao
2007-08-19
¡¡¡¡Ê×ÏȽâÊÍÒ»ÏÂÕâ¸öÌâÄ¿¡£ÔÚÎÒʹÓÃDelphi 7µÄ¹ý³ÌÖз¢ÏÖ£¬Ò»¸ö¶ÔÏóµÄʼþÖ»Äܱ»Ò»¸ö¹ý³Ì´¦Àí¡£Èç¹û¶à´Î¸øÕâ¸ö¶ÔÏóµÄʼþ¸³¸ø´¦ÀíʼþµÄ¹ý³Ì£¬×îºóÕæÕý´¦ÀíʼþµÄ½«ÊÇ×îºó¸³ÖµµÄÄǸö¹ý³Ì¡£ÀýÈ磬ÓÐÀàTMyClassÖж¨ÒåÁËÒ»¸öʼþOnSomeFired£¬ÔÚÀàTClientClassÖи ......

ÊÇvcµÄbug»¹ÊÇdelphiµÄbug?

×î½üÒ»Õó×Ó£¬×ÜÊDZ»Ò»¸öĪÃûÆäÃîµÄbugÀ§ÈÅ¡£×Ô¼ºÐ´µÄocx£¨.net2005£©ÔÚdelphi7Öе÷Óã¬Ã÷Ã÷ûÓÐÊÍ·ÅÖ÷¶¯ÊͷŹýÄڴ棬ȴ±»Á¬ÐøÊÍ·ÅÁËÁ½´Î¡£½á¹û£¬³ÌÐòÍ˳öʱ¾ÍdownµôÁË¡£µ±È»£¬ÕâÊÇÔÚdebugģʽϲŻá³öÏÖ£¬µ«ÊÇexeÅܵÄʱºò»áĪÃûÆæÃîµÄdownµô£¬¶øÇÒ³ö´íÍùÍùÖ¸Ïòocx£¬ÎÒÏëÒ»¶¨ºÍocxµÄµ÷ÓÃÓйء£
ÉÏÍøÕÒÁËpurify£¬boundscheck ......

delphiÖÐTreeViewʹÓÃ

TreeViewÓɽڵ㹹³É£¬½¨Ê÷ͨ¹ý¶ÔTreeView.itemsÊôÐÔ½øÐвÙ×÷¡£ItemsÊÇÒ»¸öTTreeNodes¶ÔÏó£¬ÕâÊÇÒ»¸öTTreeNode¼¯¡£
Ò»¡¢Õë¶ÔTTreeNodes,Ò²¾ÍÊÇ TreeView.Items,ÓÐÕâЩÊôÐÔ£º
1¡¢count£¬½Úµã¸öÊý¡£
2¡¢item[index]  ,ͨ¹ýindexµÃµ½½Úµã¡£
¶þ¡¢Õë¶ÔTTreeNodes,Ò²¾ÍÊÇ TreeView.Items,³£ÓõÄÌí¼Ó½ÚµãµÄ²Ù×÷ÓУº
Add ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØͼ | ¸ÓICP±¸09004571ºÅ