Komponent

jeg plejer at lave et panel inden i panelet laver man så en memobox og sætter baggrundsfarven til sort og textfarven til hvid.
Derefter sætter du enabled på panelet til false (sådan at man ikke kan markere teksten inden i memoen).
og så laver du en timer der rykker memoen opaf.

procedure Tform1.timer1ontimer(sernder: Tobject);
begin
memo1.top := memo1.top + 2;
if memo1.top = '200'{sæt til den værdi hvor memoen skal stoppe} then
timer1.enabled := false;
end;

ovenstående har jeg selv brugt massere af gang i aboutbokse. Hvis der er noget du er i tvivl om i min forklaring så sig endelig til.

Mvh. _DJ_ /IRC Undernet: #delphi

dj: Hvilken brilliant ide!
Simplet men genialt!

Undskyld: Simplet => Simpelt

Det var netop det jeg ville bruge den til dj.

stone: Jeg synes du lyder en smule ironisk :)

Madshenrik: Hvis det var svar på dit spørgsmål så accepter det så vi kan få spørgsmålet lukket.

Til dj:
Nej! Det er aldeles ikke ironi! JEG synyes virkelig at det er en genial ide når noget så komplekst løses så simpelt!

heh, jeg har nu aldrig fundet det ret komplekst, jeg mener jeg fandt på den løsning da jeg endnu ikke havde ret meget erfaring inden for programming og siden har jeg brugt modellen flittigt.
Dengang kunne jeg jo ikke så mange fancy ting i Delphi, så derfor er løsningen lavet udfra ganske simple standard komponenter og procedurekald.
om det så er genielt ... tjahh..

Men det er da altid rart at få ros for sine ideer også selvom de måske egentlig er ligetil når først man lige ser dem :))

Btw. Godt Nytår ! :)