Wyświetlanie "ciekawostek" w aplikacji z pliku

Siemka Wszystkim.
Chce w aplikacji na panelu wyświetlać coś na zasadzie ciekawostek. Byłyby to linijki tekstu wyświetlane losowo co pewien czas. Chciałbym by w wybranych słowach było formatowanie tekstu wiec w grę w chodzi chyba plik .rtf Więc na panel musiałbym wrzucić TRichEdit usunąć krawędzie i zrobić tło jak TPanel .. Zrobiłem taki oto kod:

procedure TForm1.Button1Click(Sender: TObject);
begin
OpenDialog1.Execute;
if opendialog1.FileName <> '' then
begin
Randomize;
Timer1.Enabled := True;
 end;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
var
i: Integer;
loadsl: TStringList;
begin
i := Random(i);
loadsl := TStringList.Create;
try
loadsl.LoadFromFile(OpenDialog1.Filename);
i := Random(Pred(loadsl.Count));
RichEdit1.Lines.Add(loadsl.Strings[i]);
finally
loadsl.Free;
end;
end;

Działa tak jak ma ale i tak tu bym prosił o uwagi i możliwie o poprawę o ile to możliwe . Oraz jak zrobić by wczytany tekst wyświetla się tylko w pierwszej(zerowej) linii RicEdita
a i czy coś w RichEdit trzeba zmienić w Properties by zachować formatowanie z pliku jeśli chodzi o kolor czcionki czy pogrubienie. A jeśli ktoś ma inny pomysł na coś takiego to też bardzo proszę.

RichEdit to armata na muchę - potrzebujesz wyświetlić linijkę tekstu z jakimś tam formatowaniem (jakim dokładnie?), więc spokojnie wystarczyła by zwykła formatowalna etykieta. W sieci możesz znaleźć kody etykiet, których zawartość da się formatować np. znacznikami HTML, więc zainteresuj się tym tematem.

Etykietka tak jestem za ale nie znaczniki Html. Dlatego że dodając do zewnętrznego pliku linijki tekstu chce widzieć jak wyglądają poszczególne linie.Oczywiście mogę je podejrzeć w czymś ale tu widzę to na żywo. Nie jest wcale powiedziane które słowo będzie np.: z** Boldem **. Każda linijka będzie się pod tym względem różnić. Pisząc w WordPadzie mam od razu podgląd. Np. gdyby były etykiety które czytały by z pliku .rtf wraz z jego formatowaniem lub TEdit to by była bajka

Za dużo byś chciał :D

Jeśli zależy Ci na składni plików .rtf to jest coś takiego jak RtfLabel v.1.3c, komponent darmowy i z otwartymi źródłami, do pobrania z tej strony. Nie bawiłem się, ale wygląda obiecująco.

Dzięki.
Mógłbym prosić o pomoc w instalacji, nigdy tego nie robiłem.

Jest tam komponent do kilku wersji Delphi w tym **RtfLabel_D7 **i **RtfLabel_D7D **starsze pisało wyrzucić z tych nie wiem który i tak nie wiem co z tego wyjdzie bo ja mam Berlina.
Teraz mam podać **unit file names **mam tam kilka plików ** .pas **mam dodać je wszystkie?
później mam podać paczkę **RtfLabel_D7D **podaje tą ?

jeśli wszystko dobrze coś mam dodawać do plików Borlanda z Delphi ? Czy Delphi zrobi to automatycznie?
Pytam zanim do zrobię by niczego sobie w Delphi przypadkiem nie namieszać