Hallo,
ich möchte eine Liste abarbyten.
Also man hat quasi einen Text der in etwa so aussehen könnte:
Code:
hallo mein name ist
ich bin 99 jahre alt
ich liebe pizza
außerdem asdasdasd
obendrauf gefallen mir
Ohne jetzt zu erwähnen warum ich das so möchte, sollte es nach Bearbeitung der routine dann so aussehen:
Code:
hallo mein name ist:
ich bin 99 jahre alt:
ich liebe pizza:
außerdem asdasdasd:
obendrauf gefallen mir:
Jemand eine Idee wie das machbar wäre?
Habs so versucht:
Code:
procedure TForm1.pSetzedoppel;
var i : Integer;
begin
for i := 0 to memo1.Lines.count - 1 do
begin
memo1.Lines[i] := memo1.Lines[i] + ':';
end;
end;
Ist aber völliger Schwachsinn! Also bitte um Denkanstöße
MfG