![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
||||
|
||||
![]() есть запись в файле например
одно слово=другое слово как мне его разбить на 2 части до = и после, слова могут быть разной длинны |
#2
|
|||
|
|||
![]() Блин, поиском будем пользоваться?
Буквально 3-4 дня назад был похожий вопрос... Код:
var S : String; Word1, Word2 : String; EqPos : Integer; begin S := 'aaa=bbb'; EqPos := Pos('=',S); Word1 := Copy(S,1,EqPos-1); Word2 := Copy(S,EqPos+1,Length(S)-EqPos+1); end; |
#3
|
||||
|
||||
![]() Цитата:
да да )) я помню где-то я уже встречал этот вопрос, но забыл на каком форуме, в google пробовал искать но не нашел ответа Спасибо |
#4
|
||||
|
||||
![]() ![]() TAleD = class(TUser) public function HelpMe(ASubject, ARequest: String): String; function GiveMeExample(ASubject: String): TStringList; procedure WriteReview(APost: Integer; ADescription: TStringList); end; |