0

Есть:

Edit1.Text
Edit2.Text 
Edit3.Text
Edit4.Text

В Memo1 первая строка:

User1/15/21.06.12/568

Я нажимаю кнопку и переносим значения с Memo.Lines[0]. То есть с первой строки Memo в Edit:

Edit1.Text = User1
Edit2.Text = 15
Edit3.Text = 21.06.12
Edit4.Text = 568

Формат строки постоянно один и разделитель между значениями знак /

1 ответ 1

1
sl := TStringList.Create;
sl.Delimiter := '/';
sl.DelimitedText := Memo1.Lines[0];

И берёте кусочки из sl[i]

1
  • Благодарен, работает.
    – Gleb
    22 июл 2020 в 10:52

Ваш ответ

Нажимая на кнопку «Отправить ответ», вы соглашаетесь с нашими пользовательским соглашением, политикой конфиденциальности и политикой о куки

Всё ещё ищете ответ? Посмотрите другие вопросы с метками или задайте свой вопрос.