Форум: "Основная";
Текущий архив: 2002.06.17;
Скачать: [xml.tar.bz2];
Вниз
как задать свойство Edit, что бы весь текст набирался в верхнем? Найти похожие ветки
← →
PTE (2002-06-04 12:07) [0]как задать свойство Edit, что бы весь текст набирался в верхнем регистре?
спасибо
← →
Виктор Щербаков (2002-06-04 12:10) [1]Edit1.CharCase := ecUpperCase;
← →
PTE (2002-06-04 12:13) [2]Спасибо, а может кто знает, вот у меня на форме этих эдитов много можно сразу для всех задать это свойство или надо для каждого в отдельности?
← →
PTE (2002-06-04 12:15) [3]да а для StringGrid так же оно задается?
← →
Belov (2002-06-04 12:41) [4]если в desing-time - то сам понимаешь как...
если в real-time
i: Integer
...
begin
for i:=0 to ComponentCount-1 do
begin
if (Components[i] is TEdit) then
(Components[i] as TEdit).CharCase:=ecUpperCase;
end;
← →
Song (2002-06-04 13:15) [5]Если в design time их нужно все выделить и поменять соответсвущее свойство - оно поменяется у всех выбранных элементов.
← →
MAxiMum (2002-06-04 18:26) [6]В StringGrid"е нельзя. Но можно отлавливать OnKeyPress и там изменять передаваемую переменную Key:
Key := AnsiUpperCase(Key)
← →
Blacki (2002-06-05 20:47) [7].
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.06.17;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.005 c
