Einzelnen Beitrag anzeigen

Cuchulainn

Registriert seit: 26. Aug 2003
182 Beiträge
 
Delphi 5 Enterprise
 
#4

Re: ini auslesen und übergeben

  Alt 26. Mai 2004, 08:46
Versuch es mal so (ungetestet):

Delphi-Quellcode:
procedure TMainForm.Button3Click(Sender: TObject);
var
  ini : TIniFile;
  s: string;
  i: Integer;
begin
  ini := TIniFile.Create('C:\test\bauer.ini');
  ListBox1.Clear;
  try
   ini.WriteString('Liste','Datei1','test2.pdf');
   s := ini.ReadString('Liste', 'Datei1', '');
  finally
  ini.Free;
  end;
  if ShellExecute(0, nil, pchar(s), nil, nil, 9)< 33 then
    showmessage('Anwendung kann nicht geoeffnet werden ');
Wenn du nur einen Dateinamen in der Ini hast, brauchst du die Listbox auch nicht. Oder habe ich dich jetzt falsch verstanden? Willst du mehrere Anwendungen gleichzeitig öffnen?
  Mit Zitat antworten Zitat