代码搜索结果
找到约 10,000 项符合
U 的代码
hfsjk_u.pas
unit hfsjk_u;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, Buttons, ComCtrls, FileCtrl;
type
Tfrm_hfsjk = class(TForm)
grxx_u.pas
unit grxx_u;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, DB, StdCtrls, Mask, DBCtrls, ADODB, Buttons, ExtCtrls, ExtDlgs,StrUtils;
sfsb_u.dfm
object frm_sfsb: Tfrm_sfsb
Left = 312
Top = 284
Caption = #24352#23478#30028#24066#29305#31181#34892#19994#20154#21592#30331#35760#31995#32479
ClientHeight = 374
ClientWidth = 544
Co
hfsjk_u.dfm
object frm_hfsjk: Tfrm_hfsjk
Left = 0
Top = 0
Caption = #24674#22797#25968#25454#24211
ClientHeight = 227
ClientWidth = 351
Color = clBtnFace
Font.Charset = ANSI_CHARSET
Font.C
public_u.pas
unit public_u;
interface
uses
Windows,Dialogs, SysUtils;
var
cardtype_str_v:string;
com_num,cardtype_num_v:integer;
function openport():integer;
function cardtype_num(cardtype_str
login_u.pas
unit login_u;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, DB, DBTables, StdCtrls, jpeg, ExtCtrls, Buttons, ADODB;
type
Tlogin =
about_u.dfm
object frm_About: Tfrm_About
Left = 536
Top = 250
BorderIcons = [biSystemMenu]
BorderStyle = bsSingle
Caption = #20851#20110
ClientHeight = 198
ClientWidth = 428
Color = clBtnF
grxx_u.dfm
object frm_grxx: Tfrm_grxx
Left = 0
Top = 0
Caption = #20010#20154#20449#24687
ClientHeight = 583
ClientWidth = 747
Color = clBtnFace
Font.Charset = ANSI_CHARSET
Font.Color = c
about_u.pas
unit about_u;
interface
uses Windows, SysUtils, Classes, Graphics, Forms, Controls, StdCtrls,
Buttons, ExtCtrls;
type
Tfrm_About = class(TForm)
Panel1: TPanel;
ProgramIcon: TI
xgmm_u.pas
unit xgmm_u;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, DB, ADODB, Buttons;
type
Tfrm_xgmm = class(TForm)
DataS