代码搜索：sysutils
找到约 10,000 项符合「sysutils」的源代码
代码结果 10,000
www.eeworm.com/read/242258/13084416
~pas data.~pas
unit data;
interface
uses
SysUtils, Classes, DB, ADODB;
type
Tt_Data = class(TDataModule)
Connection1: TADOConnection;
Query1: TADOQuery;
Operator: TADOQuery;
Insert
www.eeworm.com/read/238855/13319362
pas msgu.pas
unit MsgU;
interface
uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, Mask, ExtCtrls, Buttons,ShellAPI,Registry,ComObj;
const
(*消息编
www.eeworm.com/read/301923/13845695
~pas u_reptslabel.~pas
unit u_RepTsLabel;
interface
uses Windows, SysUtils, Messages, Classes, Graphics, Controls,
StdCtrls, ExtCtrls, Forms, QuickRpt, QRCtrls, DB, DBTables;
type
TRepTsLabel = class(TQuickRe
www.eeworm.com/read/301923/13845699
pas u_reptslabel.pas
unit u_RepTsLabel;
interface
uses Windows, SysUtils, Messages, Classes, Graphics, Controls,
StdCtrls, ExtCtrls, Forms, QuickRpt, QRCtrls, DB, DBTables;
type
TRepTsLabel = class(TQuickRe
www.eeworm.com/read/144698/5748876
pas unit1.pas
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;
type
TForm1 = class(TForm)
Label1: TLabel;
private
{ Priva
www.eeworm.com/read/144698/5749150
pas unit1.pas
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;
type
TForm1 = class(TForm)
Label1: TLabel;
private
{ Priva
www.eeworm.com/read/143581/5756900
dpr mixcode.dpr
program MixCode;
{$APPTYPE CONSOLE}
uses
SysUtils,Dialogs;
var
pMsg:pchar;
label lbl_skipok;
label lbl_addr;
begin
{ TODO -oUser -cConsole Main : Insert code h
www.eeworm.com/read/487944/6502655
~pas unit8.~pas
unit Unit8;
interface
uses Windows, SysUtils, Messages, Classes, Graphics, Controls,
StdCtrls, ExtCtrls, Forms, QuickRpt, QRCtrls;
type
TQuickReport8 = class(TQuickRep)
private
www.eeworm.com/read/487944/6502691
pas unit8.pas
unit Unit8;
interface
uses Windows, SysUtils, Messages, Classes, Graphics, Controls,
StdCtrls, ExtCtrls, Forms, QuickRpt, QRCtrls;
type
TQuickReport8 = class(TQuickRep)
private
www.eeworm.com/read/477689/6731234
pas dataunit.pas
unit DataUnit;
interface
uses
SysUtils, Classes;
type
TDataModule1 = class(TDataModule)
private
{ Private declarations }
public
{ Public declarations }
end;
var