Einzelnen Beitrag anzeigen

Benutzerbild von SoD
SoD

Registriert seit: 9. Dez 2008
Ort: Oberasbach
33 Beiträge
 
Delphi 2007 Professional
 
#23

Re: INI mit Schleife auslesen

  Alt 19. Mär 2009, 14:36
Wenn ich aber nur eine auslesen möchte, müsste ich das doch per
Delphi-Quellcode:
  case ListBoxFiles.ItemIndex of
    0:
    try
      MemoDesc.Text := VideoIni.ReadString('Video1','Desc','KEINE BESCHREIBUNG VORHANDEN');
      MediaPlayerControl.FileName := VideoIni.ReadString('Video1','Path','');
      MediaPlayerControl.Open;
    except
      error_with_file;
    end;
    1:
    try
      MemoDesc.Text := VideoIni.ReadString('Video2','Desc','KEINE BESCHREIBUNG VORHANDEN');
      MediaPlayerControl.FileName := VideoIni.ReadString('Video2','Path','');
      MediaPlayerControl.Open;
    except
      error_with_file;
    end;
    2:
    try
      MemoDesc.Text := VideoIni.ReadString('Video3','Desc','KEINE BESCHREIBUNG VORHANDEN');
      MediaPlayerControl.FileName := VideoIni.ReadString('Video3','Path','');
      MediaPlayerControl.Open;
    except
      error_with_file;
    end;
  end;
machen und dann ist die Vorgabe nicht erfüllt, nur die INI abzuändern, wenn ein neues Video hinzukommt.

Geht das überhaupt, dass bei Auswahl eines ItemIndex der Listbox automatisch die dazugehörige Beschreibung aus der INI gezogen wird, oder müsste ich das auch wieder in einer StringList speichern?
Keinen Bock anständig zu debuggen?
try stuff;
except ShowMessage('Bug, bug, bug!!! Dont do this shit!');
end;
  Mit Zitat antworten Zitat