Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: Doppelte Einträge in 5 ComboBoxen herausfinden ?

    Delphi
    by MaBuSE, 14. Dez 2007
  Du macht unnötig viele Vergleiche.
  
  i = 1 und t = 2 gibt immer das selbe Ergebnis wie i = 2 und t = 1
  
  
  Ich habe meine Funktion von ItemIndex auf Text Vergleich umgestellt, da es Dir wohl sympatischer ist ;-)
  
  (Durch das Result := Result and (a.Text <> a.Text); wird übrigens bei Result := False kein Vergleich mehr durchgeführt, da der Compiler das wegoptimiert.)
  
  ...
• Forum: Object-Pascal / Delphi-Language

  Re: Doppelte Einträge in 5 ComboBoxen herausfinden ?

    Delphi
    by MaBuSE, 14. Dez 2007
  Ok Du warst schneller :-)
  Aber was macht Du wenn er 7 Comboboxen auf dem Form hat, aber nur 5 Testen will?
  In dem Fall ist das mit dem direkten Zuweisen einfacher. ;-)
  
  Mann kann das auch in eine Funktion packen so was wie:
  ...
  function CheckComboBoxes(const a: array of TComboBox): Boolean;
  var i, j: Integer;
  begin
  Result := True;
• Forum: Object-Pascal / Delphi-Language

  Re: Doppelte Einträge in 5 ComboBoxen herausfinden ?

    Delphi
    by MaBuSE, 14. Dez 2007
  Eine einfache Lösung auf die Schnelle ist folgende:
  
  (Natürlich kann man die Comboboxen auch mit FindComponent suchen, aber das hier ist ja nur ein einfaches Beispiel.
  Das Füllen der Comboboxen ist nur zu Testzwecken drin. 5 Comboboxen und ein Button auf das Form und dann folgenden Quelltext einfügen.)
  
  unit Unit1;
  
  interface
  
  uses