Форум: "Основная";
Поиск по всему сайту: 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.019 c
3-42391           shurik                2001-12-13 16:53  2002.01.14  
кодировка


3-42366           comwad                2001-12-11 13:50  2002.01.14  
LIKE в хранимой процедуре


3-42374           Kirill                2001-12-10 13:42  2002.01.14  
Zeos Help+Doc


7-42578           Lena                  2001-10-01 11:00  2002.01.14  
Помогите


3-42390           Bizon                 2001-12-13 16:26  2002.01.14  
Что происходит с ролями?