안녕하세요.
저번에 글을 올렸는데.

글이 다 지워졌네요.
그래서 답변을 못 읽었거든요.

그래서 다시한번더 질문하께요..
아래에 소스거든요.
에러는 안 나는뎅
실행을 시키면요.
로그인시에..
비밀번호와 아이디가 틀려두 담 폼으로 넘어가더라구.
어찌된일이지..
좀 알려주세요..
아직까지 db에 대해서 잘 몰라서요....
서툴러서.......
좀 알려주세요..
부탁드립니다.....^^

Function TForm1.Pass_chk(namek:string;passchk:string):Boolean;
begin

with Form3.Query1 do
   begin
        SQL.Clear();
        SQL.Add('SELECT *');
        SQL.Add('FROM USERdata');
        SQL.Add('WHERE UID =:namek');
        ParamByName('namek').AsString:=namek;
        Open;
        if RecordCount = 0 then
        begin
           result:=false;
           ShowMessage('입력하신 사용자가 존재 하지 않습니다.');
           Edit1.SetFocus;
           exit;
        end else
         begin
           if FieldByName('Pass').AsString<>passchk then
           begin
              SHowMessage('비밀번호가 틀립니다. 확인해주세요');
              Edit2.SetFocus;
              exit;
           end;
          result:=true;
       end;
   end;//Query1
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
        chk:=False;
        close;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin

   chk:=Pass_chk(Edit1.Text,Edit2.Text);
   if Chk then
   begin
      FileClose(form1.Handle);
      form1.Close;
   end else
   begin
   form3.ShowModal;
   //form1.hide;
   end;
end;


혹시요.
건의할게 있는데.
db쪽으로 강의를 좀 해주시면..
자세하게(^^;;) 강의를 해주시면 어떨지........제 개인적인 생각입니다..