База данных

@Nikolai93 · Регистрация: 15.05.2013

Народ поскажите как сделать сортировку в базе жанных чтобы при нажатии сортировалась .И как чтобы данные можно было добовлять и удалять заранее спс.Помогите пожалуйста!!!.Я если что на всякий вложу файлы .

@Waddonator · 17.10.2013, 18:37

Сообщение от Nikolai93

как сделать сортировку в базе жанных чтобы при нажатии сортировалась

Использовать свойство Sort компонента ADOQuery. Например сортировка при нажатии на заголовки столбцов:

Delphi

procedure TForm1.DBGrid1TitleClick(Column: TColumn);
begin
  ADOQuery1.Sort:=Column.FieldName;
end;

@Nikolai93 · 17.10.2013, 19:37 **[ТС]**

спасибо

@Nikolai93 · 20.10.2013, 20:35 **[ТС]**

Народ еще одну вещь подскажите пожалуйста.Как сделать общий путь чтобы программа открывалась не только на моем компьютере но и на чужом?

@Waddonator · 21.10.2013, 10:12

Nikolai93, в Delphi 7 достаточно в свойстве ConnectionString вместо Data Source=C:\Users\Николай\Documents\RAD Studio\Projects\tab.mdb указать Data Source=tab.mdb и файл базы данных будет браться из текущей папки.

@Nikolai93 · 21.10.2013, 16:54 **[ТС]**

спасибо большое

Добавлено через 2 часа 18 минут
Народ извиняюсь уже надоел наверно . Мне нужно в БД добавить запись в столбцы (Тип, Описание , В наличии , цена) ввести данные в TEdit их всего 5..и при нажатии на TButton чтоб новые данные добавились в таблицу. И если можно тоже самую процедуру с удалением! Помогите пожалуйста!Я нашеле подобное но там у меня ошибку выдает(.Вот если че прикреплю.Посмотрите.

@Waddonator · 21.10.2013, 17:33

1) у Вас в таблице названия полей - английские буквы, а в запросе Вы почему-то пишите по русски.
2) количество параметров в запросе - 3, а добавление идет 4-х полей.
3) Нумерация должна идти 0,1,2,3 а не 0,2,3,4
4) Requery чего Вы делаете, если текст sql-запроса в ADOQuery1 Вы заменили?
5) Для удаления используйте инструкцию DELETE FROM, только для этого Вам необходимо как-то идентифицировать запись в таблице. Для этого обычно используют поле счетчик.

@Nikolai93 · 21.10.2013, 18:30 **[ТС]**

С добавлением почти разобрался почему при нажатии кнопки пропадают данные не отопржаются что добавлись?

@Waddonator · 21.10.2013, 18:40

Сообщение от Nikolai93

почему при нажатии кнопки пропадают данные не отопржаются что добавлись?

Потому, что вы удалили sql-запрос (SELECT * FROM ...), который изначально отображал данные, и заменили его на запрос добавления (INSERT ...).

@Nikolai93 · 21.10.2013, 18:56 **[ТС]**

вот сделал как вы сказалаи работает все почему при нажатиии теряется иди столбик и вообще все данные хотя все удоляет все норм ща я вам ее прикреплю.

@Nikolai93 · 21.10.2013, 18:58 **[ТС]**

ща попробую

@Waddonator · 21.10.2013, 18:59

Nikolai93, я не смогу посмотреть - у меня только D7 стоит.

@Nikolai93 · 21.10.2013, 20:02 **[ТС]**

исправьте там пожалуйста не получается(.Аш башка разболелась( .Я меня на SELECT * FROM .. такая же хрень.

Добавлено через 32 секунды
и в удаление такая же фигня.

Добавлено через 1 минуту
Это добавление:

Delphi

ADOQuery1.SQL.Clear;
   ADOQuery1.SQL.Add('INSERT INTO [tab] ([tip], [opis], [vnal],[cena] )');
   ADOQuery1.SQL.Add('VALUES ( :Param1, :Param2, :Param3, :Param4 )');
   ADOQuery1.Parameters.Refresh;
   ADOQuery1.Parameters[0].Value:=Edit1.Text;
   ADOQuery1.Parameters[1].Value:=Edit2.Text;
   ADOQuery1.Parameters[2].Value:=Edit3.Text;
   ADOQuery1.Parameters[3].Value:=Edit4.Text;
 
 
   ADOQuery1.ExecSQL;
   ADOQuery1.SQL;

Это удаление:

Delphi

 ADOQuery1.Close;
         ADOQuery1.SQL.Clear;
         ADOQuery1.SQL.Add('DELETE FROM [tab] WHERE Id= :Param1');
         ADOQuery1.Parameters.Refresh;
         ADOQuery1.Parameters[0].Value:=Edit6.Text;
         ADOQuery1.ExecSQL;

Добавлено через 1 минуту
я тебе код скинул что тут еще поправить надо подскажи а то уже голова кругом идет(

Добавлено через 53 минуты
как Select и куда написать чтобы все работало безупречно?

@Nikolai93 0 / 0 / 0 Регистрация: 15.05.2013 Сообщений: 70
	21.10.2013, 18:58 [ТС]	11
	ща попробую 0

@Nikolai93 0 / 0 / 0 Регистрация: 15.05.2013 Сообщений: 70
	17.10.2013, 19:37 [ТС]	3
	спасибо 0

@Nikolai93 0 / 0 / 0 Регистрация: 15.05.2013 Сообщений: 70
	20.10.2013, 20:35 [ТС]	4
	Народ еще одну вещь подскажите пожалуйста.Как сделать общий путь чтобы программа открывалась не только на моем компьютере но и на чужом? 0

@Waddonator 965 / 640 / 97 Регистрация: 01.11.2012 Сообщений: 1,447
	21.10.2013, 10:12	5
	Nikolai93, в Delphi 7 достаточно в свойстве ConnectionString вместо Data Source=C:\Users\Николай\Documents\RAD Studio\Projects\tab.mdb указать Data Source=tab.mdb и файл базы данных будет браться из текущей папки. 1

@Waddonator 965 / 640 / 97 Регистрация: 01.11.2012 Сообщений: 1,447
	21.10.2013, 17:33	7
	1) у Вас в таблице названия полей - английские буквы, а в запросе Вы почему-то пишите по русски. 2) количество параметров в запросе - 3, а добавление идет 4-х полей. 3) Нумерация должна идти 0,1,2,3 а не 0,2,3,4 4) Requery чего Вы делаете, если текст sql-запроса в ADOQuery1 Вы заменили? 5) Для удаления используйте инструкцию DELETE FROM, только для этого Вам необходимо как-то идентифицировать запись в таблице. Для этого обычно используют поле счетчик. 0

@Nikolai93 0 / 0 / 0 Регистрация: 15.05.2013 Сообщений: 70
	21.10.2013, 18:30 [ТС]	8
	С добавлением почти разобрался почему при нажатии кнопки пропадают данные не отопржаются что добавлись? 0 Миниатюры

@Waddonator 965 / 640 / 97 Регистрация: 01.11.2012 Сообщений: 1,447
	21.10.2013, 18:40	9
	Сообщение от Nikolai93 почему при нажатии кнопки пропадают данные не отопржаются что добавлись? Потому, что вы удалили sql-запрос (SELECT * FROM ...), который изначально отображал данные, и заменили его на запрос добавления (INSERT ...). 0

@Waddonator 965 / 640 / 97 Регистрация: 01.11.2012 Сообщений: 1,447
	21.10.2013, 18:59	12
	Nikolai93, я не смогу посмотреть - у меня только D7 стоит. 0

Опции темы