Форум: "Основная";
Поиск по всему сайту: 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.72 MB
Время: 0.023 c
1-42426           Alex44                2001-12-24 10:38  2002.01.14  
Fonts v TTreeView


3-42386           Oleg_K                2001-12-08 12:42  2002.01.14  
Работа со строками в DBGrid


3-42341           kay                   2001-12-11 01:15  2002.01.14  
Timer


6-42532           yuger                 2001-10-19 17:56  2002.01.14  
Доступ к компьютеру из сети


1-42459           Dim                   2001-12-24 14:23  2002.01.14  
Контроль за перемещениями мышки.