как привести вводимый символ к верхнему регистру

← →
AntonUSAnoV (2008-03-19 17:10) [0]

fieldname:=dbgrid1.SelectedField.FieldName; if fieldname="Fam" then begin key:=chr(uppercase(str(key)); end;
вот значит, уважаемые мастера, нужно чтобы вводимый пользователем символ (в дбгриде) автоматически приводился к верхнему регистру, пишу я это в обработчике таблицы beforeedit , на указаный вверху код делфи пишет incopatible types,

← →
Johnmen © (2008-03-19 17:16) [1]

Что такое key и str?

← →
AntonUSAnoV (2008-03-19 17:17) [2]

procedure TForm1.DBGrid1KeyPress(Sender: TObject; var Key: char); begin fieldname:=dbgrid1.SelectedField.FieldName; if fieldname="Fam" then begin key:=chr(uppercase(str(key)); end; end;

← →
Kolan © (2008-03-19 17:19) [3]

> uppercase

Почитай в справке что возвращает эта ф-ция. И что такое Key.

← →
AntonUSAnoV (2008-03-19 17:22) [4]

key - символ который введён с клавы в чаре, uppercase приводит стринговую строку к верхнему регистру, есть ещё ansiuppercase...

← →
Johnmen © (2008-03-19 17:23) [5]

Осталось наконец-то прочитать вопрос [1] и ответить на него.

← →
AntonUSAnoV (2008-03-19 17:25) [6]

ну из процедуры видно что key - чаровая переменная в процедуре keypress, а str приведение x к типу str , хотя кажется str и не нужна..

← →
AntonUSAnoV (2008-03-19 17:28) [7]

так тоже не работает - key:=chr(uppercase(key));

← →
Kolan © (2008-03-19 17:28) [8]

> так тоже не работает

Так а что говорит :)

← →
AntonUSAnoV (2008-03-19 17:29) [9]

тоже самое incopatible types,

← →
AntonUSAnoV (2008-03-19 17:29) [10]

тоже самое incopatible types,

← →
Kolan © (2008-03-19 17:29) [11]

> chr(uppercase(key));

Просто интересно, как ты думаешь, как это должно работать?

← →
Kolan © (2008-03-19 17:29) [12]

> тоже самое incopatible types,

А далее ? :)

← →
AntonUSAnoV (2008-03-19 17:30) [13]

что далее

← →
AntonUSAnoV (2008-03-19 17:30) [14]

далле ничего

← →
Плохиш © (2008-03-19 17:32) [15]

Если порыться в справке, то можно найти соответствующую функцию и для типа символа, хотя кому это надо...

← →
AntonUSAnoV (2008-03-19 17:36) [16]

charcase ?

← →
Kolan © (2008-03-19 17:38) [17]

Ответь на [11].

← →
AntonUSAnoV (2008-03-19 17:42) [18]

допустим я с клавы ввёл "а"
ну uppercase приводит это к "А",и возвращает тип стринг, а chr преобразует это к типу char, uppercase с чаром работает, пробовал, я наверно с типами ни как не разберусь..

← →
AntonUSAnoV (2008-03-19 17:44) [19]

не ну поймите если я пишу key:=uppercase(key); и делфи указывает на несовпадение типов стринг и чар, то я думал что получиться с помощью chr перевести из стринг в чар...

← →
AntonUSAnoV (2008-03-19 17:46) [20]

может я вообще не правильно решил всё это сделать, может по другому как то регистр можно повышать сразу после ввода символа ?

← →
Johnmen © (2008-03-19 17:48) [21]

Да-да, а F1 для дураков...:(

← →
AntonUSAnoV (2008-03-19 17:49) [22]

не ну я не очень хорошо просто английский знаю,тяжело ориентироваться...

← →
AntonUSAnoV (2008-03-19 17:51) [23]

ну вот значит chr возвращает чар из типа byte, поэтому значит наверно, а как тогда string перевести в chr

← →
{RASkov} © (2008-03-19 17:57) [24]

UpCase :(

← →
Плохиш © (2008-03-19 18:02) [25]

> {RASkov} © (19.03.08 17:57) [24]

Фи!
А как всё начиналось...

← →
AntonUSAnoV (2008-03-19 18:03) [26]

а чё то ни работает ...

← →
{RASkov} © (2008-03-19 18:04) [27]

> [25] Плохиш © (19.03.08 18:02)

Нормально все.... См [26] :)))

← →
Плохиш © (2008-03-19 18:06) [28]

> AntonUSAnoV (19.03.08 18:03) [26]
> а чё то ни работает ...

Радал...

рыдал...
опять мимо кнопки попал :-))

← →
AntonUSAnoV (2008-03-19 18:08) [30]

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

> [30] AntonUSAnoV (19.03.08 18:08)

Что еще нужно? Подумать за тебя? Может сам уже сообразишь, а? Или совсем дурак? :)

> AntonUSAnoV (19.03.08 18:08) [30]

Неужели [24] ну ни сколечки, ни на на мизинчик не помогает?

← →
AntonUSAnoV (2008-03-19 18:15) [33]

ну хотть намекните что ли ,

> [30] AntonUSAnoV (19.03.08 18:08)

Тебе ответ еще в [3] дали. Только ты решил заколачивать гвозди в бетон.... а что? ...можно же :)

> [33] AntonUSAnoV (19.03.08 18:15)

Намекаю: читай ветку сначала... выпиши на листочек ключевые моменты.... всего лишь малость подумай ...и все получится)

← →
AntonUSAnoV (2008-03-19 18:18) [36]

блин ну не понял я значит, я там отвечал вроде, так kolan ни чего мне не возразил на мои выводы..

> [7] AntonUSAnoV (19.03.08 17:28)
> key:=chr(uppercase(key));

Вот я не понимаю, КАК можно такое придумать??? Да и еще и возмущатся, что не работает.... :(
У меня подозрение, что при написании ты не думаешь СОВСЕМ. Твое написание программы заключается в простом переборе знакомых слов и их групировка, что само собой не нравится компилятору :(

> [36] AntonUSAnoV (19.03.08 18:18)

Ты знаешь что нибудь о типах Делфи? ...о их совместимости?
Как можно разрабатывать программу не зная основ???

> [36] AntonUSAnoV (19.03.08 18:18)
> так kolan ни чего мне не возразил на мои выводы

Колян тебя вытаскивал-вытаскивал из ямы, но ты не только руки не подавал, но еще и специально глубже в нее(яму) залазил... :(

....В итоге когда я подогнал кран и спустил к тебе(в яму) крюк, ты умудрился ударится о него головой и потерять сознание.... :(

как привести вводимый символ к верхнему регистру Найти похожие ветки