Einzelnen Beitrag anzeigen

maluprog

Registriert seit: 20. Okt 2009
Ort: Wildau
19 Beiträge
 
Delphi 6 Professional
 
#1

IniFiles und Listbox

  Alt 31. Aug 2010, 17:48
Hallo,

habe ein Problem hinsichtlich Weiterverarbeitung der zurückgewonnenen Daten aus einer ini-Datei,
bzw. dessen Ergebnis in der Listbox.

Das Schreiben und Lesen der ini-Datei funktioniert, nachstehender Code:
Delphi-Quellcode:
procedure TForm1.BiniClick(Sender: TObject);
var
  ini: TIniFile;
begin
        ini := TIniFile.Create('c:\Main.ini');
        try
         ini.WriteString('Programm', 'Datum', Memo1.Lines.Strings[0]);
         //......
        finally
         ini.Free;
        end;
end;

procedure TForm1.BlesenClick(Sender: TObject);
var
  ini: TIniFile;
  x: string;
  //.....
begin
        ini := TIniFile.Create('c:\Main.ini');
        try
         x := ini.ReadString('Programm', 'Datum', '');
         //.....
         ini.ReadSectionValues('Programm', ListBoxini.Items);
        finally
         ini.Free;
        end;
end;
Möchte die Daten, d.h. nur das Datum ( z.Bsp.: '10.09.2010' ) aus der ListBoxIni in einen Label
weiter verwenden.

Mit nachstehendem funktioniert es nicht, war mir auch klar:

Delphi-Quellcode:
procedure TForm1.BzeigeClick(Sender: TObject);
begin
        lblzeige.Caption := ListBoxini.Items[0];
end;
Mit allen möglichen Ausleseversuchen bekomme ich kein kein Datum, sondern immer nur die Eigenschaft
mit dem Wert: Datum=10.09.2010. Habe danach mit 'TextOut', sowie allen Möglichkeiten der ListBox durchgespielt, ect. klappt alles nicht.

Vielleicht ist die Lösung ganz einfach !!!
Kann jemand helfen?

manne
  Mit Zitat antworten Zitat