代码搜索结果
找到约 10,000 项符合
U 的代码
u_data.dfm
object DataM: TDataM
OldCreateOrder = False
Left = 189
Top = 111
Height = 438
Width = 337
object Conn: TADOConnection
Connected = True
ConnectionString =
'Provider=
u_search.~pas
unit U_search;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, DBCtrls, Mask, dbcgrids;
type
TF_search = class(TForm)
u_crypt.pas
unit U_crypt;
interface
uses classes;
const
C1=52845;
C2=22719;
function Encrypt(s:string;key:word):string;
function Decrypt(s:string;key:word):string;
implementation
function encrypt(s:s
u_main.dfm
object F_main: TF_main
Left = 128
Top = 81
Width = 810
Height = 605
Caption = #20154#20107#31649#29702#31995#32479
Color = clAppWorkSpace
Font.Charset = DEFAULT_CHARSET
Font.Co
u_about.pas
unit U_about;
interface
uses Windows, SysUtils, Classes, Graphics, Forms, Controls, StdCtrls,
Buttons, ExtCtrls;
type
TF_about = class(TForm)
Panel1: TPanel;
ProgramIcon: TIma