password sorunu!

[true_false]

merhabalar
yazdığım programın kullanıcı girişinde aldığım hatayı aynen aktarıyorum.
program çalışıyo kullanıcı adını giriyoruz şifreyi girip tamam dediğimizde

..... EOLe exception with message'token unkown - line 4, char 2 PASSWORD' procces stoped..use.....

bu hatayı neden verdiğini anlamadım işyerinde çalışan program evde sapıttı

Kod: Tümünü seç

procedure TfrmUserConnect.cxButton1Click(Sender: TObject);
begin
  if Dm.cdsUsers.Locate('USER_ID',edtUserName.EditValue,[]) then
  if Dm.cdsUsers.FieldValues['PASSWORD'] = edtPassword.Text then
  begin

    Dm.fSenderId := edtUserName.EditValue;
    user_login := edtUserName.EditText;
    flogin:=true;
 . .. .. .. 

Kod: Tümünü seç

if Dm.cdsUsers.FieldValues['PASSWORD'] = edtPassword.Text then

alanını blokladığımda

excepted but end of file found

değeri alıyor. sanırım bu kadar açıklama yeter
not şimdiden vermiş olduğunuz güzel cevaplar için teşekkür ederim

[fduman]

Zannedersem client dataset kullanıyorsun.

- ClientDataset' açılışta XML (veya binary) veritabanı dosyanı yüklememiş olabilir. LoadFromFile ile yüklemelisin.

- Midas.DLL versiyonun işyerindekinden farklı ve daha eski olabilir. Daha yeni sürümlü bir DLL kullanmalısın.

[lazio]

tablo boş olabilirmi ??
bu satırların başında..

Kod: Tümünü seç

if table.eof then
begin
  Showmessage('tabloda kayıt yok');
  exit;
end
else
...
...

[true_false]

yok hoca table dolu coderlordun dediği gibi bir problem var onuda halledicem ii çalışmalar