Ihr versteht ihn alle nicht oder?
Um den Inhalt einer ComboBox "intern" zu speichern musst du so vorgehen:
Delphi-Quellcode:
type
TForm1 = class(TForm)
Button1: TButton;
ComboBox1: TComboBox;
Button2: TButton;
Button3: TButton;
procedure Button1Click(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure FormDestroy(Sender: TObject);
procedure Button3Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
private
{ Private declarations }
public
Sicherung: TStringlist;
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
// Stringliste muss erstellt werden bevor sie benutzt wird...
procedure TForm1.FormCreate(Sender: TObject);
begin
Sicherung:= TStringlist.Create;
end;
// und wenn sie nichtmehr gebraucht wird, muss sie freigegeben werden.
procedure TForm1.FormDestroy(Sender: TObject);
begin
Sicherung.Free;
end;
// "Speichern"
procedure TForm1.Button1Click(Sender: TObject);
begin
Sicherung.Assign(ComboBox1.Items);
end;
// "Laden"
procedure TForm1.Button3Click(Sender: TObject);
begin
ComboBox1.Items.Assign(Sicherung);
end;
// Combobox Leeren
procedure TForm1.Button2Click(Sender: TObject);
begin
ComboBox1.Clear;
end;
Generell speichert man Dinge einfach in Variablen. Einen String, in einer Stringvariablen, einen Integer in einer Integervariable etc. Ganz viele Strings kann man entweder in einem Array of String speichern oder eben in einer TStringlist.
Michael
"Programmers talk about software development on weekends, vacations, and over meals not because they lack imagination,
but because their imagination reveals worlds that others cannot see."