Показать сообщение отдельно
  #8  
Старый 17.04.2009, 10:58
Аватар для TOJluK
TOJluK TOJluK вне форума
Местный
 
Регистрация: 25.02.2009
Адрес: Минск
Сообщения: 551
Версия Delphi: 2007
Репутация: 110
По умолчанию

Извини, я тупанул... Хотелось как лучше- получилось как всегда! )))
Вообщем сделай пока через IF. Типа:
Код:
if Table1.Locate('Login;Pass',VarArrayOf([Edit1.text,Edit2.Text]),[]) = True then
 begin  
 if Table1.FieldByName('Form_Name').AsString = 'Form2' then
  Form2.Show;
 if Table1.FieldByName('Form_Name').AsString = 'Form3' then
  Form3.Show;
 end
 else
  ShowMessage('Неправильный логин/пароль!');
Ответить с цитированием