Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.14;
Скачать: [xml.tar.bz2];




Вниз

Как прочитать определённый символ из Edit ? 


SemFLY   (2001-12-26 03:24) [0]

В TEdit введено " 1test "
Как мне прочитать только первый символ, только "1" ?

Спасибо !



Bar   (2001-12-26 06:42) [1]

var
s: String;
begin
s:= Edit.text;
первый_символ = s[1];
первый_символ = copy(s, 1, 1); //см. Help
end;



Mbo   (2001-12-26 06:43) [2]

все верно, только ни к чему вводить дполнительную переменную
первый_символ = Edit1.Text[1];



gek   (2001-12-26 07:29) [3]

похоже лучше проверять есть ли текст или нет
if edit.text <> "" then




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.14;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.029 c
4-42637           DDN                   2001-11-09 23:52  2002.01.14  
VirtualQuery


7-42583           ASTARD                2001-09-28 14:56  2002.01.14  
Интересно!


3-42333           Марина                2001-12-10 11:07  2002.01.14  
Скроллинг мыши


1-42492           DJ X                  2001-12-25 18:24  2002.01.14  
Текст в Label е


3-42382           NLO                   2001-12-07 12:16  2002.01.14  
<font color=