Dbedit и только буквы

[chircov090993]

Как сделать так, что бы в дбедите можно вводить было только буквы или цифры (не смотря на то, что в базе стоят только буквы, данные делфи сохраняет, но в базе они не появляются). Нашел такое решение проблемы, но при его использовании ни чего не происходит.

if Key in ['a'..'z'] + ['A'..'Z'] then
Key := #0;

[ych_del]

Если в соответствии с тем, что тебе требуется - то вот так:

if not (Key in ['A'..'z', 'А'..'я', '0'..'9', #8, #32]) then Key := #0;
// #8 - Backspace
// #32 - пробел

Тут - следующее: если введенный символ не является буквой латиницы ('A'..'z'), не является буквой кириллицы ('А'..'я'), не является цифрой, не пробел и не Backspace (тоже отсекается на событии OnKeyPress) - то не пропускаем ввод этого символа (Key := #0). Т.е. - всякие точки, запятые и прочие звездочки не прокатят.

А пример, который ты нашел - это вообще мимо кассы.

[chircov090993]

if not (Key in ['А'..'я', #8]) then Key := #0;
не пишет ни чего

[ych_del]

Ставь break, смотри - что приходит в Key изначально

[Stilet]

данные делфи сохраняет, но в базе они не появляются

Так может не в Эдите проблема, раз уж данные в БД не сохраняются?

[chircov090993]

Разобрался, спасибо!) может еще сможете помочь - есть запрос

SELECT T_kniga.bookname, T_kniga.izd, T_kniga.city, T_kniga.bookyear, T_kniga.book_data_add, T_kniga.kol FROM T_kniga
WHERE (T_kniga.book_data_add>'+datetostr( DateTimePicker1.Date)+') And (T_kniga.book_data_add<'+datetostr( DateTimePicker2.Date)+');

Я выбираю дату в datetimepicker и выполняю запрос, происходит ошибка - "Число содержит синтаксическую ошибку в выражении запроса WHERE (T_kniga.book_data_add>'+datetostr( DateTimePicker1.Date)+') And (T_kniga.book_data_add<'+datetostr( DateTimePicker2.Date)+');"

[ych_del]

Не надо так делать. Юзай параметры. На всякий случай - подсказываю:

Query.SQL.Text := 'select * from TBL where DATE_FIELD > :ParamDate';
Query.ParamByName('ParamDate').AsDateTime := DateTimePicker1.Date;
Query.Open;

Вот тут можно чуть подробнее: http://www.ych-group.ru/50/974/ (осторожно, присутствует чуть-чуть нецензурщины).

Дальше - хелпы и гугл в помощь.