代码搜索：sysutils
找到约 10,000 项符合「sysutils」的源代码
代码结果 10,000
www.eeworm.com/read/238244/13900964
~pas sendthread.~pas
unit SendThread;
interface
uses
Classes,SysUtils;
type
TSendThread = class(TThread)
private
{ Private declarations }
protected
procedure Execute; override;
procedur
www.eeworm.com/read/135737/13905541
pas unit19.pas
unit Unit19;
interface
{11111111111111111111111111111}
{用户管理窗体}
{11111111111111111111111111111}
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, For
www.eeworm.com/read/237993/13914358
txt 得到打印机状态.txt
unit PrinterStatus;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
type
TPrinterStatus = class(TComponent)
private
{ Priv
www.eeworm.com/read/237199/13972020
pas checkprevious.pas
unit CheckPrevious;
interface
uses
Windows, SysUtils;
function RestoreIfRunning(const AppHandle: THandle; MaxInstances: integer = 1): Boolean;
implementation
type
PInstanceInfo =
www.eeworm.com/read/134109/14006396
~pas datam.~pas
unit DataM;
interface
uses
SysUtils, Classes, ADODB, DB;
type
TData = class(TDataModule)
ADOConnectLogin: TADOConnection;
ADOLogin: TADOQuery;
ADOCLogin: TADOCommand;
www.eeworm.com/read/134109/14006549
pas datam.pas
unit DataM;
interface
uses
SysUtils, Classes, ADODB, DB;
type
TData = class(TDataModule)
ADOConnectLogin: TADOConnection;
ADOLogin: TADOQuery;
ADOCLogin: TADOCommand;
www.eeworm.com/read/134062/14011740
pas gridsort.pas
unit GridSort;
interface
uses Classes,SysUtils,Grids;
//Sorting Stuff
type
TSortStyle = (ssAutomatic, ssAlphabetic, ssNumeric, ssDate);
TSortDirection = (sdAscending, sdDescending);
www.eeworm.com/read/133620/14033464
pas dmoldonlinenote.pas
unit DMOldOnlineNote;
interface
uses
SysUtils, Classes, DB, ADODB;
type
TDM = class(TDataModule)
ADOCon: TADOConnection;
ADOQOnlineNote: TADOQuery;
DSOnlineNote: TDataSou
www.eeworm.com/read/235941/14040098
pas main_form.pas
{***************************
** 主窗体 **
** Hblxp 2005-4-12 **
****************************}
unit Main_Form;
interface
uses
Windows, Messages, SysUtils, Variants, Cla
www.eeworm.com/read/133474/14041407
pas umodbusclient.pas
unit uModBusClient;
interface
uses
Windows, SysUtils, Classes, SyncObjs;
const
mbUndefined = $FF;
mbReadCoils = 1;
mbReadDiscreteInputs = 2;
mbReadHoldingRegisters = 3;
mb