Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2009.01.18;
Скачать: [xml.tar.bz2];

Вниз

Правильно ли составлен запрос SQL?   Найти похожие ветки 

 
aglar ©   (2008-12-07 13:53) [0]

Странное дело, этот кусок кода работает как нужно

query1.Close;
query1.SQL.Clear;
query1.SQL.Add("select * from buyers where lower(name) = """+lowercase(sale_buyer_combo.text)+"""");
query1.Open;
if query1.RecordCount <= 0 then
  buyers_table.InsertRecord([sale_buyer_combo.Text, sale_total_summa_edit.Value - sale_payed_summa_edit.Value])
else
 begin
 query3.Close;
 query3.SQL.Clear;
 query3.SQL.Add("update buyers set debt="""+floattostr(query1.FieldValues["debt"]+ sale_total_summa_edit.Value - sale_payed_summa_edit.Value)+""" where lower(name) = """+lowercase(sale_buyer_combo.Text)+"""");
 query3.ExecSQL;
end;


а этот, вроде ничем не отличающийся, ничего не выбирает из таблицы, не смотря на то, что запись с именем такого водителя в ней присутствует:

query1.Close;
query1.SQL.Clear;
query1.SQL.Add("select * from drivers where lower(name) = """+lowercase(sale_driver_combo.text)+"""");
query1.Open;
if query1.RecordCount <= 0 then
  drivers_table.InsertRecord([sale_driver_combo.Text, sale_delivery_edit.Value - sale_delivery_payed_summa_edit.Value])
else
 begin
 query3.Close;
 query3.SQL.Clear;
 query3.SQL.Add("update drivers set debt="""+floattostr(query1.FieldValues["debt"]+ sale_delivery_edit.value - sale_delivery_payed_summa_edit.Value)+""" where lower(name) = """+lowercase(sale_driver_combo.Text)+"""");
 query3.ExecSQL;
end;


где ошибка?


 
aglar ©   (2008-12-07 14:00) [1]

Ооо....

showmessage(lowercase("Проверка"));

выводит "Проверка"

ничего не понимаю....


 
{RASkov} ©   (2008-12-07 14:04) [2]

> [1] aglar ©   (07.12.08 14:00)

AnsiLowerCase()


 
Johnmen ©   (2008-12-07 14:22) [3]


> aglar ©   (07.12.08 13:53) 

Настоятельно рекомендуется к прочтению и осознанию:
1. Раздел хелпа Currency and date/time formatting variables,  DecimalSeparator
2. http://www.delphikingdom.com/asp/viewitem.asp?catalogid=374


 
aglar ©   (2008-12-07 16:43) [4]

Спасибо, работает:)


 
aglar ©   (2008-12-07 16:54) [5]

Да, еще вот что..

drivers_table.InsertRecord([sale_driver_combo.Text, sale_delivery_edit.Value - sale_delivery_payed_summa_edit.Value])

После этого данные в RxDbgrid не обновляются до перезапуска программы. Нужно ли командно обновить данные в таблице или же..?


 
Правильный$Вася   (2008-12-07 21:57) [6]

коммит не забывай
да и вообще - неясно, зачем вставлять в таблицу, а смотреть потом в результаты выборки, выполненной ДО вставки?

+ использовать параметры



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2009.01.18;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.004 c
2-1228221610
givi
2008-12-02 15:40
2009.01.18
Имя ПК


2-1228150306
Макс123
2008-12-01 19:51
2009.01.18
Загрузка в TImage


2-1228133156
dymok
2008-12-01 15:05
2009.01.18
SQL.Text сохранить в файл


2-1228465214
1234567
2008-12-05 11:20
2009.01.18
MessageBox


2-1228294295
NieL
2008-12-03 11:51
2009.01.18
Сохранение геометрических параметров формы





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский