AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Code verkürzen

Ein Thema von Die Muhkuh · begonnen am 16. Jan 2005 · letzter Beitrag vom 16. Jan 2005
Antwort Antwort
Seite 1 von 2  1 2      
Benutzerbild von Die Muhkuh
Die Muhkuh

Registriert seit: 21. Aug 2003
7.332 Beiträge
 
Delphi 2009 Professional
 
#1

Code verkürzen

  Alt 16. Jan 2005, 12:35
Hi,

ich hab hier folgenden Code:

Delphi-Quellcode:
if RichEdit.Paragraph.Alignment = paLeftJustify then
    begin
      tbLinks.Checked := true;
      tbLinks2.Checked := true;
    end
    else
    begin
      tbLinks.Checked := false;
      tbLinks2.Checked := false;
    end;

    if RichEdit.Paragraph.Alignment = paCenter then
    begin
      tbZentriert.Checked := true;
      tbZentriert2.Checked := true;
    end
    else
    begin
      tbZentriert.Checked := false;
      tbZentriert2.Checked := false;
    end;

    if RichEdit.Paragraph.Alignment = paRightJustify then
    begin
      tbRechts.Checked := true;
      tbRechts2.Checked := true;
    end
    else
    begin
      tbRechts.Checked := false;
      tbRechts2.Checked := false;
    end;
Wie man unschwer erkennen kann, hab ich nen Button der immer checked := true sein soll, wenn z.B. der Text zentriert ist.

Der Code da oben ist nur ein bisschen lang. Wie könnte man den verkürzen?

Ich habs schon mit:

tbLinks.checked := paLeftJustify in RichEdit.Paragraph.Alignment versucht, aber das klappt leider nicht.
  Mit Zitat antworten Zitat
Benutzerbild von mirage228
mirage228

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

Re: Code verkürzen

  Alt 16. Jan 2005, 12:37
Hi,

Du hattest es schon fast

tbLinks.checked := paLeftJustify = RichEdit.Paragraph.Alignment; // = und nicht "in" mfG
mirage228
David F.

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

Registriert seit: 28. Dez 2004
Ort: Salzburg
379 Beiträge
 
#3

Re: Code verkürzen

  Alt 16. Jan 2005, 12:37
tbLinks.checked := (RichEdit.Paragraph.Alignment = paLeftJustify); Dust Signs
(aka AXMD in der EE)
Die Nummer, die Sie gewählt haben, ist imaginär. Bitte drehen Sie Ihr Telefon um 90° und versuchen Sie es erneut.
  Mit Zitat antworten Zitat
Benutzerbild von SirThornberry
SirThornberry
(Moderator)

Registriert seit: 23. Sep 2003
Ort: Bockwen
12.235 Beiträge
 
Delphi 2006 Professional
 
#4

Re: Code verkürzen

  Alt 16. Jan 2005, 12:37
wie oben schon geschrieben ist das alignment kein set sonder muss mit "=" geprüft werden
tbLinks.checked := paLeftJustify = RichEdit.Paragraph.Alignment;
Jens
Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
  Mit Zitat antworten Zitat
Benutzerbild von Die Muhkuh
Die Muhkuh

Registriert seit: 21. Aug 2003
7.332 Beiträge
 
Delphi 2009 Professional
 
#5

Re: Code verkürzen

  Alt 16. Jan 2005, 12:38
Hi,

das geht ja schneller als man gucken kann.

Thx.

Ich vergess immer das man auch so eine Boolean-Prüfung machen kann...
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#6

Re: Code verkürzen

  Alt 16. Jan 2005, 12:38
Habe jetzt kein Delphi zur Hand, aber probier mal das:
tbLinks.Checked := RichEdit.Paragraph.Alignment = paLeftJustify; bzw. entsprechend:
tbLinks.Checked := not (RichEdit.Paragraph.Alignment = paLeftJustify); Sagt mal, geht es euch noch ganz gut? Wuie schnell antwortet ihr?
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat
Benutzerbild von Die Muhkuh
Die Muhkuh

Registriert seit: 21. Aug 2003
7.332 Beiträge
 
Delphi 2009 Professional
 
#7

Re: Code verkürzen

  Alt 16. Jan 2005, 12:41
Hi,

grad noch ne kleine Frage, weils grad passt.

Dust Signs war der einzigeste der es so geschrieben hat:

tbLinks.checked := (RichEdit.Paragraph.Alignment = paLeftJustify); Es ist ja wurscht, ob ich es so mache wie er, oder wie ihr anderen, oder?


@Luckie

viel zu Spät
  Mit Zitat antworten Zitat
Benutzerbild von mirage228
mirage228

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

Re: Code verkürzen

  Alt 16. Jan 2005, 12:42
Zitat von Spider:
Hi,

grad noch ne kleine Frage, weils grad passt.

Dust Signs war der einzigeste der es so geschrieben hat:

tbLinks.checked := (RichEdit.Paragraph.Alignment = paLeftJustify); Es ist ja wurscht, ob ich es so mache wie er, oder wie ihr anderen, oder?


@Luckie

viel zu Spät
Hi,

wenn der Ausdruck nur aus einer Bedingung besteht, kannst Du die Klammern weglassen. Bei 2 oder mehr Bedinungen, sind Klammern unabdingbar !

mfG
mirage228
David F.

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

Registriert seit: 23. Sep 2003
Ort: Bockwen
12.235 Beiträge
 
Delphi 2006 Professional
 
#9

Re: Code verkürzen

  Alt 16. Jan 2005, 12:45
ist völlig egal wie man es schreibt. Mit klammer hat einen entscheidenten Vorteil: Wenn ich später mit "AND" etc. die Bedingung erweitere erspare ich mir das Klammern setzen was dann notwendig wird. Und manche finden es it klammern auch übersichtlicher. Da der Programmierer aber eigentlich ein fauler Mensch ist lässt er die klammern weg (da sie nicht notwendig sind)

[Edit]Och menno, das macht kein Spaß wenn die anderen immer schneller antworten [/Edit]
Jens
Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
  Mit Zitat antworten Zitat
tommie-lie
(Gast)

n/a Beiträge
 
#10

Re: Code verkürzen

  Alt 16. Jan 2005, 12:46
Zitat von Spider:
oder?
Meinst du die Klammer? Ja, ist egal, da die Zuweisung die niedrigste Priorität hat.


Edit: Narf... Na immerhin weiß er's jetzt mit Sicherheit, so oft wie er die Antwort bestätigt kriegt hat...
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 1 von 2  1 2      


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 19:11 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz