代码搜索：sysutils
找到约 10,000 项符合「sysutils」的源代码
代码结果 10,000
www.eeworm.com/read/137231/13337656
~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/13337659
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/137004/13348377
pas wait.pas
unit wait;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, ExtCtrls;
type
TForm2 = class(TForm)
Label1: TLabel;
Image1: T
www.eeworm.com/read/137004/13348378
pas setcomm.pas
unit setComm;
interface
uses
SysUtils, Windows, Messages, Classes, Graphics, Controls,
StdCtrls, ExtCtrls, Forms;
type
TfmSetComm = class(TForm)
btnOK: TButton;
btnCancel:
www.eeworm.com/read/322103/13389811
pas datalink.pas
unit datalink;
interface
uses
SysUtils, Classes, DB, ADODB;
type
TDataConnection = class(TDataModule)
con: TADOConnection;
private
{ Private declarations }
public
{
www.eeworm.com/read/321962/13391956
~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/321962/13392006
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/321962/13392043
pas urep.pas
unit Urep;
interface
uses Windows, SysUtils, Messages, Classes, Graphics, Controls,
StdCtrls, ExtCtrls, Forms, QuickRpt, QRCtrls;
type
Trepfrm = class(TQuickRep)
private
public
www.eeworm.com/read/321962/13392044
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/319805/13441793
pas idform.pas
unit idform;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
Tgetidform = class(TForm)
searchID: TListBox;