Die gesamte Combobox speichert mit ComboBox1.Items.SaveToFile.
Der Text des aktuell ausgewählten Eintrages liegt in Combobox1.Text und ist ein normaler String (kein TString).
Den kannst so speichern:
Quelltext
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11:
| procedure TForm1.Button1Click(Sender: TObject); var F: TextFile; begin AssignFile(F,'C:\Test.txt'); try Rewrite(F); WriteLn(F, ComboBox1.Text); finally CloseFile(F); end; end; |
_________________
"Der Mensch ist nicht was er sich vorstellt oder wünscht zu sein, sondern das was andere in ihm sehen."