1:
2:
3:
4:

//...  
REGISTRY.OpenKey('Software\Borland\Delphi\7.0\Editor\Highlight\Assembler',FALSE);
SynPasSyn1.AsmAttri.Foreground := REGISTRY.ReadString('Foreground Color New');
//..					

1:

  [Fehler] frmMain.pas(282): Inkompatible Typen: 'TColor' und 'String'					

1:

if REGISTRY.ReadString('Foreground Color New') = 'clBlack' then SynPasSyn1.AsmAttri.Foreground := clBalck;					

1:
2:
3:
4:
5:
6:
7:

---------------------------
Benachrichtigung über Debugger-Exception
---------------------------
Im Projekt Codeview.exe ist eine Exception der Klasse ERegistryException aufgetreten. Meldung: 'Fehler beim Holen der Daten für 'Foreground Color New''. Prozess wurde angehalten. Mit Einzelne Anweisung oder Start fortsetzen.
---------------------------
OK   Hilfe   
---------------------------					

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:

procedure TForm1.FormCreate(Sender: TObject);

  function _StringToColor(const S: string): TColor;
  begin
    try
      Result := StringToColor(S);
    except
      Result := clNone;
    end;
  end;

begin

  with TRegistry.Create do
  begin
    try
      RootKey := HKEY_CURRENT_USER;
      if OpenKey('Software\Borland\Delphi\7.0\Editor\Highlight\Assembler', False) then
      begin
        SynPasSyn1.AsmAttri.Foreground := _StringToColor(ReadString('Foreground Color New'));
        // usw.
      end;
    finally
      Free;
    end;
  end;

end;					

1:

_StringToColor(Registry.ReadString('Foreground Color New'))