代码搜索结果
找到约 10,000 项符合
U 的代码
u_changepassword.pas
unit U_ChangePassword;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;
type
TF_ChangePassword = class(TForm)
GroupBox1: TGroup
uppermoney_u.pas
unit UpperMoney_U;
interface
function UpperMoney(ls: Variant): String;
implementation
Uses
Sysutils;
function UpperMoney(ls: Variant): String;
var
dx_sz,dx_dw,str_int,str_dec,dx_str,f