Einzelnen Beitrag anzeigen

Benutzerbild von mirage228
mirage228

Registriert seit: 23. Mär 2003
Ort: Münster
3.750 Beiträge
 
Delphi 2010 Professional
 
#1

Kürzung eines bool'schen Ausdruckes

  Alt 15. Apr 2004, 20:02
Hallo!

Ich habe eine function, die folgender maßen aussieht:
Delphi-Quellcode:
function TMainForm.CanFormat(Document: Integer): Booolean;
begin
  if IsIndexValid(Document) then
  begin
    if Dokumente[Document].EditorMode then
     { SynEdit speichert als TXT! }
      Result := False else
    Result := not Dokumente[Document].PlainText;
  end else Result := True;
end;
Diesen habe ich versucht so zu "kürzen":
Delphi-Quellcode:
function TMainForm.CanFormat(Document: Integer): Booolean;
begin
  Result := not ((not (IsIndexValid(Document)) or ((Dokumente[Document].EditorMode) or (not (not Dokumente[Document].EditorMode) and (not Dokumente[Document].PlainText)))));
end;
Auf den Blick scheint er zu funktionieren, aber ich bin mir nicht sicher, ob der Ausdruck bei allen Konditionen das gleiche Ergebnis, wie der Original Ausdruck hat.

Könnt ihr euch den unteren Ausdruck kurz anschauen und mir sagen, ob ich in korrekt umgeschrieben habe?
Hat es überhaupt Sinn, den obigen Ausdruck soweit zu kürzen?

Danke,
mirage228
David F.

May the source be with you, stranger.
PHP Inspection Unit (Delphi-Unit zum Analysieren von PHP Code)
  Mit Zitat antworten Zitat