![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
|
|
#1
|
|||
|
|||
|
Как прочитать слова в edit до символа ';'? Помогите пожалста
|
|
#2
|
|||
|
|||
|
Код:
var
S : String;
begin
S := copy(Edit1.Text,1,Pos(';',Edit1.Text)-1);
end;годится? |