Auslesen reservierter Wörter aus Ini's

TheEM

Mitglied
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

Mitglied
falls es jemanden interessiert, ich hab die Lösung von einem Kollegen bekommen :
PHP:
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]
 
Zuletzt bearbeitet von einem Moderator: