Thema: Delphi Aufzählung trennen

Einzelnen Beitrag anzeigen

Delphi.Narium

Registriert seit: 27. Nov 2017
2.419 Beiträge
 
Delphi 7 Professional
 
#2

AW: Aufzählung trennen

  Alt 10. Okt 2021, 16:40
Etwa so?
Delphi-Quellcode:
TIndexEnum = (CreateIndexTblAdressen_TblOrt, CreateIndexTblAdressen_TblStrassen)
 + (CreateIndexTblUser_TblAdressen, CreateIndexTblAuthor_TblUser, CreateIndexTblFile_TblDocuments)
 + (CreateIndexTblDocuments_TblAuthor);
Warum hast Du bei der ersten Deklaration vor und hinter dem + schließende und öffnende Klammern, bei der zweiten aber nicht?

Wobei ich mich frage, warum überhaupt mit +?
Delphi-Quellcode:
TTableEnum = (CreateTblStrassen, CreateTblOrt, CreateTblAdressen, CreateTblUser,
              CreateTblFile, CreateTblAuthor, CreateTblDocuments);

TIndexEnum = (CreateIndexTblAdressen_TblOrt, CreateIndexTblAdressen_TblStrassen,
              CreateIndexTblUser_TblAdressen, CreateIndexTblAuthor_TblUser,
              CreateIndexTblFile_TblDocuments, CreateIndexTblDocuments_TblAuthor);
Und: Warum müssen Aufzählungstypen in einer Zeile deklariert werden?
Delphi-Quellcode:
TTableEnum = (
  CreateTblStrassen,
  CreateTblOrt,
  CreateTblAdressen,
  CreateTblUser,
  CreateTblFile,
  CreateTblAuthor,
  CreateTblDocuments
);

TIndexEnum = (
  CreateIndexTblAdressen_TblOrt,
// und hier
    CreateIndexTblAdressen_TblStrassen,
(*
können jetzt auch noch
*)

      CreateIndexTblUser_TblAdressen,
// beliebig viele Kommentare
CreateIndexTblAuthor_TblUser,
{ und oder Leerzeilen, Leerzeichen zwischen stehen }
          CreateIndexTblFile_TblDocuments


,

CreateIndexTblDocuments_TblAuthor

);
Syntaktisch sollte das alles funktionieren, optisch mag's durchaus ein Graus sein
  Mit Zitat antworten Zitat