Форум: "Основная";
Поиск по всему сайту: 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.026 c
6-42528           Робот                 2001-10-18 16:09  2002.01.14  
Нужен почтовый робот,


3-42358           Aquarius              2001-12-11 15:55  2002.01.14  
Чтение данных из XML и их запихивание в базу.


3-42365           csf                   2001-12-10 16:28  2002.01.14  
В Oracle есть dual, а что есть в InterBase e?


3-42388           Dim                   2001-12-10 12:48  2002.01.14  
DLL


3-42380           bk                    2001-12-10 14:25  2002.01.14  
Ms Outlook