delphi ´«Êä¶à¸öÎļþ - Delphi / ÍøÂçͨÐÅ/·Ö²¼Ê½¿ª·¢
дµÃ³ÌÐòÒѾ¿ÉÒÔ´«ÊäÒ»¸öÎļþ¡£
ÎÒÏÖÔÚµÄÎÊÌâÊÇ£¬ÎÒÏë´«Êä¶à¸öÎļþÔõô°ì£¿
²»ÖªµÀÄãÔõôÉè¼ÆµÄ
unit Frm_Client;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, FileCtrl,ScktComp, StdCtrls, XPMan;
const
Buffersize=1048576; //41943040; //40MB
CPort = 6656;
type
TForm1 = class(TForm)
SClient: TClientSocket;
BtnConn: TButton;
BtnSelFile: TButton;
GBxStatus: TGroupBox;
MmStatus: TMemo;
EDIPAddr: TEdit;
Label1: TLabel;
OpenDialog1: TOpenDialog;
Label2: TLabel;
EResourceFiles: TEdit;
Label3: TLabel;
ListBox1: TListBox;
BtnsSplit: TButton;
BtnAdd: TButton;
BtnBrowse: TButton;
EDestination: TEdit;
Label6: TLabel;
SaveDialog1: TSaveDialog;
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure FormCreate(Sender: TObject);
procedure FormDestroy(Sender: TObject);
procedure SClientConnect(Sender: TObject; Socket: TCustomWinSocket);
procedure SClientDisconnect(Sender: TObject; Socket: TCustomWinSocket);
procedure SClientRead(Sende
Ïà¹ØÎÊ´ð£º
Çë½Ì¸÷·¸ßÊÖ¡£ÎäÁÖǰ±²¡£ÎÒ½«B.EXE×ö³É×ÊÔ´Îļþ£¬È»ºó¼Óµ½123.dllÖС£ÓÃA.EXEÀ´µ÷ÓÃ123.dllÖеÄB.EXE
Çë¸÷λǰ±²°ïæָ½ÌÏ¡£A.exeÈçºÎÀ´µ÷ÓÃdllÖеÄexe£¿´úÂëÓÖ¸ÃÈçºÎд£¿
ÎÞÈ˻شð£¿
×ö³É×ÊÔ´Î ......
delphi ÊÖ¶¯×°ÔØÇý¶¯ÎļþÌáʾ£º
RROR (1058): The driver is marked as disabled (Start=4) in its service database entry.
ÊDz»ÊÇÕâ¸öÇý¶¯±ØÐèÒªÓÃINFÀ´°²×°¡£¡£ÓÃ×Ô´øµÄINFÀ´×°ÊÇÕý³£µÄ¡£ÓÃÊÖ¶¯×°ÔؾÍÌáʾÈçÉÏ¡ ......
¾ßÌåÒªÇóÓ뱨³êQQ729851670
771234717
¡°Æ´Òô±à³Ì¡±ÊÇʲôÒâ˼
ÒýÓÃ
¡°Æ´Òô±à³Ì¡±ÊÇʲôÒâ˼
1.¸øÒ»¸ö×Ö¿ÉÒÔÏÔʾƴÒô£¬¶àÒô×ֵϰÄÜÏÔʾ¶ÔÓ¦µÄ¶à¸öÆ´Òô
2.¶Ô°üº¬¶àÒô×ֵĴÊÓïÖÇÄÜʶ±ð¸ø³öÆ´Òô¡£
3.¶ÔÒ»¶Î ......
Àý×Ó³ÌÐò¼û¸½¼þ£¬ÓÃDelphi 7½øÐбàÒë
ÎÊÌâ´úÂëΪ
Delphi(Pascal) code:
if Node.ChildNodes <> nil then
begin
for i := 0 to Node.ChildNodes.Count - 1 do
begin
cNode := N ......
procedure WMNCHitTest(var Msg:TWMNCHitTest); message WM_NCHITTEST;
procedure WMNCPaint(var Msg: TWMNCPaint); message WM_NCPAINT;
ÇëÎÊһϣ¬ÕâÁ½¸öº¯ÊýÊÇÉÏÃæÒâ˼£¬ÔÚÉÏÃæÊ±ºòµ÷Óã¬message WM_NCHITTEST; ......