Listbox Speichern, + Listbox und Shellexecute

[Sharky]

Zitat von killerkarl:

Also ich möchte ein Programm haben, das sich manuell starten lässt...

Aber dafür brauchst Du keine visuellen Objekte (TForm, TListBox).

Delphi-Quellcode:

program Project1;

uses
  SysUtils,
  ShellApi,
  Windows,
  Classes;

  {$R *.res}

var
 sl : TStringList;
 i  : Integer;
 datei : String;
begin
  datei := ExtractFilePath(ParamStr(0)) + 'test.cfg';
  if FileExists (datei) then
  begin
    sl := TStringList.Create;
    try
      sl.LoadFromFile(datei);
      for i:=0 to Pred(sl.count) do
      begin
        Shellexecute(0, nil,PAnsiChar(sl.Strings[i]), nil, nil, SW_SHOW);
       end;
    finally
      sl.free;
    end;
  end;
end.

[Edit]Die Konfigurationsdatei kannst Du ja mit einem zweiten Programm bearbeiten.