![]() |
|
#1
|
||||
|
||||
![]() Допустим у меня есть файл С:\1.txt
Надо найти в нем строчку, которая начинается с х(вводимая переменная),и скопировать всю строку в переменную а Помогите плз=) |
#2
|
|||
|
|||
![]() Код:
var S : TStringList; I : Integer; X : String; A : String; begin X := 'aaa'; // Искомое начало строки. S := TStringList.Create; S.LoadFromFile('1.txt'); For I := 0 To S.Count-1 Do If Copy(S[i],1,Length(X)) = X Then Begin A := S[i]; // Break; // Раскомментировать, если надо остановиться. End; S.Free; end; |
#3
|
||||
|
||||
![]() Спасибо,помогло=)
|