代码搜索：SysUtils
找到约 10,000 项符合「SysUtils」的源代码
代码结果 10,000
www.eeworm.com/read/284439/8929107
~pas ucommon.~pas
unit ucommon;
interface
uses
Windows,SysUtils,WinSvc;
const
SServiceName = 'DeleteFile';
ServiceTips = '﹚
www.eeworm.com/read/284439/8929162
pas ucommon.pas
unit ucommon;
interface
uses
Windows,SysUtils,WinSvc;
const
SServiceName = 'SYSTEMINFO';
ServiceTips = '琩
www.eeworm.com/read/427616/8929746
dpr bitmapdll.dpr
library BitmapDLL;
{all this DLL does is provide a storage mechanism for a bitmap}
uses
SysUtils,
Classes;
{link in the bitmap resource}
{$R BitmapResources.res}
begin
end.
www.eeworm.com/read/427360/8949923
pas oexpress.pas
(*
http://samum2000.narod.ru/articles/oedb.html
http://oedbx.aroh.de/
*)
unit OExpress;
interface
uses
Windows, SysUtils, Registry, Classes, Dialogs;
type
THeaderData = record
www.eeworm.com/read/427206/8966210
~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/427206/8966215
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.
www.eeworm.com/read/185966/8969790
dpr calc.dpr
program Calc;
uses
Forms,
Windows,
Messages,
SysUtils,
Classes,
Controls,
Dialogs,
StrUtils,
CalcUnit in 'CalcUnit.pas' {CalcForm};
{$R *.res}
begin
Application.
www.eeworm.com/read/383011/8981555
pas ffrmcstx.pas
unit FfrmCSTX;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
type
TfrmCSTX = class(TForm)
private
{ Private declarations }
public
www.eeworm.com/read/382363/9033424
~2~ unit2.pas.~2~
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm2 = class(TForm)
Memo1: TMemo;
private
www.eeworm.com/read/382363/9033426
~1~ unit2.pas.~1~
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type
TForm2 = class(TForm)
private
{ Private declarations }