Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Access&Delphi, запросы... 
:(
    Опции темы
Котеныш
Дата 24.5.2009, 00:35 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 7
Регистрация: 24.5.2009

Репутация: нет
Всего: нет
Всем привет... очень очень нужна ваша помощь...
Через неделю курсач сдавать, а программа в делфи так и не написана..
1. Подскажите как сделать алиас, на основании базы данных а Accesse?
2. Как сделать запросы в делфи?
Очень надеюсь на вашу помощь... smile 
PM MAIL ICQ   Вверх
Данкинг
Дата 24.5.2009, 00:38 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 35
Всего: 130
Цитата(Котеныш @  24.5.2009,  01:35 Найти цитируемый пост)
Через неделю курсач сдавать, а программа в делфи так и не написана..

Я так распереживался по этому поводу, что сейчас пойду повешусь. smile 

Цитата(Котеныш @  24.5.2009,  01:35 Найти цитируемый пост)
1. Подскажите как сделать алиас, на основании базы данных а Accesse?

Ничего не понял. Зачем вообще альяс при работе с Access?

Цитата(Котеныш @  24.5.2009,  01:35 Найти цитируемый пост)
2. Как сделать запросы в делфи?

select * from base. smile 


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
Котеныш
Дата 24.5.2009, 00:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 7
Регистрация: 24.5.2009

Репутация: нет
Всего: нет
ну чтобы базу из ACCESSA перевести а делфи!!! нужно сделать алиас...
Просто дома делаю базу, прихожу в инст, а там ничего не открывается...
а можно про запросы поподробней.. 
Спасибо что откликнулся smile 
PM MAIL ICQ   Вверх
Данкинг
Дата 24.5.2009, 01:14 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 35
Всего: 130
Цитата(Котеныш @  24.5.2009,  01:51 Найти цитируемый пост)
ну чтобы базу из ACCESSA перевести а делфи!!!

а=в? И что значит "из ACCESSA перевести в делфи"? smile 

Цитата(Котеныш @  24.5.2009,  01:51 Найти цитируемый пост)
Просто дома делаю базу, прихожу в инст, а там ничего не открывается...

Ужас какой, после того, как повешусь, - ещё и застрелюсь для верности. smile 

Цитата(Котеныш @  24.5.2009,  01:51 Найти цитируемый пост)
а можно про запросы поподробней.. 

Что именно интересует про запросы? Если подробнее - так это не в раздел про Дельфи. smile 

Цитата(Котеныш @  24.5.2009,  01:51 Найти цитируемый пост)
Спасибо что откликнулся

О да, я весьма отзывчивый и альтруистичный. smile 


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
Котеныш
Дата 24.5.2009, 01:29 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 7
Регистрация: 24.5.2009

Репутация: нет
Всего: нет
Блин... как же объяснить... я делаю базу данных в делфи на основании таблиц в аксесе... 
Например... я делаю базу на флешке Н, прихожу в инст, а там F, соответственно но он не видет базу... для этого вроде как и нужен алиас, это как я понимаю...
Ну если без этого алиаса я базу могу сделать, ток не могу сделать запросы...
Например мне нужно посчитать общее количество прибыли...
Не могу сделать поиск по первой букве например, или поиск по номеру..
Короче такая проблема у меня... ужас...
PM MAIL ICQ   Вверх
Данкинг
Дата 24.5.2009, 01:41 (ссылка) | (голосов:1) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 35
Всего: 130
Цитата(Котеныш @  24.5.2009,  02:29 Найти цитируемый пост)
я делаю базу данных в делфи на основании таблиц в аксесе... 

База "на основании таблиц" быть не может. Если ты делаешь БД в Access, то она в Access и остаётся. А из какой среды программирования ты к ней обращаешься - Дельфи, C++ Builder, Java - дело иное.

Цитата(Котеныш @  24.5.2009,  02:29 Найти цитируемый пост)
а там F, соответственно но он не видет базу

Ошибку какую-то выдаёт? Напрягая свою скудную интуицию, могу предположить, что у тебя свойство AdoConnection.Connected выставлено в true, и из-за этого ошибка, так как БД, которая у тебя находится на твоём компе, на другом компе уже будет находиться предположительно по другому пути. Кстати, зачем проги писать на флешке - не понимаю.

Цитата(Котеныш @  24.5.2009,  02:29 Найти цитируемый пост)
для этого вроде как и нужен алиас, это как я понимаю...

А что такое "алиас" в твоём понимании?

Цитата(Котеныш @  24.5.2009,  02:29 Найти цитируемый пост)
Ну если без этого алиаса я базу могу сделать, ток не могу сделать запросы...

Почитай книжку про работу с БД в Дельфи. smile 

Цитата(Котеныш @  24.5.2009,  02:29 Найти цитируемый пост)
Например мне нужно посчитать общее количество прибыли...

Сочувствую.

Цитата(Котеныш @  24.5.2009,  02:29 Найти цитируемый пост)
Не могу сделать поиск по первой букве например, или поиск по номеру..

Млин, как ты только с этим живёшь?! smile 

Цитата(Котеныш @  24.5.2009,  02:29 Найти цитируемый пост)
Короче такая проблема у меня... ужас... 

Для верности после застреливания раскушу ампулу с KCN. smile 


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
kami
Дата 24.5.2009, 08:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1806
Регистрация: 25.8.2007
Где: Санкт-Петербург

Репутация: 3
Всего: 72
Цитата(Данкинг @  24.5.2009,  01:41 Найти цитируемый пост)
Для верности после застреливания раскушу ампулу с KCN.

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

Как я понял - первый вопрос почти решен: нужно уйти от явного прописывания пути к базе.
Со вторым все не так однозначно: запросы в Delphi делаются абсолютно так же, как и не в Delphi. Если же вообще про то, как делать запросы - это хороший курс лекций.
PM MAIL WWW   Вверх
Sanek123
Дата 24.5.2009, 12:28 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 201
Регистрация: 22.10.2008

Репутация: нет
Всего: нет
Мля, что за косяк с отправкой сообщений? Товарищи модераторы разберитесь пожалуйста.
Написал такую поэму котенышу и нету... Заново писать не буду.
Уход от явных путей осуществляется просто:
не надо писать адреса в свойствах компонента
Код

procedure Tapplicateform.FormShow(Sender: TObject);
begin
OpenDialog1.FileName:='DATABASE.mdb';
if FileExists(GetCurrentDir + '\DATABASE\DATABASE.mdb')=true then
begin

     ADOQuery1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='
                            + GetCurrentDir + '\DATABASE\DATABASE.mdb;Persist Security Info=False';
     ADOQuery1.Open;
end
  else
    begin
    if OpenDialog1.Execute then
      begin
       ADOQuery1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='
                            + OpenDialog1.FileName +';Persist Security Info=False';
       ADOQuery1.Open;
       end
     else
       begin
        Application.Terminate;
       end;
end;
end;

а запросы примерно так:
Код

if applicateform.ADOQuery1.Active then applicateform.ADOQuery1.Close;
applicateform.ADOQuery1.SQL.Clear;
applicateform.ADOQuery1.SQL.Add('SELECT * FROM T1,T2 where (Famyli like '
                                + Char(39)
                                + Edit2.Text+'%' + Char(39)
                                +') and (T1.код=T2.код)' );
applicateform.ADOQuery1.Open;
if applicateform.ADOQuery1.RecordCount<1 then ShowMessage('Records not found / Записей не найдено');


--------------------
Вас разыскивают бойцы 139-го порта...
PM MAIL   Вверх
Keeper89
Дата 24.5.2009, 13:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2580
Регистрация: 26.2.2009

Репутация: 1
Всего: 58
Вкратце скажу свои мысли smile
  • В TADOConnection (надеюсь, автор не догадался использовать BDE), в поле БД ставьте относительных путь, например кладите файл самой БД в папку с экзешником.
  • Запросы осуществляете с помощью TADOQuery, так как показал Sanek123 во втором примере кода.
  • Никаких алиасов не нужно, ошибка скорее всего выдается из-за абсолютного пути к файлу БД (о чем я сказал в 1 пункте).
  • Ну и выкладывайте то, что получилось, будем смотреть.



--------------------
Cogito, ergo sum

Keeper's blog
CnWizards Downloads

user posted image
PM MAIL WWW   Вверх
Rodman
Дата 24.5.2009, 13:46 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


CIO
****


Профиль
Группа: Участник
Сообщений: 6144
Регистрация: 7.5.2006
Где: Ukraine ⇛ Kyiv ci ty

Репутация: 22
Всего: 122
почитай


--------------------

Лотереи мира
PM MAIL WWW Skype GTalk YIM MSN   Вверх
Котеныш
Дата 24.5.2009, 14:04 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 7
Регистрация: 24.5.2009

Репутация: нет
Всего: нет
Т.Е. Я так понимаю если использовать TADOConnection, то проблем с доступом к базе не будет???

Добавлено @ 14:07
Код

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, Mask, DBCtrls, ExtCtrls, Grids, DBGrids, DB, ADODB,
  jpeg;

type
  TForm2 = class(TForm)
    Image1: TImage;
    ADOTable1: TADOTable;
    DataSource1: TDataSource;
    DBGrid1: TDBGrid;
    DBNavigator1: TDBNavigator;
    DBEdit1: TDBEdit;
    DBEdit2: TDBEdit;
    DBEdit3: TDBEdit;
    DBEdit4: TDBEdit;
    Label1: TLabel;
    Label2: TLabel;
    Label3: TLabel;
    Label4: TLabel;
    procedure FormClose(Sender: TObject; var Action: TCloseAction);
    procedure FormShow(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form2: TForm2;

implementation

{$R *.dfm}

procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction);
begin
    ADOTable1.Close
end;

procedure TForm2.FormShow(Sender: TObject);
begin
      ADOTable1.Open
end;

end.


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

Добавлено @ 14:10
Цитата(kami @  24.5.2009,  08:31 Найти цитируемый пост)
Ну, по крайней мере автор знает, что он хочет: сделать так, чтобы программа работала на всех компьютерах и научиться делать запросы в Delphi. В отличие от подавляющего большинства "нужна сделати праграму кто магет".


Спасибо за поддержку...
  smile 


Это сообщение отредактировал(а) Rodman - 24.5.2009, 14:30
PM MAIL ICQ   Вверх
Keeper89
Дата 24.5.2009, 14:16 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2580
Регистрация: 26.2.2009

Репутация: 1
Всего: 58
Цитата(Котеныш @  24.5.2009,  14:04 Найти цитируемый пост)
Это программа для моей формы... Работает тока на моем компе, прихожу в инст, ничего не открывается...

Смотрите путь к базе в свойствах TADOConnection (измените на относительный) и оформляйте код через кнопочку "Код".


--------------------
Cogito, ergo sum

Keeper's blog
CnWizards Downloads

user posted image
PM MAIL WWW   Вверх
Котеныш
Дата 24.5.2009, 14:20 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 7
Регистрация: 24.5.2009

Репутация: нет
Всего: нет
Цитата(Keeper89 @  24.5.2009,  14:16 Найти цитируемый пост)
Смотрите путь к базе в свойствах TADOConnection (измените на относительный) и оформляйте код через кнопочку "Код".

 
А можно поподробней... просто у меня делфи не русифицирована... тяжелова то..
PM MAIL ICQ   Вверх
Rodman
Дата 24.5.2009, 14:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


CIO
****


Профиль
Группа: Участник
Сообщений: 6144
Регистрация: 7.5.2006
Где: Ukraine ⇛ Kyiv ci ty

Репутация: 22
Всего: 122
Цитата(Котеныш @  24.5.2009,  14:04 Найти цитируемый пост)
если использовать TADOConnection, то проблем с доступом к базе не будет???

это подключение. от него все и танцует.
Цитата(Котеныш @  24.5.2009,  14:04 Найти цитируемый пост)
Работает тока на моем компе, прихожу в инст, ничего не открывается...
какие симптомы?



--------------------

Лотереи мира
PM MAIL WWW Skype GTalk YIM MSN   Вверх
Котеныш
Дата 24.5.2009, 14:49 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 7
Регистрация: 24.5.2009

Репутация: нет
Всего: нет
Цитата(Keeper89 @  24.5.2009,  14:16 Найти цитируемый пост)
Смотрите путь к базе в свойствах TADOConnection (измените на относительный) и оформляйте код через кнопочку "Код".

 
А можно поподробней... просто у меня делфи не русифицирована... тяжелова то..

Добавлено через 2 минуты и 38 секунд
Я в этом просто лузер.. делаю так как преподы объясняют...
Делаю работу на флешке H, а в инсте она F. соответственно пишет что выбран не верный путь..
для базы я использую компонент BDE
короче вообще ничего не понимаю smile 
PM MAIL ICQ   Вверх
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Базы данных и репортинг"
Vit
Петрович

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами


Обязательно указание:

1. Базы данных (Paradox, Oracle и т.п.)

2. Способа доступа (ADO, BDE и т.д.)


  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи
  • Вопросы по SQL и вопросы по базам данных не связанные с Дельфи задавать здесь

FAQ раздела лежит здесь!

Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Vit, Петрович.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Базы данных и репортинг | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0853 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.