How can I make the text of a% colon separated by a semicolon (;) as a record in TMemo
.
Example:
Code, Category, Phrase, Author
1; Motivational; Phrase 1; Author 1
2; Proverb; Sentence 2; Author 2
3; Dictation; Sentence 3; Unknown
What I'm finding more complicated is to "trim" the String at every semicolon (;) and read it later.
I think the code will follow this logic:
for Linha := 0 to Memo1.Lines.Count-1 do
begin
CDS.Insert;
CDSCod.AsString := {Código}
CDSCategoria.AsString := {Categoria}
CDSFrase.AsString := {Frase}
CDSAutor.AsString := {Autor}
CDS.Post;
end;