Помогите открыть файл

← →
greenbear (2012-12-04 17:51) [0]

procedure TForm1.Button1Click(Sender: TObject);
begin
if OpenDialog1.Execute then
begin
Database1.Connected := False;
Database1.Params.Clear;
DataBase1.Params.Add("USER NAME=MASTER");
DataBase1.Params.Add("PASSWORD=jIGGAe");
Database1.DatabaseName := OpenDialog1.FileName;
orders.TableName := DataBase1.DatabaseName;
try
DataBase1.Connected := True;
ModalResult := mrOk;
except
on EDBEngineError do begin
ShowMessage(" Неверный пароль или имя !");
end;
end; {try}
End;

end;

Винда 8, делаю в DELPHI XE? Неправильный логин пароль и пилец, куда крутить- надо открыть файлик парадоксовский на чтение

← →
имя (2012-12-04 18:03) [1]

Удалено модератором

← →
Медвежонок Пятачок © (2012-12-04 18:08) [2]

парадоксовский пароль надо добавлять не в датабэйс а в сессию

← →
Плохиш © (2012-12-04 18:10) [3]

> except
> on EDBEngineError do begin
> ShowMessage(" Неверный пароль или имя !");
> end;
> end; {try}

Убивать за такие обработчики исключений.

← →
Smile (2012-12-04 18:22) [4]

> Плохиш © (04.12.12 18:10) [3]

Неужели не жалко своего личного времени?
Все твои комментарии предсказуемы и очевидны (не буду приводить "оригиналы")
Давно написал бы скрипт (бот) и отдыхал (хотя не исключено, что это и есть результаты работы твоего бота)
:), а в сущности не очень смешно :(

← →
Игорь Шевченко © (2012-12-04 21:04) [5]

Smile (04.12.12 18:22) [4]

За такие обработчики исключений действительно надо убивать. Медленно и с наслаждением.

← →
greenbear (2012-12-05 10:25) [6]

...
Database1.Connected := False; Database1.Session.AddPassword("jIGGAe"); Database1.DatabaseName := OpenDialog1.FileName;
...

неверный логин пароль :(

← →
sniknik © (2012-12-05 10:36) [7]

> неверный логин пароль :(
это тебе твой "исключительный" эксепт сообщил? а чем нибудь "стандартным" (не тобой написанным) открывать не пробовал?

и почему пароль "технический", а не твой? он вроде разный для разных версий... не помню уже.

← →
greenbear (2012-12-05 11:23) [8]

гугл сказал что он типа универсальный (в смысле пароль). С этим паролем DBD 7 открывает беспроблем :((((.

← →
Плохиш © (2012-12-05 11:42) [9]

Даю 75%, что "база данных не найдена/не существует"

← →
O'ShinW © (2012-12-05 11:45) [10]

тебе 150 раз намекают
убери свой
> except
и скажи какая реальная ошибка, и лучше скриншот

ShowMessage(" Неверный пароль или имя !");
А ошибка могла быть в чем угодно другом.

зы
Тут радоваться не чему, "!" - бесит

← →
greenbear (2012-12-05 12:07) [11]

вот картинка, без моего ексепта - инвалид параметры
[IMG]http://i076.radikal.ru/1212/f4/f3ca340d8bdf.jpg[/IMG]

← →
greenbear (2012-12-05 12:07) [12]

пардон вот так http://i076.radikal.ru/1212/f4/f3ca340d8bdf.jpg

← →
O'ShinW © (2012-12-05 12:17) [13]

вот, а то пароль/юзер..

шаг №2
http://g.zeos.in/?q=invalid%20parameter%20paradox

← →
greenbear (2012-12-05 13:40) [14]

пипец теперь говорит инвалид директори и полный путь к файлу дб

Справку про TOpenDialog и возвращаемые значения его свойствами уже проштудировал?

> Smile (04.12.12 18:22) [4]

Твой пост спишу на недостатки твоего развития.

> greenbear (05.12.12 13:40) [14]

Значит теперь у тебя другой код в программе

> Database1.DatabaseName := OpenDialog1.FileName;
> orders.TableName := DataBase1.DatabaseName;

Кстати советую так же, в конце концов, прочитать о database и table в понятиях используемого bde.

> надо открыть файлик парадоксовский на чтение

И зачем тогда нужен компонент TDatabase?

Помогите открыть файл Найти похожие ветки