Свой диалог при вводе парля и логина для конекта к Oracle

← →
Relaxxx © (2003-10-02 15:18) [0]

Собственно вопрос в заголовке. Даи еще я работаю через БДЕ

← →
Vlad © (2003-10-02 15:25) [1]

Это не вопрос. Это утверждение.
А вот в чем вопрос-неясно.

← →
Reindeer Moss Eater © (2003-10-02 15:34) [2]

TDatabase.OnLogin

← →
Relaxxx © (2003-10-02 15:45) [3]

вопрос тогда вот вчем, я хочу чтобы призанрузке програмы у меня не показывался диалог конекта к базе(пароль/логин) а показывалась моя форма в которую я и записываю пароль (логин берется из БДЕ) и при нажатии ОК я конекчусь

> Reindeer Moss Eater ©
а поподродней можеш, как он работает, у меня вначале конектится компонент Query из-зи чего и просит сразу конект

← →
Reindeer Moss Eater © (2003-10-02 15:49) [4]

Write an OnLogin event handler to take specific actions when an application attempts to connect to a database. By default, a database login is required. The current USERNAME is read from the Params property, and a standard Login dialog box opens. The dialog prompts for a user name and password combination, and then uses the values entered by the user to set the USERNAME and PASSWORD values in the Params property. These values are then passed to the remote server.

Applications that provide alternative OnLogin event handlers must set the USERNAME and PASSWORD values in LoginParams. LoginParams is a temporary string list and is freed automatically when no longer needed.

← →
Relaxxx © (2003-10-02 16:06) [5]

что то у меня нифига не выходит, можете код приблизительный привести

← →
Relaxxx © (2003-10-02 16:09) [6]

да и еще, а можно как то не через TDatabase, просто я его не использую, раздуплите меня в этом деле а то я что то вообще плтерялся :-(

← →
Zhouck © (2003-10-02 16:14) [7]

Перейди лучше на ODAC и не парься (потом меньше проблем будет)

← →
Relaxxx © (2003-10-02 16:17) [8]

>
> Zhouck ©
100 пудов, но пока нужно решить вот это

← →
Reindeer Moss Eater © (2003-10-02 16:18) [9]

procedure TForm1.Database1Login(Database: TDatabase; LoginParams: TStrings);
begin
LoginParams.Values["USER NAME"]:="sys";
LoginParams.Values["PASSWORD"] :="change_on_install";
end;

← →
Relaxxx © (2003-10-02 16:29) [10]

> Reindeer Moss Eater ©
большое спасибо, а если без Database, можно как то или нет???

← →
NAlexey © (2003-10-02 16:31) [11]

>Reindeer Moss Eater
Да страшный же он, Датабазелогин. Лучше уж его подавлять а в свою форму писАть.

← →
Reindeer Moss Eater © (2003-10-02 16:40) [12]

а если без Database, можно как то или нет???

Нельзя. И вредно это.

Да страшный же он, Датабазелогин. Лучше уж его подавлять а в свою форму писАть.

А где у меня страшный стандартный логин появляется?

ВСЕ СУПЕР, РАБОТАЕТ!!!
вот только как узнать какое имя пользователя записано в конекте БДЕ чтобы я его ставил по дефоулту в строку ЮЗЕР

вот только как узнать какое имя пользователя записано в конекте БДЕ чтобы я его ставил по дефоулту в строку ЮЗЕР

Ты же хотел свой логин диалог (спросит имя у юзера).

А узнать дефолтное:
TSession.GetAliasParams
TSession.GetDriverParams

и вдогонку :-)

Как мне обработать ошибку если пароль или логин введен неправельно

?????????

так как мне узнать что введен пароль неправельно(тоесть если я не смог соединится значит например выход)

незнаете??? а может можете дать какой-то совет

так как мне узнать что введен пароль неправельно(тоесть если я не смог соединится значит например выход)

function ConnectToDatabase:boolean
begin
...
...
Result:= Database1.Connected;
end;

Свой диалог при вводе парля и логина для конекта к Oracle Найти похожие ветки