Avatar billede Slettet bruger
07. april 2008 - 09:47 Der er 7 kommentarer og
1 løsning

Søges en bedre måde at optimere koden på

checkbox1.Checked := false;
checkbox2.Checked := false;
checkbox3.Checked := false;
checkbox4.Checked := false;
checkbox5.Checked := false;
checkbox6.Checked := false;
checkbox7.Checked := false;

Er der en bedre måde at optimere den kode på?
Avatar billede Slettet bruger
07. april 2008 - 09:58 #1
var
  I: Integer;
  Temp: TComponent;
begin
  for I := ComponentCount - 1 downto 0 do
  begin
    Temp := Components[I];
    if (Temp is TCheckbox) then
    TCheckbox(Temp).checked:=false;
   
  end;

end;

eller noget i den stil
Avatar billede kroning Nybegynder
07. april 2008 - 09:59 #2
Jeg ved ikke om dette er en optimering:

var
  i : integer;
begin
  for i:=1 to 7 do
    (Self.FindComponent('CheckBox'+IntToStr(i)) as TCheckBox).Checked:=false;
end;
Avatar billede sherlock Nybegynder
07. april 2008 - 10:10 #3
Det kan ihvertfald ikke udføres hurtigere end din egen kode.
Når det kun drejer sig om 7 kontroller, er det sådan set kun et spørgsmål om hvad du selv synes ser bedst ud.
Avatar billede w13 Novice
07. april 2008 - 10:13 #4
Følgende kan man i mange avancerede sprog, men jeg ved faktisk ikke, om man kan i Pascal, og jeg kan ikke teste det lige nu:

checkbox1.Checked:=checkbox2.Checked:=checkbox3.Checked:=checkbox4.Checked:=checkbox5.Checked:=checkbox6.Checked:=checkbox7.Checked:=false;
Avatar billede w13 Novice
07. april 2008 - 10:17 #5
Hmm, på min skærm kan man ikke se hele koden.

En kortere version:

checkbox1.Checked:=checkbox2.Checked:=checkbox3.Checked:=false;
Avatar billede Slettet bruger
07. april 2008 - 10:53 #6
Definationen på kodeoptimering er at skrive en kode så kort som mulig. Det giver både overblik og minimere fejl.

Så kroning er den absolutte vinder i dette spørgsmål...

smid et svar korning...
Avatar billede Slettet bruger
07. april 2008 - 10:54 #7
Sorry stavefejl....

smid et svar kroning
Avatar billede kroning Nybegynder
07. april 2008 - 10:59 #8
ok
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester