代码搜索：sysutils
找到约 10,000 项符合「sysutils」的源代码
代码结果 10,000
www.eeworm.com/read/201189/15414296
pas statusf.pas
unit StatusF;
interface
uses
SysUtils, Windows, Messages, Classes, Graphics, Controls,
Forms, Dialogs, StdCtrls;
type
TStatus = class(TForm)
Label1: TLabel;
Label2: TLabel;
www.eeworm.com/read/201189/15414369
pas second.pas
unit Second;
interface
uses
SysUtils, Windows, Messages, Classes, Graphics, Controls, Forms, Dialogs;
type
TForm2 = class(TForm)
private
{ Private declarations }
public
www.eeworm.com/read/201189/15414537
pas childf.pas
unit ChildF;
interface
uses
SysUtils, Windows, Messages, Classes, Graphics, Controls,
Forms, Dialogs;
type
TChildForm = class(TForm)
private
{ Private declarations }
publi
www.eeworm.com/read/201189/15414562
pas editform.pas
unit EditForm;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;
type
TForm2 = class(TForm)
Memo1: TMemo;
private
{ Priv
www.eeworm.com/read/201189/15414583
pas mwform4.pas
unit MWForm4;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
type
TForm4 = class(TForm)
private
{ Private declarations }
public
www.eeworm.com/read/200996/15418527
pas uitestimp.pas
unit uItestImp;
interface
uses SysUtils,uItestInf;
type
TTest=class(Tinterfacedobject,ITest)
public
function xx:integer;stdcall;
end;
var
Test:TTest;
implementation
www.eeworm.com/read/200811/15424304
pas uwell.pas
unit Uwell;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, jpeg, ExtCtrls, StdCtrls;
type
TFwell = class(TForm)
img1: TImage;
www.eeworm.com/read/200809/15424453
dpr regserver.dpr
program RegServer;
uses
Forms,
Windows,
SysUtils,
Registry;
{$R *.res}
var
sPath:String;
begin
Application.Initialize;
sPath:=ExtractFilePath(Application.ExeName);
www.eeworm.com/read/200183/15438851
pas dm.pas
unit dm;
interface
uses
SysUtils, Classes, DB, ADODB;
type
TDM1 = class(TDataModule)
qry1: TADOQuery;
ds1: TDataSource;
qry2: TADOQuery;
ds2: TDataSource;
ds3:
www.eeworm.com/read/113884/15444991
pas unit1.pas
unit Unit1;
interface
uses Windows, SysUtils, Classes, Graphics, Forms, Controls, StdCtrls,
Buttons, ExtCtrls;
type
TOKRightDlg = class(TForm)
OKBtn: TButton;
CancelBtn: TButt