代码搜索：integer
找到约 10,000 项符合「integer」的源代码
代码结果 10,000
www.eeworm.com/read/290653/8469699
pas servmain.pas
unit ServMain;
{ This is "Application Server" for this demo. You must compile and run
this program once before running the client application. The remote
data module (ServData) implments th
www.eeworm.com/read/290627/8470976
bas guochengji2.bas
Attribute VB_Name = "guochengji2"
Option Explicit
Public Sub MHpage(number As Integer, Line1 As Integer, Line2 As Integer, page As Integer, mm() As Integer, nn() As Integer)
Dim i As Integer
D
www.eeworm.com/read/390304/8471812
bas example.bas
Attribute VB_Name = "Module1"
Option Explicit
Global icdev As Long
Global st As Integer
'comm function
Declare Function rf_config Lib "mwrf32.dll" (ByVal icdev%, ByVal mode%, ByVal baud%) As
www.eeworm.com/read/290592/8473683
h dmalloc_argv_loc.h
/*
* Local defines for the argv module
*
* Copyright 1995 by Gray Watson
*
* This file is part of the argv library.
*
* Permission to use, copy, modify, and distribute this software for
* any
www.eeworm.com/read/189358/8473846
pas udefine.pas
unit uDefine;
interface
uses Windows, Messages, Classes, StrUtils, SysUtils;
const
FLAG_SHUTDOWN = EWX_SHUTDOWN or EWX_FORCE or EWX_POWEROFF;
type
TKeyVisual = record
Name: string;
www.eeworm.com/read/189312/8475964
bas declaremodule.bas
Attribute VB_Name = "DeclareModule"
Option Explicit
Public Declare Function setport Lib "posprinter.dll" (ByVal sPort As String) As Integer
Public Declare Function closeport Lib "posprinter.dll"
www.eeworm.com/read/290553/8476300
pas unit_wxp.pas
unit Unit_wxp;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, DB, ComCtrls, DBTables, Grids, DBGrids, ExtCtrls, StdCtrls,
Mask, DBCtrl
www.eeworm.com/read/390149/8481840
bas module1.bas
Attribute VB_Name = "Module1"
'定义一个常量，这个常量的大小由服务端程序中的配置数据的偏移决定
'可以在服务端程序中定义一个由同一个字符组成的长字符串常量，然后用winhex等16进制编辑软件打开服务端程序找到这一串字符来确定
'这里的1a4c就是服务端中字符"X"的偏移，如果修改了服务端，这里也要作相应的调整
Public Const OffSet = &H ...
www.eeworm.com/read/290453/8482278
bas module1.bas
Attribute VB_Name = "Module1"
Option Explicit
Public EditCode_Value As Integer ' 当前选中的编辑框代码
Dim Connection As ADOCE.Connection
Dim table, indextable As ADOCE.Recordset
Set Connection = Cre
www.eeworm.com/read/290453/8482288
bas module1.bas
Attribute VB_Name = "Module1"
Option Explicit
Public EditCode_Value As Integer ' 当前选中的编辑框代码
Public Connection As ADOCE.Connection
Public table, indextable As ADOCE.Recordset
Set Connection = Cr