| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

DBGrid & ADO и не только.... [D7, MySQL]

[AleX] ©   (2006-03-03 15:08:00) 

Есть база MySQL, с клиенским приложением. Все работает замечательно.
Но есть маленькие погрешности.
При запуске приложение вылетает окошко ввода пароля на присоединение к базе, хотя в адо все указано, и стоит галочка "сохранять пароль".
Как можно программно избавится от этого окошка?
+ В окоше светится БД - ADOConnection, как его поменять на свое название, все перепробывал так и не нашел.

И еще один маленький вопросик - как заставить грид реагировать на скрол мыши?

---

YurikGL   (2006-03-03 23:43:00) [1]

> Как можно программно избавится от этого окошка?

LoginPrompt:=false

---

[AleX]   (2006-03-03 17:02:00) [2]

С мышью все отлично работает! СПАСИБО!

>в каком окошке светится?
>А свойство Name у ADOConnection менять не пробовал?

В окошке, где вводится логин и пароль.
Свойство Name, это же имя компонента
Длинное название не впишешь

---

msguns   (2006-03-03 15:44:00) [3]

>как заставить грид реагировать на скрол мыши?

interface
type
 TfrmChild = class(TForm)
   procedure FormMouseWheelDown(Sender: TObject; Shift: TShiftState;
     MousePos: TPoint; var Handled: Boolean);
   procedure FormMouseWheelUp(Sender: TObject; Shift: TShiftState;
     MousePos: TPoint; var Handled: Boolean);
 ...

impementation

procedure TfrmChild.FormCreate(Sender: TObject);
begin
 TDrawGrid(grCTLG).OnMouseWheelDown := FormMouseWheelDown;
 TDrawGrid(grCTLG).OnMouseWheelUp := FormMouseWheelUp;
end;

procedure TfrmChild.FormMouseWheelDown(Sender: TObject; Shift: TShiftState;
 MousePos: TPoint; var Handled: Boolean);
begin
 Handled := true;
 grCTLG.DataSource.DataSet.Next;
end;

procedure TfrmChild.FormMouseWheelUp(Sender: TObject; Shift: TShiftState;
 MousePos: TPoint; var Handled: Boolean);
begin
 Handled := true;
 grCTLG.DataSource.DataSet.Prior;
end;

---

Vlad   (2006-03-03 15:36:00) [4]

> Как можно программно избавится от этого окошка?

ADOConnection.LoginPrompt := false;


> + В окоше светится БД - ADOConnection

в каком окошке светится?
А свойство Name у ADOConnection менять не пробовал?

---

Наверх