Ahojte

Nakolko ma cez tieto prazdniny nici neskutocna nuda, pustil som sa do programovania v Delphi
Mam ale jeden problem, snad mi poradite, do tohto som fakt laik..

Robim taku jednu vec, ze napisete do Editu farbu, stlacite Button, a mala by sa zmenit farba Formu podla toho, aku farbu napisete do Editu.

Skusal som to nasledovnym kodom:

procedure TForm1.Button1Click(Sender: TObject) ;
begin
if Edit1.Caption (neviem, ci tu nema byt nahodou .Text?):='Biela' then Form1.Color:='clWhite'

end;

end.

Co tu robim zle? Stale vyhlasuje chybu, Type of expression must be BOOLEAN at line XX.


Diki moc

1) má tam byť Edit1.text a nie Edit1.Caption
2) porovnávanie je cez = a nie cez :=
3) bodkočiarka ti na konci chýba

Teraz tam mam

if Edit1.Text= 'Biela' then Form1.Color= 'clWhite';

ale stale ma to nepusti do spustenia programu, pise E2029 ':=' expected but '=' found

Form.Color := clWhite
Tam už priradzuješ, takže použiješ :=

(a samozrejme clWhite je konštanta, nie reťazec)

Dik BX, dal som tam dvojbodku, a dal som clWhite prec z apostrofov a uz to funguje, obaja mate k+