代码搜索:integer
找到约 10,000 项符合「integer」的源代码
代码结果 10,000
www.eeworm.com/read/365688/9851178
pas hhexdump.pas
// Hex Dump Viewer for "huge data"
unit hHexDump;
interface
uses
SysUtils, Windows, Messages, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, ExtCtrls;
const
MAXDIGITS = 16
www.eeworm.com/read/365688/9851185
pas helpers.pas
unit helpers;
interface
uses windows, commctrl;
function Byte2Hex(value: byte): shortstring;
function Word2Hex(value: Word): shortstring;
function Byte2Bin(v : byte) : shortstring;
fun
www.eeworm.com/read/169489/9856605
pas unit2.pas
{*******************************************************}
{ }
{ Delphi Visual Component Library }
{ ClientDataSet
www.eeworm.com/read/169489/9856907
pas makemap1.pas
unit makemap1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
ExtCtrls, Buttons, StdCtrls, ComCtrls, Menus, ToolWin;
type
TForm1 = class(TFo
www.eeworm.com/read/169489/9856933
pas unit1.pas
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
ExtCtrls, shellapi,Menus, Grids, ExtDlgs, Buttons, StdCtrls,inifiles;
type
re=recor
www.eeworm.com/read/365532/9858060
bas module1.bas
Attribute VB_Name = "Module1"
Public fMainForm As frmMain
Public flagTedit As Boolean
Public flagRedit As Boolean
Public flagBedit As Boolean
Public flagCedit As Boolean
Public gintCmode As Inte
www.eeworm.com/read/169489/9858322
pas fmxwin.pas
unit FMXWin;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, FileCtrl, Grids, Outline, DirOutln, Tabs, ExtCtrls, Menus;
type
TFMFor
www.eeworm.com/read/169489/9858431
pas makemap1.pas
unit makemap1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
ExtCtrls, Buttons, StdCtrls, ComCtrls, Menus, ToolWin;
type
TForm1 = class(TFo
www.eeworm.com/read/365472/9862418
bas smart.bas
Attribute VB_Name = "modSmart"
Declare Function PowerOn Lib "smartdll2.dll" () As Integer
Declare Function PowerOff Lib "smartdll2.dll" () As Integer
Declare Function OpenComm Lib "smartdll2.d
www.eeworm.com/read/365472/9862494
frm frmchange.frm
VERSION 5.00
Begin VB.Form frmChange
BorderStyle = 3 'Fixed Dialog
Caption = "调换班"
ClientHeight = 4335
ClientLeft = 45
ClientTop = 330
Cl