代码搜索:SysUtils
找到约 10,000 项符合「SysUtils」的源代码
代码结果 10,000
www.eeworm.com/read/138009/13273677
pas jfzcunit1.pas
unit JFZCUnit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type
TForm1 = class(TForm)
private
{ Private declarations }
www.eeworm.com/read/324027/13293909
~pas untlogo.~pas
unit untLOGO;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ExtCtrls;
type
TFrmLOGO = class(TForm)
Image1: TImage;
privat
www.eeworm.com/read/324027/13294032
pas untlogo.pas
unit untLOGO;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ExtCtrls;
type
TFrmLOGO = class(TForm)
Image1: TImage;
privat
www.eeworm.com/read/238855/13319376
pas fmdbu.pas
unit FMDBU;
interface
uses
SysUtils, Classes, DB, ADODB;
type
TfmDB = class(TDataModule)
AdoHouse: TADOConnection;
private
{ Private declarations }
public
{ Public
www.eeworm.com/read/323670/13327040
pas udm.pas
unit Udm;
interface
uses
SysUtils, Classes, DB, DBTables;
type
Tdm = class(TDataModule)
db: TDatabase;
qperson: TQuery;
dsperson: TDataSource;
Qkq: TQuery;
Dskq
www.eeworm.com/read/238743/13327685
pas covtest.pas
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
Memo1: TMemo;
private
www.eeworm.com/read/137315/13330371
pas mainfrm.pas
unit MainFrm;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TfrmMain = class(TForm)
Label1: TLabel;
privat
www.eeworm.com/read/137315/13330736
dpr dllshowform.dpr
library DLLShowForm;
uses
SysUtils,
Classes,
DLLFrm in 'DLLFrm.pas' {frmDLL};
{$R *.res}
//输出ShowDLLModalForm,ShowDLLForm接口方法,以便外部程序调用
exports
ShowDLLModalForm, ShowDLLForm;
begin
www.eeworm.com/read/137231/13337638
~dpr project1.~dpr
program Project1;
{$APPTYPE CONSOLE}
uses
SysUtils,
GADelphi in 'GADelphi.pas';
var
ga:TGA;
begin
ga:=TGA.Create;
ga.Go;
//ga.Free;
readln;
end.
www.eeworm.com/read/137231/13337642
dpr project1.dpr
program Project1;
{$APPTYPE CONSOLE}
uses
SysUtils,
GADelphi in 'GADelphi.pas';
var
ga:TGA;
lchrom,chromsize:integer;
begin
ga:=TGA.Create;
ga.Go;
readln;
end.