Zeile mit bestimmten Wort editieren

[Cicaro]

Gibt color an, dass ein Farbwert folgt ?
Dann such einfach, wenn du den Text in ein Memo geladen hast, nach dem Text 'color' in dem Feld Text der Memo-Komponente.

Delphi-Quellcode:

var StringZahl:String;

if Length(Memo1.Text)-Length('color')>=0 then
  for i:=1 to Length(Memo1.Text)-Length('color')+1 do
    if Copy(Memo1.Text,i,Length('color'))='color' then
      StringZahl:=Copy(Memo1.Text,i+Length('color')+1,6);// Vorsicht, wenn color am Ende der Datei steht !

So würde ich das machen (ohne es getestet zu haben).