TStrings laden

[Bastler]

Hallo;

Ich möchte einen Text (einfachen String) aus einer Datei laden (version.dat), und ihn bei Bedraf in einem ShowMessage anzeigen.
Ich würde das jetzt eigentlich über ein Memo laden und dann bei ShowMessage den MemoText nehmen, gibts es eine Koponente in der Ich Strings laden kann, ohne den Umweg über ein Memo?

Bisher siehst so aus:

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
begin
if Fileexists(ExtractFilePath(Application.ExeName)+'version.dat') then
Memo1.Lines.LoadFromFile(ExtractFilePath(Application.ExeName)+'version.dat');
ShowMessage('Sie haben momentan '+Memo1.Lines[0]+' installiert.')
end;

und würde geren was in der Art:

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
begin
if Fileexists(ExtractFilePath(Application.ExeName)+'version.dat') then
IRGENDWAS.LoadFromFile(ExtractFilePath(Application.ExeName)+'version.dat');
ShowMessage('Sie haben momentan '+IRGENDWAS+' installiert.')
end;

Also ich suche die IRGENDWAS Komponente

Kann mir wer weiter helfen, wenn ich ImageList bisher Verstanden habe, suche ich sowas, nur halt für Strings...