代码搜索：SysUtils
找到约 10,000 项符合「SysUtils」的源代码
代码结果 10,000
www.eeworm.com/read/140204/13096430
pas xkernel.pas
unit xKernel;
interface
uses Windows, SysUtils;
procedure DebugStr(S: string);
procedure DebugStrFmt(const Format: string; const Args: array of const);
implementation
uses xStrings, xU
www.eeworm.com/read/241888/13110723
pas voltree.pas
unit VolTree;
interface
uses
Windows, SysUtils, Classes, Controls, ComCtrls, DB,
ExtCtrls;
type
TGetNewIDEvent =
function(Sender: TObject; Table: TDataSet): string of object;
www.eeworm.com/read/326818/13115045
pas unit1.pas
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type
TForm1 = class(TForm)
private
{ Private declarations }
www.eeworm.com/read/241740/13123085
pas repmess.pas
// create 李泽伦
unit REPMESS;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;
type
TREPmessform = class(TForm)
Label1: TLabel;
www.eeworm.com/read/326605/13130507
~pas u_data.~pas
unit U_data;
interface
uses
SysUtils, Classes, DB, ADODB;
type
TData = class(TDataModule)
G_Con: TADOConnection;
G_Rst: TADOQuery;
private
{ Private declarations }
www.eeworm.com/read/325825/13182336
pas umain.pas
unit uMain;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TMainForm = class(TForm)
Label1: TLabel;
private
www.eeworm.com/read/325824/13182390
pas umain.pas
unit uMain;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TMainForm = class(TForm)
Label1: TLabel;
private
www.eeworm.com/read/325823/13182437
pas umain.pas
unit uMain;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TMainForm = class(TForm)
Label1: TLabel;
private
www.eeworm.com/read/325822/13182492
pas umain.pas
unit uMain;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TMainForm = class(TForm)
Label1: TLabel;
private
www.eeworm.com/read/240957/13184723
pas uitestimp.pas
unit uItestImp;
interface
uses SysUtils,uItestInf;
type
TTest=class(Tinterfacedobject,ITest)
public
function xx:integer;stdcall;
end;
var
Test:TTest;
implementation