Knap til skift af baggrundsfarve

Form1.Color = clRed;

I din OnClick procedure indsætter du ovennævnte kode.

Den virker ikke den procedure du nævner der. For at det skal virke skal den se sådan her ud:

procedure.......
begin
  Form1.Color:=clBlue;
end;


Derfor får du desværre ikke nogle point laffe...

Men hvis du kan fortælle mig hvordan man laver en about box, så skal du få de point

AboutBox:

Vælg File->New Form
Nu har du to forme, Form1 og Form2. Form2 er din AboutBox.
Læg de ting du skal ha' ind på den så den nu ser ud som du vil have den.
Vælg Project->Options...->Forms
Her finder du navnene på de forme du har tilgængelige (Form1 og Form2). Vælg Form2 og tryk på > så den hopper fra "Auto-create forms" til "Available forms".

Nu har du gjort så din AboutBox ikke optager recurser når den ikke bliver brugt.

Tryk på den knap der skal vise din aboutbox og indsæt følgende kode:

  Form2 := TForm2.Create(Form1);
  Form2.Show; //eller Form2.ShowModal, hvis du ønsker at brugeren ikke kan komme tilbage til programmet uden at lukke aboutbox'en.

Når du så har lavet din Form2, skal den selvfølgelig fjernes fra hukommelsen igen... Det gør du på følgende måde:

Vælg din Form2. Under Events finder du OnClose som du dobbeltklikker på og indsætter følgende kode:

  Action := caFree;

Nu bliver din Form2 fjernet fra hukommelsen og du har lavet en sej AboutBox! :)

Go' fornøjelse!

//hermandsen


Lige en lille kommentar:
Grunden til at laffe's kode ikke virkede var, som du sikkert selv har set, at han ikke havde skrevet ":=", men bare "=".
Det er rigtigt som du selv siger at koden skulle have været:

  Form1.Color := RGB(123, 76, 225);

Mange tak for svarene

Velbekomse! :)