• 所有问题

    • delphi有关修改密码问题

    delphi中设置密码修改edit1.edit2.edit3.edit4分别为用户名，旧密码 ，新密码，确认新密码button1,button2分别为 修改，取消如何修改数据库中的密码数据，如何实现这个功能。希望高手提供下具体的实现方法及代码谢谢了

    举报该问题
    推荐答案   2012-06-04
    一.修改按纽
    1.验证旧密码是否正确，不正确的话给予提示。
    2.验证两次密码是否一致，不一致的话给予提示。
    3.验证输入的新密码是否合法。如长度限制，大小写限制，特殊字符限制等，不合法的话给予提示。
    3.上面3步都的话修改数据库的密码，并显示是否成功。
    二.取消按纽
    1.直接清空三个edit，同时可以关闭修改密码窗体。
    温馨提示：答案为网友推荐，仅供参考
    其他回答
    第1个回答  2012-05-28
    这个，很简单，自己想想吧，如果你自己实现不了，那你可能真不适合做编程工作！
    第2个回答  2012-06-08
    CatchZLJ 已经把思路都说了，你自己要学会自己去写，要不然水平永远上不去
    相似回答
    delphi中的修改密码功能 Edit1和Edit2在输入的时候没问题,但Edit3收时...答：你在Edit3KeyPress事件中将连续输入的路给堵死了。你目前的处理是，只要不是回车键就弹出“可以修改密码”消息。将语句:else showmessage('可以修改密码');去掉就行了。注，别忘记将上一个end补上分号。
    delphi 7 ADOQuery读取数据并修改密码答：Data.ADO_user.fieldbyname('密码').AsString := suiEdit3.text;Data.ADO_user.Post;suiMessageDialog1.text := '密码修改成功！';suiMessageDialog1.ShowModal;suiEdit2.text := '';suiEdit3.text := '';suiEdit4.text := '';close;end;
    delphi,弄个修改密码,可无论输入的“原密码”对与错,都提示“输入的原...答：Label5.Caption:=main.StatusBar1.Panels[1].Text;//获取显示在主页面的登录用户名 with dm.UserQuery do begin close;SQL.clear;SQL.add('select 密码 from users where 用户名 ='''+trim(Label5.Caption)+''');open;s :=fieldbyname('密码').asstring;edit4.Text:=s;end;首先 看这里...
    adotable修改密码出现问题delphi答：trim(FieldByName('password').Value)= edit6.Text then begin Edit;if edit7.text = edit8.Text then begin FieldByName('password').asstring := edit8.Text;Post;next;showmessage('密码修改成功!');close;end else showmessage('两次输入不一致!')end else showmessage('旧密码错误！')else s...
    Delphi的密码修改,原密码、新密码、确认密码,帮我看看下面的代码,密 ...答：应该在以下代码之前加close sql.Clear;sql.Add(sqlstr);至于空白项 你就在ado组件栏 拖TAdoQuery就可以了（看你代码 反正在Form2上有ADOConnection1 ）点击你所用的Form2.ADOConnection1 ConnectionString属性 配置连接数据库的连接 设置Form2.ADOConnection1的loginprompt为false 设置AdoQuery1的...
    delphi连接SQL修改密码的空间有哪些?答：ADOConnection双击组件就可以选择数据源；ADOQuery组件和Query组件的使用方法类似，通过SQL属性获取某些数据，满足SQL语句的语法格式，使用方法和ADOTable组件类似，但ADOTable通过TableName属性来定制数据表；ADODataSet可以直接与一个表进行连接，也可以执行SQL语句，还可以执行存储过程。
    delphi语言 设置用户登录 密码 用户密码修改答：showmessage('请确认登录的用户名和密码是否正确！');edit1.Text:='';maskedit1.Text:='';end;finally Free;end;end;end;//'退出'按钮单击关闭程序；procedure TForm1.Button2Click(Sender: TObject);begin Close;end;procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);begi...
    我用delphi做了一个登录界面,,做了一个主界面,在主界面中做了一个密 ...答：(Edit4.Text <> Edit3.Text) then begin ShowMessage('新密码和确认密码不一致！');Edit3.Clear;Edit4.Clear;Edit3.SetFocus;end else begin dm.ADOUser.Edit;dm.ADOUser.FieldByName('password').AsString := Edit3.Text;dm.ADOUser.Post;ShowMessage('密码修改成功！');close;end;end;...
    大家正在搜
    密保问题修改密码电脑修改密码怎么修改qq修改密码怎么修改忘记密保问题怎么修改密保知道密保问题怎么改密码现在还能用密保问题改密码吗台式电脑修改密码怎么修改怎么使用密保答案修改密码旧版密保问题找回密码