Einzelnen Beitrag anzeigen

DannyK.II

Registriert seit: 29. Nov 2004
35 Beiträge
 
Delphi 6 Personal
 
#1

Wie geht's: Ini - Section in ComboBox ?

  Alt 16. Dez 2004, 19:25
Tag, DPler, ich hab mal wieder ne frage!

mittlerweile habe ich es ja hinbekomemn, diverse daten in einer ini datei zu speichern und wieder löschen zu können.

Delphi-Quellcode:
// KUNDEN EINTRAGEN (IN DATA.INI)
procedure TForm1.Button1Click(Sender: TObject);
begin
vname := edit1.Text; nname := edit2.Text; strasse := edit3.Text;
anrede := combobox2.Text; plz := edit5.Text; ort := edit4.Text;
mail := edit6.Text; block := vname+' '+nname;
  try
  ini:=TIniFile.create(ExtractFilePath(ParamStr(0))+'data.ini');
  ini.writestring(block,'vname',vname);
  ini.writestring(block,'nname',nname);
  ini.writestring(block,'anrede',anrede);
  ini.writestring(block,'strasse',strasse);
  ini.writestring(block,'plz',plz);
  ini.writestring(block,'ort',ort);
  ini.writestring(block,'mail',mail);
  showmessage('Kunde erfolgreich eingetragen!');
  finally
  ini.free;
  end;
end;

// KUNDEN LÖSCHEN (AUS DATA.INI)
procedure TForm1.Button11Click(Sender: TObject);
begin
vname := edit1.Text; nname := edit2.Text; block := vname+' '+nname;
IF MessageDlg('Soll der Kunde wirklich gelöscht werden?',
  mtConfirmation,[mbyes, mbno],0) = mryes THEN
  try
  ini:=TIniFile.create(ExtractFilePath(ParamStr(0))+'data.ini');
  ini.EraseSection(block);
  finally
  ini.free;
  end;
end;
es soll jetzt folgendermaßen weitergehen:

in einer combobox sollen die überschriften der section (in der variable "block") als namen dargestellt werden. wenn ich sie nun auswähle, sollen die einzelnen werte in die entsprechenden edits geladen werden!

das laden in die textfelder ist kein problem! aber wie bekomme ich die variable "block" in die combobox, und rufe dann die entsprechenden einträge aus der ini auf???

vielen danks chonaml im vorraus....
Wer gegen ein Minimum an Aluminium imun ist, hat eine Aluminiumminimumimmunität.
  Mit Zitat antworten Zitat