Auslesen reservierter Wörter aus Ini's

[TheEM]

Hi - der Betreff sagt eigentlich alles :
ích würd gern wissen wie ich beim Öffnen einer Ini-Datei alle reservierten Wörter auslesen / finden kann;
Wenn das mit dem selbstsuchen von reservierten Wörtern nicht geht würd ich gern wissen wie ich selbige deklarieren kann.

mfg TheEM

 

[TheEM]

falls es jemanden interessiert, ich hab die Lösung von einem Kollegen bekommen :

function IsReserved(S: String): Boolean;
var
  RWList: TStringList; // Liste der reservierten Wörter
  i: Integer; // Laufvariable
begin
  RWList := TStringList.Create;
  Result := False;
  {Liste initialisieren, z.B. aus Datei laden:}
  RWList.LoadFromFile(ExtractFilePath(Application.ExeName) +
      'FileName.dat'); // <<< FileName.dat durch einen Dateinamen ersetzen
  {Liste durchsuchen:}
  for i := 0 to RWList.Count - 1 do
  begin
    RWList[i] := Trim(RWList[i]); // Leerzeichen am Anfang und am Ende weg
    if SameText(RWList[i], S) then // reseviertes Wort gefunden
    begin
      Result := True;
      Break;
    end;
  end;
  RWList.Free;
end;

[edit mod=joki]php-code-tags eingefügt[/edit]