DBComboBox während der Laufzeit befüllen

[Luca Haas]

Hey Leute,

kann mir jemand erklären wie ich, eine DBComboBox, während der Laufzeit befüllen kann ?
Ich habe eine Art kleinen Fragebogen und wenn jemand antwortet soll er gegebenenfalls eine andere Antwort, als die schon hinzugefügten Ja und Nein, verwenden können.
Die Antworten Ja und Nein habe ich jeweils mit

Delphi-Quellcode:

DBComboBox1.Items.Add('Ja');
DBComboBox1.Items.Add('Nein');

zur DBComboBox hinzugefügt

[nahpets]

Mit

Delphi-Quellcode:

DBComboBox1.Items.Add('Die andere Antwort');

?

Add fügt halt jedesmal was hinzu, ggfls. musst Du vorher prüfen, ob das gewünschte schon enthalten ist oder (bei einem Fragebogen wohl sinnvoller)

Delphi-Quellcode:

DBComboBox1.Items.Clear;
DBComboBox1.Items.Add('1. Antwort');
DBComboBox1.Items.Add('2. Antwort'); 
DBComboBox1.Items.Add('...');

[Luca Haas]

Verstanden, wie man die DBComboBox befüllt habe ich, allerdings geht es mir darum neue Antwortmöglichkeiten einzugeben, während das Programm läuft. Also quasi ein leeres Feld in der DBComboBox welches ich beschreiben kann und welches dann ein neues leeres Feld erzeugt.
Ich hoffe ich habe mich verständlich genug ausgedrückt :gruebel: , dass mir jemand weiterhelfen kann.

[nahpets]

Nein, Du hast Dich nicht verständlich ausgedrückt, eventuell meinst Du sowas in der Art:

Delphi-Quellcode:

DBComboBox1.Add(Edit1.Text);

[Uwe Raabe]

Du kannst ja freien Text in der DBCombobox eingeben, wenn der Style auf csDropDown steht. Beim Post wird dann der eingegebene Wert in der Datenbank gespeichert. Im AfterPost-Event kannst du nun den gespeicherten Wert auslesen, schauen ob er bereits in den Items der DBComboBox vorkommt und ihn gegebenfalls eintragen.

[nahpets]

Ok, da hätt' ich dann nochwas:

Delphi-Quellcode:

if DBComboBox1.Items.IndexOf(DBComboBox1.Text) < 0 then begin
  DBComboBox1.Items.Add(DBComboBox1.Text);
end;

Damit müsste dann der in der DBComboBox eingegebene Text in Zukunft (für die Laufzeit des Programmes) mit zu den Auswahlmöglichkeiten gehören.

Wenn es dauerhaft sein soll, dann mal nach TDBLookupCombo schauen. Das ist eine ComboBox, die ihren auswählbaren Inhalt aus einer anderen Datenbanktabelle bezieht und dann den ausgewählten Inhalt in das zugeordnete Datenbankfeld übernimmt. Es ist also eine Nachschlagtabelle.

[Luca Haas]

Zitat:

Zitat von nahpets (Beitrag 1381038)

Nein, Du hast Dich nicht verständlich ausgedrückt, eventuell meinst Du sowas in der Art:

Delphi-Quellcode:

DBComboBox1.Add(Edit1.Text);

Ich meine halt, dass die Werte "Ja, Nein" bereits im Quellcode gegeben sind und man als Anwender neue Werte hinzufügen kann, dass man beispielsweise mit "Vielleicht" antworten kann.
Dafür muss sozusagen ein neuer Wert zur Combobox hinzugefügt werden.

[Luca Haas]

@nahpets

Genau so habe ich das gemeint,es klappt jetzt super, danke schön