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:

markieren

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:

markieren

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...

**Khabarakh**

Na, wie wird wohl das Pendant zu TImagelist für Strings heißen

?

**Christian Seehase**

Moin Bastler,

dazu fallen mir auf Anhieb zwei Möglichkeiten ein:

Lade die Datei in eine TStringList, und nimm deren Eigenschaft Text.
Lade den String aus einem TFileStream.

**TBx**

klar.
Nimm einfach TStringList.
TMemo.Lines sind ja auch nur Strings.

Gruß

onlinekater

**Bastler**

Hätt man auch drauf kommen können, naja trotdem Danke euch dreien....

**Bastler**

Doch noch eine Frage, wo finde ich die Komponente...? Also TStringList?

**himitsu**

Wenn du schon wustest, daß Memo1.Lines dir was passendes liefert, dann hättest du einfach nur mal nachsehen zu brauchen, als was Memo1.Lines definiert ist. (entweder im QuellCode und in der OH steht es auch nochmal)

[add]
Siehe OH

**Khabarakh**

Hat jemand gesagt, es sei eine Komponente

?

TStringList

[edit] @himitsu: Nachher versucht er dann noch, TStrings zu instanziieren

.
[/edit]

**Bastler**

Naja, klang bei dir sehr danach, aber keine Panik, auf die Idee käme ich dann doch nich...

TStrings laden

TStrings laden

Re: TStrings laden

Re: TStrings laden

Re: TStrings laden

Re: TStrings laden

Re: TStrings laden

Re: TStrings laden

Re: TStrings laden

Re: TStrings laden

Forumregeln

Khabarakh Registriert seit: 18. Aug 2004 Ort: Brackenheim VS08 Pro 2.876 Beiträge	#2 Re: TStrings laden 29. Aug 2006, 13:00 Na, wie wird wohl das Pendant zu TImagelist für Strings heißen ? Sebastian Moderator in der EE
	Zitat

Christian Seehase (Co-Admin) Registriert seit: 29. Mai 2002 Ort: Hamburg 11.106 Beiträge Delphi 11 Alexandria	#3 Re: TStrings laden 29. Aug 2006, 13:00 Moin Bastler, dazu fallen mir auf Anhieb zwei Möglichkeiten ein: Lade die Datei in eine TStringList, und nimm deren Eigenschaft Text. Lade den String aus einem TFileStream. Tschüss Chris Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel. Der Klügere gibt solange nach bis er der Dumme ist
	Zitat

TBx (Administrator) Registriert seit: 13. Jul 2005 Ort: Stadthagen 1.878 Beiträge Delphi 12 Athens	#4 Re: TStrings laden 29. Aug 2006, 13:01 klar. Nimm einfach TStringList. TMemo.Lines sind ja auch nur Strings. Gruß onlinekater Thomas Breitkreuz Gruß Thomas - Admin DelphiPRAXIS - Admin Delphi-Treff - Embarcadero MVP
	Zitat

Bastler Registriert seit: 15. Aug 2006 153 Beiträge Delphi 7 Personal	#5 Re: TStrings laden 29. Aug 2006, 13:08 Hätt man auch drauf kommen können, naja trotdem Danke euch dreien.... Zwei Dinge sind unendlich, das Universum und die menschliche Dummheit, aber beim Universum bin ich mir noch nicht ganz sicher (A. Einstein)
	Zitat

Bastler Registriert seit: 15. Aug 2006 153 Beiträge Delphi 7 Personal	#6 Re: TStrings laden 29. Aug 2006, 13:19 Doch noch eine Frage, wo finde ich die Komponente...? Also TStringList? Zwei Dinge sind unendlich, das Universum und die menschliche Dummheit, aber beim Universum bin ich mir noch nicht ganz sicher (A. Einstein)
	Zitat

Khabarakh Registriert seit: 18. Aug 2004 Ort: Brackenheim VS08 Pro 2.876 Beiträge	#8 Re: TStrings laden 29. Aug 2006, 13:22 Hat jemand gesagt, es sei eine Komponente ? TStringList [edit] @himitsu: Nachher versucht er dann noch, TStrings zu instanziieren . [/edit] Sebastian Moderator in der EE
	Zitat

Bastler Registriert seit: 15. Aug 2006 153 Beiträge Delphi 7 Personal	#9 Re: TStrings laden 29. Aug 2006, 13:35 Naja, klang bei dir sehr danach, aber keine Panik, auf die Idee käme ich dann doch nich... Zwei Dinge sind unendlich, das Universum und die menschliche Dummheit, aber beim Universum bin ich mir noch nicht ganz sicher (A. Einstein)
	Zitat