Just as I expected, "Izeqb" <izeqb@secret.dk> came up with this:
>> Det er da noget vrøvl! Prøv at fjerne paranteser og anførselstegn! Du
>> kan ikke assigne en string-værdi til en boolean!
>
>Jeg er ikke en haj endnu...
Nej, det vaj jeg heller ikke da jeg startede! *<
>Nu har jeg så lavet koden lidt om;
>
>procedure TFormVideo.DBGridIndholdCellClick(Column: TColumn);
>begin
> if Gembaand.enabled then
> DBGridIndhold.Enabled := False
> Else
> if
> GemBaand.Enabled := false
> then
> DBGridIndhold.Enabled
>end;
>
>Når jeg prøvet at kompilere for jeg at vide at "Type of expression must be
>BOOLIAN", mens linien hvor der kun står "THEN" er markeret!
Lidt forklaring:
:= betyder at du vil tildele variablen på venstre side værdien der
står på højre side.
= betyder at du vil sammenligne de to værdier. Det er egentlig en
funktion der returnerer True eller False.
For at vende tilbage til dit oprindelige problem:
Den bedste løsning er (erstat al den kode du skrev i det indlæg jeg
her svarer på med det):
DBGridIndhold.Enabled := not Gembaand.Enabled;
Forklaring:
Jeg bruger := fordi jeg vil tildele en værdi. Jeg vil tildele til
DBGridIndhold.Enabled, derfor står det på venstre side.
Gembaand.Enabled er en boolsk værdi (boolean), derfor kan jeg bruge
"not" operatoren på den. Not negerer det der står efter den, altså
"not True = False" er et sandt udsagn. (Her skal du huske at =, > og <
er de sidste operatorer Delphi regner med, altså den tager først "not
True" og sammenligner det derefter med False.
Når jeg i eksemplet/løsningen så skriver "not Gembaand.Enabled"
betyder det at jeg vil have den modsatte værdi af Gembaand.Enabled.
Den tildeler jeg så til DBGrid.Indhold.Enabled.
Håber den forklaring var god nok. *<
(Lige et spørgsmål: Har du før arbejdet med VisulaBasic? Det kunne
nemlig se sådan ud!)
Niels (aka. niLLer)
--
e-mail: nmartin at iname dot com ICQ UIN: 50187323
http://xoasis.com/~niller/ - niLLer's pages (My programs, in English)
http://whitehat.dk/g4s/ - The G4S Page (Personlig side, på dansk)
-- I've been Windozed!