代码搜索：SysUtils
找到约 10,000 项符合「SysUtils」的源代码
代码结果 10,000
www.eeworm.com/read/317832/13496012
pas config.pas
unit Config;
interface
uses
SysUtils,Classes,DB,ADODB;
const
//连接字符串
connectionStr='Provider=SQLOLEDB.1;'+
'Password=sa;Persist Security Info=True;'+
'User ID=s
www.eeworm.com/read/317827/13496257
~pas config.~pas
unit Config;
interface
uses
SysUtils,Classes,DB,ADODB;
const
//连接字符串
connectionStr='Provider=SQLOLEDB.1;'+
'Password=a;Persist Security Info=True;'+
'User ID=sa
www.eeworm.com/read/317827/13496259
pas config.pas
unit Config;
interface
uses
SysUtils,Classes,DB,ADODB;
const
//连接字符串
connectionStr='Provider=SQLOLEDB.1;'+
'Password=sa;Persist Security Info=True;'+
'User ID=s
www.eeworm.com/read/317469/13504393
pas udm.pas
unit Udm;
interface
uses
SysUtils, Classes, DB, DBTables;
type
Tdm = class(TDataModule)
db: TDatabase;
qperson: TQuery;
dsperson: TDataSource;
Qkq: TQuery;
Dsk
www.eeworm.com/read/317469/13504404
~pas udm.~pas
unit Udm;
interface
uses
SysUtils, Classes, DB, DBTables;
type
Tdm = class(TDataModule)
db: TDatabase;
qperson: TQuery;
dsperson: TDataSource;
Qkq: TQuery;
Dsk
www.eeworm.com/read/316746/13518115
pas umark.pas
unit uMark;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type
TForm1 = class(TForm)
private
{ Private declarations }
www.eeworm.com/read/316746/13518147
pas uabout.pas
unit uabout;
interface
uses Windows, SysUtils, Classes, Graphics, Forms, Controls, StdCtrls,
Buttons, ExtCtrls;
type
TAbout = class(TForm)
Panel1: TPanel;
ProgramIcon: TImage;
www.eeworm.com/read/316498/13522034
dpr project1.dpr
program Project1;
uses
windows,
Forms,
SysUtils,
Unit1 in 'Unit1.pas' {FAdmin};
{$R *.res}
var
i: integer;
begin
if FindWindow(nil,'公文信息发布程序') 0 then
applicatio
www.eeworm.com/read/315969/13533528
~pas upublic.~pas
unit uPublic;
interface
uses
classes, comctrls, registry,Sysutils,windows,Printers,Dialogs;
Const
UserIDLength = 10;
CodeLength = 10;
GroupIDLength = 2;
var
DBName : str
www.eeworm.com/read/315969/13533558
pas udata.pas
unit uData;
interface
uses
SysUtils, Classes, DB, ADODB;
type
TdmPer = class(TDataModule)
acPer: TADOConnection;
private
{ Private declarations }
public
{ Public de