DBMemo nesnesinde her satırda 1 kelime

[digitdigitman]

MErhaba arkadaşlar ;
konu ile ilgili bilgisi olan arkadaşlar yardımcı olursa çok sevinirim.
yapmak istediğim şu Access veritabanında bir alanım var ve bu alanda
xxxxx:xxxxxx xxxxxxxxxxx:xxxxxxxxxxxxxxx xxxxxx:xxxxxx gibi gelimeler ve açıklamaları var istediğim şey bu alandaki verileri db memo içerisinde gösterirken her boşluktan sonraki kelime ve açıklamasını bir alt satırda göstermek bu yapılabilirmi acaba;

[esistem]

Selam;
stackoverflow dan alıntıdır.

Kod: Tümünü seç

var
List: TStrings;
begin

List := TStringList.Create;
  try
    ExtractStrings([' '], [], PChar('xxxxx:xxxxxx xxxxxxxxxxx:xxxxxxxxxxxxxxx xxxxxx:xxxxxx'), List);

memo1.Lines:=list
  finally
    List.Free;
  end;