在主窗体和登陆窗体的PUBLIC中声明两个变量：username,pas:string;
然后在登陆成功时把用户名和密码的信息都保存为(这是在登陆窗口中设登陆窗体为form2)
username:=edit1.text;//用户名
pas:=edit2.text;//密码
在吧这个值传递到主窗体
username:=form2.username;
pas:=form2.pas;

然后在修改密码窗体中先获得这两个值!
假设主窗体名为form_main则在修改密码窗体中（这里要在修改密码窗体中声明username,oldpas:string;）
usrename:=form_main.username;
oldpas:=form_main.pas;
设新密码输入框为edit3 
然后就可以写SQL语句了！
先校验原密码输入是否正确
with adoquery1 do
begin
  ...
  ...
  sql.add('select * from 用户表 where 用户名='''+username+''' and password='''+pas+'''');
  open;
end;
if recordcount=0 then
showmessage('密码错误');
exit
else
  with adoquery1 do
  begin
    ...
    ...
    sql.add('update 用户表 set password='''+edit3.text+''' where 用户名='''+username+'''');
    execsql;
  end;