Werte in Textdatei speichern und als Liste in Popup ausgeben

[Jessa]

Hallo alle zusammen,

ich möchte mir ein kleines Programm basteln womit ich im Traymenü einfach schnell Programme starten kann. Strings deffinieren viel mir nie schwer doch mein Problem war immer, wie kann ich denn mehrere Strings deffinieren.

Ich möchte nämlich eine Form machen wo man die Programmnamen (nur name(.exe), kein Pfad) eintragen kann und diese dann in einer Textdatei gespeichert werden. Aus dieser Textdatei läd dann der Popup die Liste der Namen die sie dann im Popup Menü starten soll, ebenfalls soll daraus dann ein ShellExecute ausgeführt werden.

Weiß wer da weiter? Ich bin ziemliche Anfängerin.

[RavenIV]

nimm einfach eine TStringlist.
Dort gibt es SaveToFile und LoadFromFile.
und Du kannst auch auf Stringlist.Strings[i] zugreifen, um die einzelnen Strings anzusprechen.

[s-off]

Hallo,

schau Dir das mal an -> PopUp zur Laufzeit

[Jessa]

Kann mir das wer anhand eines Beispiels erklären? Wie ich solche Listen benutze?

Und die andere Frage ist, wie mache ich es das er bei Programmstart oder Laden von der Datei die Popup Menüeinträge mit den Namen füllt und diese per ShellExecute aufgerufen werden können, also alle.

[s-off]

Lies doch mal meinen Beitrag...

[DGL-luke]

TStringList



Einfaches Beispiel:

Delphi-Quellcode:

var st: TStringList;
    s: string;
begin
  st := TStringList.Create;
  try
    st.LoadFromfile('text.txt');
    for s in st do //ab BDS 2005, ansonsten mit Iterationsvariable: for i := 0 to st.Count -1 do
      showmessage(s); //ab BDS 2005; ansonsten showmessage(st.strings[i]);
  finally
  end;
end;