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

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


Ïà¹ØÎÊ´ð£º

Çë½ÌÏ£¬ÓÃDELPHI×öSOHUµÄ - Delphi / ·Ç¼¼ÊõÇø

Ò»°ã¶¼ÊÇÔõô½Ó»îµÄ£¿
ÊÕÈëÔõôÑù
sohu£¿soho£¿

sohu ¿ÉÄÜÊÇsmall office house unit
С°ì¹«ÊÒ£¬°Ñ¼Ò±ä³Éµ¥Î»¡£

È¥Íþ¿ÍÍø°¡,ºÜ¶à¸öÄØ,»¹ÓÐÍâ°üµÄÍøÕ¾

ѧϰѧϰ¡£

ÏÖÔÚDelphi×ö¶«Î÷²»ÐÐÁË,´¦ÓÚÌÔÌ­×´ ......

DelphiµÄÓï·¨ÎÊÌâ - Delphi / ÓïÑÔ»ù´¡/Ëã·¨/ϵͳÉè¼Æ

Àý×Ó³ÌÐò¼û¸½¼þ£¬ÓÃDelphi 7½øÐбàÒë
ÎÊÌâ´úÂëΪ 
Delphi(Pascal) code:
if Node.ChildNodes <> nil then
begin
for i := 0 to Node.ChildNodes.Count - 1 do
begin
cNode := N ......

sqlÓï¾ä´íÎó - Delphi / Êý¾Ý¿âÏà¹Ø

¶¨Òå±äÁ¿s,sqlΪstringÀàÐÍ£¬sΪº¯Êý²ÎÊý£¬sql£º='select field1 from table1 where'+s;ÔËÐÐʱs¸³ÖµÎªid>7»òÕßid<7¡¢id=7,µ«ÊÇÔËÐÐʱ×ÜÊdzö´í£¬Çë¸÷λ°ïÎÒ¸Ä´í£¬¶àл£¡

showMessage(sql)Ï¿´¿´
sql£º='sel ......

delphiÔõô¿ØÖÆUSB - Delphi / VCL×é¼þ¿ª·¢¼°Ó¦ÓÃ

ÒÔÇ°ÖмäÕ¾ÊǵçÄÔͨ¹ý´®¿Ú¿ØÖƵģ¬ÏÖÔڸijÉÁËUSB½Ó¿Ú£¬ÇëÎÊÒªÔõô×ö°¡£¿Çó¸ßÊÖÖ¸µãÒ»ÏÂ
ÊÇusbת´®¿ÚÂð£¿ÄÇÓ¦¸Ã»¹ÊÇ¿ÉÒÔ°´´®¿Ú²Ù×÷µÄ£¬Ö»ÊÇËٶȲ»ÄÜÌ«¸ß

Èç¹û²»ÊÇusbת´®¿Ú£¬Çë²éÔÄusbÇý¶¯µÄsdk˵Ã÷¡£

Õâ¸öÊDz ......

DelphiÒì³£ - Delphi / ·Ç¼¼ÊõÇø

³ÌÐò¹Ø±ÕµÄʱºò³öÏÖÒì³££º
exception EAccessviolation in moudule JGJC.exe at C08BB35B Access wiolation at address C08BC35B.Read of address C08BC35B.
ÇëÎÊÒ»ÏÂÕâÊÇʲôÒâ˼°¡£¿
·ÃÎÊÔ½½ç
ÊÇ·ñ·ÃÎÊÁËÒѱ»Ê ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØͼ | ¸ÓICP±¸09004571ºÅ