---

Hey, jeg skal bruge lidt hjælp til et lille simpelt program. Programmet går
ud på at man skriver et tal i en EditBox og så når man trykker på en knap
lægger programmet en hvis sum til dette tal.

Håber nogen kan hjælpe!

---

procedure TForm1.Button1Click(Sender: TObject);
begin
try
edit1.Text:= inttostr(strtoint(edit1.Text)+100);
except
on exception do showmessage('Sørg for, at der står et tal i
tekst-feltet');
end;
end;

Du skal også sørge for at stille klokken på din pc.

"Erik Gallacher" <simondj@mailme.dk> wrote in message
news:3bf67afb$1$25393$edfadb0f@dspool01.news.tele.dk...
> Hey, jeg skal bruge lidt hjælp til et lille simpelt program. Programmet
går
> ud på at man skriver et tal i en EditBox og så når man trykker på en knap
> lægger programmet en hvis sum til dette tal.
>
> Håber nogen kan hjælpe!
>
>