Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 20.05.2009, 10:30   #1
Yetiball
 
Аватар для Yetiball
 
Регистрация: 20.05.2009
Сообщений: 3
Радость Проблема с языком при использовании SQL

Добрый день, господа, пытался сделать сам но видимо никак.
Проблема в следующем, использую Delphi 7 база данных Paradox, запросы в SQL идут через Query. Проблема в следующем - колонки в таблицах названы по английски и для отображения на русском просто в свойство DisplayLabel ввел имя на русском.
Теперь по сути, когда я делаю либо сортировку, либо поиск нужного значения все ищется и сортируется отлично, а вот названия колонок в таблице становятся английскими и всякий DisplayLabel игнорируют.
Вот, собственно и все, прошу помощи
Yetiball вне форума Ответить с цитированием
Старый 20.05.2009, 10:57   #2
SERG1980
Участник клуба
 
Аватар для SERG1980
 
Регистрация: 28.03.2007
Сообщений: 1,814
По умолчанию

А вы названия меняли в Table или Query, если в Table то не забудте и в Query тоже самое сделать
SERG1980 вне форума Ответить с цитированием
Старый 20.05.2009, 11:13   #3
Yetiball
 
Аватар для Yetiball
 
Регистрация: 20.05.2009
Сообщений: 3
По умолчанию

Немного не так. Сам по себе Query у меня ни к чему не привязан и поэтому в нем нельзя чтото переименовать. Привязать его к тому же Datasourse немогу потому что сразу идет ошибка Сircular Datalinks are not allowed, тк на Datasource уже ссылается Table.
Все устроено так что DataModule3.DataSource1.DataSet:=Da taModule3.Query1 делается в самом конце уже после запроса лишь чтобы отобразить.
Скорее всего, криво устроена сама моя схема, если да то буду очень рад услышать предложения
Вообще наверное стоит показать как идут запросы

procedure TForm2.Button2Click(Sender: TObject);
var gen:string;
begin
gen:=Edit1.Text;
if gen <> ''
then
begin
with Datamodule3.Query1 do begin
Close;
SQL.Clear;
SQL.Add('SELECT KId, Knazv, KAvtor, KGenre, KIzd, KGod');
SQL.Add('FROM ":Библиотека:katalog.db"');
SQL.Add('WHERE');
SQL.Add('(Knazv = "'+ gen + '")');
SQL.Add('ORDER BY Knazv');
Open;
end;
if DataModule3.Query1.RecordCount <> 0 then
DataModule3.DataSource1.DataSet:=Da taModule3.Query1
else begin
ShowMessage('Нет книги с таким названием');
DataModule3.DataSource1.DataSet:=Da taModule3.Katalog;
end;

Пришел к такому способу в следствии ошибки Circular Datalinks are not allowed если сразу задавать в Query Datasource

Последний раз редактировалось Yetiball; 20.05.2009 в 11:35.
Yetiball вне форума Ответить с цитированием
Старый 20.05.2009, 11:50   #4
SERG1980
Участник клуба
 
Аватар для SERG1980
 
Регистрация: 28.03.2007
Сообщений: 1,814
По умолчанию

да и ненадо никакой привязки. зайдите в св-во SQL компонента Query напишите там самый простой запрос например select * from название таблицы. далее двойной клик по Query появится редактор полей, добавляем туда все поля (правый клик мышью и выбрать пункт add all fields). Выбираем нужное поле и в св-ве DisplayLabel пшем то что надо
SERG1980 вне форума Ответить с цитированием
Старый 20.05.2009, 19:38   #5
Yetiball
 
Аватар для Yetiball
 
Регистрация: 20.05.2009
Сообщений: 3
По умолчанию

Самое работающее решение всегда самое простое
Спасибо большое, совсем я отупел

Ну и еще бы одно узнать. При поиске или сортировке нельзя изменить данные, как бы это поправить у меня тоже мозгов нехватает

Последний раз редактировалось Yetiball; 20.05.2009 в 20:23.
Yetiball вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Проблема при совместном использовании OSS 6.5 и ESS 4.0 Sazary Безопасность, Шифрование 1 07.03.2009 16:27
Проблема при создании таблицы используя sql Proof БД в Delphi 2 26.02.2009 22:09
Проблема при использовании модальной формы a1ias Помощь студентам 10 14.11.2008 17:29
Баллонная подсказка при использовании Shell_NotifyIcon Fantom Win Api 1 28.09.2008 00:41
Виснет приложение при использовании winsock TR1PL3X Работа с сетью в Delphi 1 31.03.2008 09:14